EXEC

Descrizione

Questa azione è richiamata dopo l'inserimento dei parametri.

Modello

Stampa

Utilizzo

Permette di forzare il valore di alcuni parametri.

I parametri sono memorizzati nella variabile PARAMETRE con indici da 1 a NBPAR. Ogni valore è una stringa con formato "parametro=valore" senza nessun altro separatore. I parametri della stampa sono ripartiti in 4 classi:

Quelli che cominciano con un doppio underscore. Questi sono i parametri con destinazione X3, che non sono trasmessi alla stampa (o perlomeno non tali e quali)

Quelli che cominciano con un singolo underscore. Sono dei parametri a destinazione di Crystal Reports, non sono trasmessi alla stampa. I valori di questi parametri sono obbligatoriamente prefissati da chr$(1).

Quelli che cominciano con X3. Sono dei parametri di contesto trasmessi alla stampa ed inizializzati automaticamente dal supervisore.

Quelli che sono descritti nel dizionario delle stampe. Quando il dizionario comporta un parametro che finisce con "deb" o "str", viene automaticamente aggiunto un altro parametro con stessa radice che finisce con "fin" o "end".

Il nome del server di stampa non è un parametro. È definito nella variabile locale SERVEUR(char(30)).

Elenco dei parametri:

__REPORT                         Nome della stampa crystal report

__DESTINATION                 0=Anteprima, 1=stampante, 2=e-mail, 3=file

__TYPDBA                          Tipo di database (menù locale 23)

__DBDATABASE                Nome del database

__DBUSER                         Utente DB

__DBPASSWORD             Password

__APPLICATION                 Dossier ;macchina ;servizio (dove si lancia la stampa)

__APPRPT                          Dossier ;macchina ;servizio (dove si trova la stampa)

__REQUETE                       Numero richiesta

__WSTATION                      Nome di rete della postazione dalla quale è stata sottomessa la stampa

__CDUSER                         Utente di login

__RPTLAN                           Lingua della stampa

_PreVisuOptions                 Opzioni di anteprima (non operativo)

_PrinterName                       Nome della stampante

_Orientation                          0=verticale, 1=orizzontale

_PrinterDriver (*)                  Nome del driver stampante

_PrinterPort (*)                     Porta stampante

_PrinterDescription (*)        Caratteristiche della stampante

_PrinterServer (*)                Nome del server di stampa

_PrinterCopies                    Numero di copie

_PrinterStartPage               Prima pagina

_PrinterStopPage               Ultima pagina

_ExportFile                          Nome del file di export

_FormatExport                     Formato del file di export (menù locale 91)

_FormatDelString                Delimitatore di stringa se formato "Valore separato da un carattere"

_FormatDelRecord              Delimitatore di campo se formato "Valore separato da un carattere"

(*)                   Questi parametri sono dipendenti dalla stampante e non possono essere descritti. Sono generalmente recuperati dall'istruzione selimp (fare una prova su una determinata stampante ed annotare i valori di questi parametri).

X3DOS                                 Dossier ;macchina; servizio

X3CLI                                    Ragione sociale cliente

X3EDT                                  Copyright editor

X3ETA                                  Codice della stampa

X3TIT                                    Nome della stampa

X3USR                                  Codice utente

X3OPE                                 Nome utente

X3SIT1                                 Elenco dei siti autorizzati

X3SIT2                                 Elenco dei siti vietati

X3PRF                                 Profilo funzione

X3FCT                                 Funzione associata alla stampa

X3SIT2                                 Elenco dei siti vietati

X3LAN                                  Lingua

X3FCY                                 Sito (solo per GEODE)

X3DEP                                 Deposito (solo per GEODE)

Esempio

Si vuole forzare il parametro traitauto al valore 1.

For I = 1 To NBPAR
     If left$(PARAMETRE(I),10)="traitauto="
        PARAMETRE(I) = "traitauto="+num$(1)
     Endif
Next I