campo-sirio/ve/ve0300a.src
alex 3997f4fc08 Patch level : 10.950
Files correlati     :  ve0.exe
Ricompilazione Demo : [ ]
Commento            :

Bug       0001802: 003446 - cq - abi-cab

verificato su area dati in www.aga.it\ilaria\g84x.zip che su maschera standar la fattura n. 54 che su rdoc ha codificato il codice iban, lo visualizza in modo errato al richiamo del documento (che è il penultimo)

Bug        0001779: 003408 - SRM gestione commesse

imposto sul cliente il codice iban corretto, confemando una commessa, al ritorno della generazione ordine fornitore, mi viene proposto un iban sbagliato in quanto viene visualizzato il codice abi utilizzato nella commessa precedente. Ho verificato che stampando senza registrare il codice iban della commessa è corretto.

Bisogna controllare il funzionamento con i profili vecchi non modificati, io ne avevo solo uno.
Alleghero' a breve il documento modificato per le modifiche ai profili


git-svn-id: svn://10.65.10.50/branches/R_10_00@21754 c028cbd2-c16b-5b4b-a496-9718f37d4682
2011-03-08 14:31:27 +00:00

2205 lines
36 KiB
Plaintext
Executable File

// File di definizione dei campi per il generatore di maschere
// Nome del paragrafo = Nome del campo nel file .INI del documento
// GROUP = Gruppo di appartenenza
// Le coordinate sono relative al gruppo. Se un gruppo h vuoto non viene generato.
// I gruppi non vengono separati durante la generazione.
// X e Y = Coordinate di riga e colonna all'interno del gruoppo. La prima riga h 1.
// FIELDNAME = E' il nome del campo nel file ( Equivalente a FIELD in UML )
// MSKID = E' l'ID del campo nella maschera
// TYPE = E' il tipo del campo nella maschera, in base alla seguente tabellina:
// T_DATA
// T_STRINGA
// T_NUMERO
// T_CHECKBOX
// T_LISTA
// T_MEMO
// T_CORNICE
// T_ZOOM
// T_CURRENCY
// SIZE = E' la dimesione del campo nella maschera. Per i tipi che richiedono due dimensioni,
// si fa dimensione1 * 100 + dimesione2
// PROMPT = E' il prompt di default per il campo ( pur essere cambiato nel .INI )
// FLAG = Sono i flags che deve avere il campo
// USE = Indica il file da usare per la ricerca ( Equivalente a USE in UML )
// INPUT = Indica i campi di input per la ricerca ( Equivalente a INPUT in UML )
// DISPLAY = Indica i campi da mostrare per la ricerca ( Equivalente a DISPLAY in UML )
// OUTPUT = Indica il file di output per la ricerca ( Equivalente a OUTPUT in UML )
// Per i precedenti 4 settaggi, vale il seguente :
// Se preceduto da un @, copia la use dal campo indicato
// Esempio: USE = @112 diventa, in uml, COPY USE 112
// USE = 12 diventa USE 12
// Per indicare piy di una riga, separare con ~
// Esempio: DISPLAY = "Ragione sociale@50" 20->RAGSOC~"Codice" 20->CODCF~"Indrizzo@35" 20->INDCF
// diventa, in UML:
// DISPLAY "Ragione sociale@50" 20->RAGSOC
// DISPLAY "Codice" 20->CODCF
// DISPLAY "Indrizzo@35" 20->INDCF
// WARNING = Indica il messaggio per segnalare errori ( Equivalente a WARNING in UML )
// HELP = Indica la stringa di help per il campo ( Equivalente a HELP in UML )
// SPECIAL = Usato per aggiungere righe non previste, separare ogni riga con ~
// ITEMS = Primo item~Message 1~Message 2@Nesimo item~Message 1~Message 2
// Esempio:
// ITEMS =Si|Risposta affermativa~HIDE 101@No|Risposta negativa~SHOW 101
// diventa, in UML:
// ITEM "Si|Risposta affermativa"
// MESSAGE HIDE 101
// ITEM "No|Risposta negativa"
// MESSAGE SHOW 101
#include "veuml.h"
#include "veuml1.h"
#include "veuml3.h"
#include "veini.h"
[OCCASEDIT]
GROUP=100
TYPE=T_BOTTONE
SIZE=1901
PROMPT="Cliente occasionale"
X=2
Y=0
MSKID=F_OCCASEDIT
[OCFPI]
GROUP=100
X=26
Y=0
FIELDNAME=OCFPI
MSKID=F_OCFPI
TYPE=T_STRINGA
PROMPT="Codice "
SIZE=16
[COFI]
// il campo e' letto nel file 20 clifo
GROUP=100
X=2
Y=0
MSKID=F_COFI
TYPE=T_STRINGA
PROMPT="Cod. fisc. "
USE=LF_CLIFO KE 4
INPUT=TIPOCF F_TIPOCF SELECT~COFI F_COFI
DISPLAY="Codice Fiscale@16" COFI~"Ragione sociale@50" RAGSOC~"Codice" CODCF~"Indrizzo@35" INDCF
OUTPUT=@F_CODCF
SIZE=16
[LIQDIFF]
GROUP=100
X=54
Y=0
FIELDNAME=LIQDIFF
MSKID=F_LIQDIFF
TYPE=T_CHECKBOX
PROMPT="Liq. differita"
[STATOPAIV]
// il campo e' letto nel file 20 clifo
GROUP=100
X=2
Y=1
MSKID=F_STATOPAIVA
TYPE=T_STRINGA
PROMPT="Part.Iva "
USE=%SCE
INPUT=CODTAB F_STATOPAIVA
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_STATOPAIVA CODTAB
FLAG=U
SIZE=2
[PAIVA]
// il campo e' letto nel file 20 clifo
GROUP=100
X=24
Y=1
MSKID=F_PAIVA
TYPE=T_STRINGA
PROMPT=""
USE=LF_CLIFO KE 5
INPUT=TIPOCF F_TIPOCF SELECT~STATOPAIV F_STATOPAIVA~PAIV F_PAIVA
DISPLAY="Partita IVA@12" PAIV~"Ragione sociale@50" RAGSOC~"Codice" CODCF~"Indrizzo@35" INDCF
OUTPUT=@F_CODCF
SIZE=12
[GOLEM]
GROUP=100
X=73
Y=0
MSKID=F_GOLEM
FIELDNAME=COLL_GOLEM
TYPE=T_GOLEM
PROMPT=""
SIZE=0402
FLAG=M
[GRRECAPITO]
GROUP=100
X=1
Y=2
MSKID=DLG_NULL
TYPE=T_CORNICE
PROMPT="Recapito"
SIZE=7806
[INDCF]
// il campo e' letto nel file 20 clifo
GROUP=100
X=2
Y=3
MSKID=F_INDCF
TYPE=T_STRINGA
PROMPT="Indirizzo "
SIZE=35
[CIVCF]
// il campo e' letto nel file 20 clifo
GROUP=100
X=61
Y=3
MSKID=F_CIVCF
TYPE=T_STRINGA
PROMPT="N. "
SIZE=10
[LOCALITACF]
// il campo e' letto nel file 20 clifo
GROUP=100
X=2
Y=4
MSKID=F_LOCALITACF
TYPE=T_STRINGA
PROMPT="Localita' "
SIZE=35
[CAPCF]
// il campo e' letto nel file 20 clifo
GROUP=100
X=52
Y=4
MSKID=F_CAPCF
TYPE=T_STRINGA
PROMPT="C.A.P."
SIZE=5
[COMCF]
// il campo e' letto nel file 20 clifo
GROUP=100
X=2
Y=5
MSKID=F_COMCF
TYPE=T_STRINGA
PROMPT="Comune "
SIZE=4
FLAG=U
USE=LF_COMUNI
INPUT=STATO F_STATOCF~COM F_COMCF
OUTPUT=F_DENCOM DENCOM~F_PROVCOM PROVCOM
SPECIAL=CH SEARCH
[DENCOM]
// il campo e' letto nel file 13 comuni con chiave [COMCF]
GROUP=100
X=24
Y=5
MSKID=F_DENCOM
TYPE=T_STRINGA
PROMPT=""
SIZE=50
[PROVCOM]
// il campo e' letto nel file 13 comuni con chiave [COMCF]
GROUP=100
X=66
Y=4
MSKID=F_PROVCOM
TYPE=T_STRINGA
PROMPT="Pr."
SIZE=5
[STATOCF]
// il campo e' letto nel file 20 clifo va visualizzato solo se <>""
GROUP=100
X=2
Y=6
MSKID=F_STATOCF
TYPE=T_NUMERO
PROMPT="Stato "
SIZE=3
FLAG=Z
USE=%STA
INPUT=CODTAB F_STATOCF
OUTPUT=F_DESSTATOCF S0
SPECIAL=CH SEARCH
[DESSTATOCF]
// il campo e' letto nella tabella %STA e va visualizzato solo se [STATOCF]<>""
GROUP=100
X=24
Y=6
MSKID=F_DESSTATOCF
TYPE=T_STRINGA
PROMPT=""
SIZE=50
[ORDDA]
GROUP=150
X=2
Y=0
MSKID=F_ORDDA
FLAG=R
FIELDNAME=ORDCF
TYPE=T_STRINGA
PROMPT="Ordinato da"
USE=LF_CLIFO
INPUT=TIPOCF F_TIPOCF SELECT~CODCF F_ORDDA
DISPLAY="Codice@6" CODCF~"Ragione sociale@50" RAGSOC~"Partita IVA@12" PAIV
OUTPUT=F_ORDDA CODCF~F_ORDDADES RAGSOC
SIZE=6
[ORDDADES]
GROUP=150
X=24
Y=0
MSKID=F_ORDDADES
TYPE=T_STRINGA
PROMPT=""
USE=LF_CLIFO KE 2
INPUT=TIPOCF F_TIPOCF SELECT~RAGSOC F_ORDDADES
DISPLAY="Ragione sociale@50" RAGSOC~"Codice@6" CODCF~"Partita IVA@12" PAIV
OUTPUT=@F_ORDDA
SIZE=50
[CODVAL1]
//se codice=LIT il campo cambio e' di sola visualizzazione
//se non abilitato archivio cambi
GROUP=200
X=2
Y=0
FIELDNAME=CODVAL
MSKID=F_CODVAL
TYPE=T_STRINGA
PROMPT="Valuta "
SIZE=3
FLAG=U
USE=%VAL
INPUT=CODTAB F_CODVAL
DISPLAY="Codice" CODTAB~"Descrizione@50" S0~"Cambio@15" S4~"Data valuta" D0
OUTPUT=F_CODVAL CODTAB~F_NOMEVAL S0~F_CAMBIO S4~F_DATACAMBIO D0~F_CONTROEURO B1
WARNING=Codice valuta non trovato
HELP=Inserisci il codice della valuta
SPECIAL=ME CO,F_CODVAL1
[CODVAL2]
//se codice=LIT il campo cambio e' di sola visualizzazione
//se abilitato archivio cambi
GROUP=200
X=2
Y=0
FIELDNAME=CODVAL
MSKID=F_CODVAL1
TYPE=T_STRINGA
PROMPT="Valuta "
SIZE=3
FLAG=U
USE=%VAL
INPUT=CODTAB F_CODVAL1
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODVAL1 CODTAB~F_NOMEVAL1 S0~F_CONTROEURO B1
WARNING=Codice valuta non trovato
HELP=Inserisci il codice della valuta
SPECIAL=ME CO,F_CODVAL
[NOME_VAL1]
//se non abilitato archivio cambi
GROUP=200
X=24
Y=0
MSKID=F_NOMEVAL
TYPE=T_STRINGA
SIZE=50
USE=%VAL KEY 2
INPUT=S0 F_NOMEVAL
DISPLAY="Descrizione@50" S0~"Codice" CODTAB~"Cambio@15" S4~"Data valuta" D0
OUTPUT=F_CODVAL CODTAB~F_NOMEVAL S0~F_CAMBIO S4~F_DATACAMBIO D0~F_CONTROEURO B1
WARNING=Codice valuta non trovato
HELP=Inserisci il codice della valuta
[NOME_VAL2]
//se abilitato archivio cambi
GROUP=200
X=24
Y=0
MSKID=F_NOMEVAL1
TYPE=T_STRINGA
SIZE=50
USE=%VAL KEY 2
INPUT=S0 F_NOMEVAL1
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=F_CODVAL1 CODTAB~F_NOMEVAL1 S0~F_CONTROEURO B1
WARNING=Codice valuta non trovato
HELP=Inserisci il codice della valuta
[DATA_CAMBIO1]
// se non abiltato archivio cambi
GROUP=200
X=2
Y=1
FIELDNAME=DATACAMBIO
MSKID=F_DATACAMBIO
TYPE=T_DATA
PROMPT="Data valuta"
[DATA_CAMBIO2]
// se abilitato archivio cambi
GROUP=200
X=2
Y=1
FLAG=R
FIELDNAME=DATACAMBIO
MSKID=F_DATACAMBIO1
TYPE=T_DATA
PROMPT="Data valuta"
USE=CAM~JO %VAL TO CAM AL 50 INTO CODTAB=CODTAB[1,3]
INPUT=CODTAB[1,3] F_CODVAL SELECT~CODTAB[4,11] F_DATACAMBIO1
DISPLAY="Valuta" CODTAB[1,3]~"Data@10" D0~"Descrizione@50" -50->S0~"Cambio@15" S4
OUTPUT=F_CAMBIO S4~F_DATACAMBIO1 D0
SPECIAL=CH SEARCH~ME CO,F_DATACAMBIO~VA 12 1 F_CODVAL1
WARNING=La data cambio e' obbligatoria
[CONTROEURO]
// attenzione se abilitato archivio cambi cambio e data rilevati da tale archivio
GROUP=200
X=28
Y=1
FIELDNAME=CONTROEURO
MSKID=F_CONTROEURO
TYPE=T_CHECKBOX
PROMPT="Contro Euro"
[CAMBIO]
// attenzione se abilitato archivio cambi cambio e data rilevati da tale archivio
GROUP=200
X=48
Y=1
FIELDNAME=CAMBIO
MSKID=F_CAMBIO
TYPE=T_NUMERO
PROMPT="Cambio "
SIZE=1506
FLAG=R
SPECIAL=VA 12 1 F_CODVAL1
WARNING=Il cambio e' obbligatorio
[CODLIN]
GROUP=300
X=2
Y=0
FIELDNAME=CODLIN
MSKID=F_CODLIN
TYPE=T_STRINGA
PROMPT="Lingua "
SIZE=1
FLAG=U
USE=%LNG
INPUT=CODTAB F_CODLIN
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODLIN CODTAB~F_DESLIN S0
[DESLIN]
GROUP=300
X=24
Y=0
MSKID=F_DESLIN
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=%LNG KE 2
INPUT=S0 F_DESLIN
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=@F_CODLIN
[CODPAG]
GROUP=400
X=2
Y=0
FIELDNAME=CODPAG
MSKID=F_CODPAG
TYPE=T_STRINGA
PROMPT="Cond. pag. "
SIZE=4
FLAG=U
USE=%CPG
INPUT=CODTAB F_CODPAG
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODPAG CODTAB~F_DESCODPAG S0
WARNING=Codice tipo pagamento non trovato
HELP=Inserisci il codice del tipo di pagamento
SPECIAL=ADD RU ba3 -6
[DESCODPAG]
GROUP=400
X=24
Y=0
MSKID=F_DESCODPAG
TYPE=T_STRINGA
SIZE=50
USE=%CPG KEY 2
INPUT=S0 F_DESCODPAG
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=F_CODPAG CODTAB~F_DESCODPAG S0
WARNING=Codice tipo pagamento non trovato
HELP=Inserisci il codice del tipo di pagamento
SPECIAL=ADD RU ba3 -6
[GRSCADENZE]
GROUP=500
X=1
Y=0
MSKID=DLG_NULL
TYPE=T_CORNICE
PROMPT=Scadenze
SIZE=7805
[DATAINSC]
GROUP=500
X=2
Y=1
FIELDNAME=DATAINSC
MSKID=F_DATAINSC
TYPE=T_DATA
PROMPT="Data inizio scadenze "
// FLAG=A
WARNING=E' richiesta una data valido
HELP=Inserisci la data di inizio scadenza
[DATASCAD1]
GROUP=500
X=2
Y=2
MSKID=F_DATASCAD1
TYPE=T_DATA
PROMPT="Scadenze : 1' "
[DATASCAD2]
GROUP=500
X=36
Y=2
MSKID=F_DATASCAD2
TYPE=T_DATA
PROMPT="2' "
[DATASCAD3]
GROUP=500
X=51
Y=2
MSKID=F_DATASCAD3
TYPE=T_DATA
PROMPT="3' "
[DATASCAD4]
GROUP=500
X=21
Y=3
MSKID=F_DATASCAD4
TYPE=T_DATA
PROMPT="4' "
[DATASCAD5]
GROUP=500
X=36
Y=3
MSKID=F_DATASCAD5
TYPE=T_DATA
PROMPT="5' "
[CODABIA]
GROUP=600
X=2
Y=0
FIELDNAME=CODABIA
MSKID=F_CODABIA
TYPE=T_NUMERO
PROMPT="Banca appoggio : Cod. ABI "
SIZE=5
FLAG=Z
USE=%BAN SE CODTAB?="?????"
INPUT=CODTAB[1,5] F_CODABIA
DISPLAY="Cod. Istit." CODTAB[1,5]~"Cod. Fil." CODTAB[6,10]~"Denominazione@50" S0
OUTPUT=F_CODABIA CODTAB[1,5]~F_DESBANAPP S0~F_BBAN_ABI CODTAB[1,5]
SPECIAL=ME CO,F_CODABIA1~GR GR_APPOGGIO
[CODCABA]
GROUP=600
X=42
Y=0
FIELDNAME=CODCABA
MSKID=F_CODCABA
TYPE=T_NUMERO
PROMPT="Cod. CAB "
SIZE=5
FLAG=Z
USE=%BAN SE CODTAB?="??????????"
INPUT=CODTAB[1,5] F_CODABIA~CODTAB[6,10] F_CODCABA
DISPLAY=@F_CODABIA
OUTPUT=F_CODABIA CODTAB[1,5]~F_CODCABA CODTAB[6,10]~F_DESBANAPP S0~F_BBAN_CAB CODTAB[6,10]
SPECIAL=ME CO,F_CODCABA1~GR GR_APPOGGIO
[CODABIA1]
GROUP=600
X=2
Y=0
FIELDNAME=CODABIA
MSKID=F_CODABIA1
TYPE=T_NUMERO
PROMPT="Banca appoggio : Cod. ABI "
SIZE=5
FLAG=ZH
USE=LF_CFBAN KEY 2~JOIN %BAN INTO CODTAB[1,5]==ABI CODTAB[6,10]==CAB
INPUT=TIPOCF F_TIPOCF SE~CODCF F_CODCF SE~TIPOBAN "V"~ABI F_CODABIA1~CAB F_CODCABA1~PROGPR ""
DISPLAY="Cod. Istit." ABI~"Cod. Fil." CAB~"IBAN@27" IBAN~"Denominazione@50" %BAN->S0
OUTPUT=F_CODABIA1 ABI~F_CODCABA1 CAB~F_DESBANAPP1 %BAN->S0
SPECIAL=GR GR_APPOGGIOCLI
[CODCABA1]
GROUP=600
X=42
Y=0
FIELDNAME=CODCABA
MSKID=F_CODCABA1
TYPE=T_NUMERO
PROMPT="Cod. CAB "
SIZE=5
FLAG=ZH
USE=@F_CODABIA1
INPUT=@F_CODABIA1
DISPLAY=@F_CODABIA1
OUTPUT=@F_CODABIA1
SPECIAL=GR GR_APPOGGIOCLI
[DESBANAPP]
GROUP=600
X=2
Y=1
MSKID=F_DESBANAPP
TYPE=T_STRINGA
PROMPT="Denominazione "
SIZE=7050
USE=%BAN KE 2
INPUT=S0 F_DESBANAPP
DISPLAY=@F_CODABIA
OUTPUT=@F_CODABIA
SPECIAL=GR GR_APPOGGIO
[DESBANAPP1]
GROUP=600
X=2
Y=1
MSKID=F_DESBANAPP1
TYPE=T_STRINGA
PROMPT="Denominazione "
SIZE=7050
FLAG=D
SPECIAL=GR GR_APPOGGIOCLI
[IBAN]
GROUP=600
X = 222
Y = 2
MSKID=F_IBAN
TYPE=T_STRINGA
PROMPT=""
SIZE=34
FLAG=D
FIELDNAME=IBAN
[IBAN_STATO]
GROUP=600
X = 2
Y = 2
MSKID=F_IBAN_STATO
TYPE=T_STRINGA
PROMPT="Codice conto IBAN "
SIZE=2
FLAG=U
SPECIAL=VA 24 8 F_IBAN F_IBAN_STATO F_IBAN_CHECK F_BBAN F_BBAN_CIN F_BBAN_ABI F_BBAN_CAB F_BBAN_CONTO
[IBAN_CHECK]
GROUP=600
X = 28
Y = 2
MSKID=F_IBAN_CHECK
TYPE=T_NUMERO
PROMPT=""
SIZE=2
FLAG=UZ
SPECIAL=VA 24 8 F_IBAN F_IBAN_STATO F_IBAN_CHECK F_BBAN F_BBAN_CIN F_BBAN_ABI F_BBAN_CAB F_BBAN_CONTO
[BBAN]
GROUP=600
X = 39
Y = 2
MSKID=F_BBAN
TYPE=T_STRINGA
PROMPT="BBAN "
SIZE=30
FLAG=HUZ
[BBAN_CIN]
GROUP=600
X = 40
Y = 2
MSKID=F_BBAN_CIN
TYPE=T_STRINGA
PROMPT="BBAN "
SIZE=1
FLAG=U
SPECIAL=VA 25 5 F_BBAN F_BBAN_CIN F_BBAN_ABI F_BBAN_CAB F_BBAN_CONTO
[BBAN_ABI]
GROUP=600
X = 48
Y = 2
MSKID=F_BBAN_ABI
TYPE=T_NUMERO
PROMPT=""
SIZE=5
FLAG=DZ
[BBAN_CAB]
GROUP=600
X = 55
Y = 2
MSKID=F_BBAN_CAB
TYPE=T_NUMERO
PROMPT=""
SIZE=5
FLAG=DZ
[BBAN_CONTO]
GROUP=600
X = 62
Y = 2
MSKID=F_BBAN_CONTO
TYPE=T_STRINGA
PROMPT=""
SIZE=12
FLAG=Z
SPECIAL=VA 25 5 F_BBAN F_BBAN_CIN F_BBAN_ABI F_BBAN_CAB F_BBAN_CONTO
[CODABIP]
GROUP=700
X=2
Y=0
FIELDNAME=CODABIP
MSKID=F_CODABIP
TYPE=T_NUMERO
PROMPT="Banca presentazione : Cod. ABI "
SIZE=5
FLAG=Z
USE=@F_CODABIA
INPUT=CODTAB[1,5] F_CODABIP
DISPLAY="Cod. Istit." CODTAB[1,5]~"Cod. Fil." CODTAB[6,10]~"Denominazione@50" S0
OUTPUT=F_CODABIP CODTAB[1,5]~F_DESBANPRE S0
SPECIAL=ME CO,F_CODABIP1~GR GR_PRESENT
[CODCABP]
GROUP=700
X=42
Y=0
FIELDNAME=CODCABP
MSKID=F_CODCABP
TYPE=T_NUMERO
PROMPT="Cod. CAB "
SIZE=5
FLAG=Z
USE=@F_CODCABA
INPUT=CODTAB[1,5] F_CODABIP~CODTAB[6,10] F_CODCABP
DISPLAY=@F_CODABIP
OUTPUT=F_CODABIP CODTAB[1,5]~F_CODCABP CODTAB[6,10]~F_DESBANPRE S0
SPECIAL=ME CO,F_CODCABP1~GR GR_PRESENT
[PROGBNP]
GROUP=700
X=60
Y=0
TYPE=T_NUMERO
FIELDNAME=PROGBNP
MSKID=F_PROGBNP
PROMPT="Progressivo "
SIZE=2
FLAG=Z
USE=BNP~JOIN %BAN ALIAS 100 INTO CODTAB=CODTAB[1,10]
INPUT=CODTAB[1,5] F_CODABIP~CODTAB[6,10] F_CODCABP~CODTAB[11,12] F_PROGBNP
DISPLAY="Cod. Istit." CODTAB[1,5]~"Cod. Fil." CODTAB[6,10]~"Progr." CODTAB[11,12]~"IBAN@27" S3~"Denominazione@50" 100@->S0
OUTPUT=F_CODABIP CODTAB[1,5]~F_CODCABP CODTAB[6,10]~F_PROGBNP CODTAB[11,12]~F_DESBANPRE 100@->S0
SPECIAL=ME CO,F_PROGBNP1~GR GR_PRESENT
[CODABIP1]
GROUP=700
X=2
Y=0
FIELDNAME=CODABIP
MSKID=F_CODABIP1
TYPE=T_NUMERO
PROMPT="Banca presentazione : Cod. ABI "
SIZE=5
FLAG=ZH
USE=@F_CODABIA
INPUT=CODTAB[1,5] F_CODABIP
DISPLAY="Cod. Istit." CODTAB[1,5]~"Cod. Fil." CODTAB[6,10]~"Denominazione@50" S0
OUTPUT=F_CODABIP CODTAB[1,5]~F_DESBANPRE S0
USE=LF_CFBAN KEY 2~JOIN %BAN INTO CODTAB[1,5]==ABI CODTAB[6,10]==CAB
INPUT=TIPOCF F_TIPOCF SE~CODCF F_CODCF SE~TIPOBAN "N"~ABI F_CODABIP1~CAB F_CODCABP1~PROGPR F_PROGBNP1
DISPLAY="Cod. Istit." ABI~"Cod. Fil." CAB~"Progr." PROGPR~"IBAN@27" IBAN~"Denominazione@50" %BAN->S0
OUTPUT=F_CODABIP1 ABI~F_CODCABP1 CAB~F_PROGBNP1 PROGPR~F_DESBANPRE1 %BAN->S0
SPECIAL=GR GR_PRESENTCLI
[CODCABP1]
GROUP=700
X=42
Y=0
FIELDNAME=CODCABP
MSKID=F_CODCABP1
TYPE=T_NUMERO
PROMPT="Cod. CAB "
SIZE=5
FLAG=ZH
USE=@F_CODABIP1
INPUT=@F_CODABIP1
DISPLAY=@F_CODABIP1
OUTPUT=@F_CODABIP1
SPECIAL=GR GR_PRESENTCLI
[PROGBNP1]
GROUP=700
X=60
Y=0
TYPE=T_NUMERO
FIELDNAME=PROGBNP
MSKID=F_PROGBNP1
PROMPT="Progressivo "
SIZE=2
FLAG=ZH
USE=@F_CODABIP1
INPUT=@F_CODABIP1
DISPLAY=@F_CODABIP1
OUTPUT=@F_CODABIP1
SPECIAL=GR GR_PRESENTCLI
[DESBANPRE]
GROUP=700
X=2
Y=1
MSKID=F_DESBANPRE
TYPE=T_STRINGA
PROMPT="Denominazione "
SIZE=7050
USE=%BAN KEY 2
INPUT=S0 F_DESBANPRE
DISPLAY=@F_CODABIP
OUTPUT=@F_CODABIP
SPECIAL=GR GR_PRESENT
[DESBANPRE1]
GROUP=700
X=2
Y=1
MSKID=F_DESBANPRE1
TYPE=T_STRINGA
PROMPT="Denominazione "
SIZE=7050
FLAG=D
SPECIAL=GR GR_PRESENTCLI
[CATVEN]
GROUP=800
X=2
Y=0
FIELDNAME=CATVEN
MSKID=F_CATVEN
TYPE=T_STRINGA
PROMPT="C.vendita "
SIZE=2
FLAG=U
USE=CVE
INPUT=CODTAB F_CATVEN
DISPLAY="Cat.Ven." CODTAB~"Descrizione@50" S0
OUTPUT=F_CATVEN CODTAB~F_DESCATVEN S0
[DESCATVEN]
GROUP=800
X=24
Y=0
MSKID=F_DESCATVEN
TYPE=T_STRINGA
PROMPT=""
SIZE=50
[CODLIST]
GROUP=800
X=2
Y=1
FIELDNAME=CODLIST
MSKID=F_CODLIST
TYPE=T_STRINGA
PROMPT="Listino "
SIZE=3
FLAG=U
USE=LF_CONDV
INPUT=TIPO "L"~CATVEN ""~COD F_CODLIST
DISPLAY="Codice" COD~"Descrizione@50" DESCR
OUTPUT=F_CODLIST COD~F_DESLIST DESCR
SPECIAL=ADD RUN ve2 -1 l
[DESLIST]
GROUP=800
X=24
Y=1
MSKID=F_DESLIST
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=LF_CONDV KEY 2
INPUT=TIPO "L"~DESCR F_DESLIST
DISPLAY="Descrizione@50" DESCR~"Codice" COD
OUTPUT=F_CODLIST COD~F_DESLIST DESCR
SPECIAL=ADD RUN ve2 -1 l
[CODCONT]
GROUP=810
X=2
Y=0
FIELDNAME=CODCONT
MSKID=F_CODCONT
TYPE=T_STRINGA
PROMPT="Contratto "
SIZE=3
FLAG=U
USE=LF_CONDV
INPUT=TIPO "C"~TIPOCF ""~CODCF ""~COD F_CODCONT
DISPLAY="Codice" COD~"Descrizione@35" DESCR
OUTPUT=F_CODCONT COD~F_DESCONT DESCR
SPECIAL=ADD RUN ve2 -1 c
[DESCONT]
GROUP=810
X=24
Y=0
MSKID=F_DESCONT
TYPE=T_STRINGA
PROMPT=""
USE=LF_CONDV KEY 2 SE CODCF==""
INPUT=TIPO "C"~DESCR F_DESCONT
DISPLAY="Descrizione@50" DESCR~"Codice" COD
OUTPUT=F_CODCONT COD~F_DESCONT DESCR~F_CODCONT COD
SIZE=50
SPECIAL=ADD RUN ve2 -1 c
[CODCAMP]
GROUP=820
X=2
Y=0
FIELDNAME=CODCAMP
MSKID=F_CODCAMP
TYPE=T_STRINGA
PROMPT="Offerta "
SIZE=3
FLAG=U
USE=LF_CONDV
INPUT=TIPO "O"~COD F_CODCAMP
DISPLAY="Codice" COD~"Descrizione@35" DESCR
OUTPUT=F_CODCAMP COD~F_DESCAMP DESCR
SPECIAL=ADD RUN ve2 -1 o
[DESCAMP]
GROUP=820
X=24
Y=0
MSKID=F_DESCAMP
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=LF_CONDV KEY 2
INPUT=TIPO "O"~DESCR F_DESCAMP
DISPLAY="Descrizione@50" DESCR~"Codice" COD
OUTPUT=F_CODCAMP COD~F_DESCAMP DESCR
SIZE=50
SPECIAL=ADD RUN ve2 -1 o
[SCONTOPERC]
GROUP=830
X=2
Y=0
FIELDNAME=SCONTOPERC
MSKID=F_SCONTOPERC
TYPE=T_STRINGA
PROMPT="Sconto "
SIZE=25
SPECIAL=VA 23 0
[RAGGR]
GROUP=2300
X=2
Y=0
FIELDNAME=RAGGR
MSKID=F_RAGGR
TYPE=T_CHECKBOX
PROMPT="Raggruppamento documento "
[RAGGREFF]
GROUP=2300
X=40
Y=0
FIELDNAME=RAGGREFF
MSKID=F_RAGGREFF
TYPE=T_CHECKBOX
PROMPT="Raggruppamento effetti "
[GRINDSPED]
GROUP=900
X=1
Y=0
MSKID=DLG_NULL
TYPE=T_CORNICE
PROMPT=Indirizzo spedizione
SIZE=7807
[CODINDSP]
GROUP=900
X=2
Y=1
FIELDNAME=CODINDSP
MSKID=F_CODINDSP
TYPE=T_STRINGA
PROMPT="Codice "
SIZE=3
WARNING=Indirizzo di spedizione non trovato!
USE=LF_INDSP
INPUT=TIPOCF F_TIPOCF SE~CODCF F_CODCF SE~CODIND F_CODINDSP
DISPLAY="Codice" CODIND~"Ragione sociale@50" RAGSOC~"Codice" CODCF~"Indirizzo@35" INDIR~"N.ro civico" CIV
OUTPUT=F_CODINDSP CODIND~F_RAGSOCSP RAGSOC~F_INDSP INDIR~F_CIVSP CIV~F_LOCALITASP LOCALITA~F_CAPSP CAP~F_COMSP COM~F_STATOSP STATO
HELP=Inserisci il codice dell'indirizzo di spedizione
[RAGSOCSP]
GROUP=900
X=24
Y=1
MSKID=F_RAGSOCSP
TYPE=T_STRINGA
SIZE=50
[INDSP]
GROUP=900
X=2
Y=2
MSKID=F_INDSP
PROMPT="Indirizzo "
TYPE=T_STRINGA
SIZE=35
[CIVSP]
GROUP=900
X=61
Y=2
MSKID=F_CIVSP
PROMPT="N. "
TYPE=T_STRINGA
SIZE=10
[LOCALITASP]
GROUP=900
X=2
Y=3
MSKID=F_LOCALITASP
TYPE=T_STRINGA
PROMPT="Localita` "
SIZE=35
[CAPSP]
GROUP=900
X=54
Y=3
MSKID=F_CAPSP
TYPE=T_STRINGA
PROMPT="CAP "
SIZE=5
FLAG=R
[PROVCOMSP]
// il campo e' letto nel file 13 comuni con chiave [COMCF]
GROUP=900
X=65
Y=3
MSKID=F_PROVCOMSP
TYPE=T_STRINGA
PROMPT="Pr. "
SIZE=5
[STATOSP]
// il campo e' letto nel file 20 clifo va visualizzato solo se <>""
GROUP=900
X=2
Y=4
MSKID=F_STATOSP
TYPE=T_NUMERO
PROMPT="Stato "
SIZE=3
FLAG=Z
USE=%STA
INPUT=CODTAB F_STATOSP
OUTPUT=F_DESSTATOSP S0
SPECIAL=CH SEARCH
[DESSTATOSP]
GROUP=900
X=24
Y=4
FLAG=D
MSKID=F_DESSTATOSP
TYPE=T_STRINGA
SIZE=50
[COMSP]
GROUP=900
X=2
Y=5
MSKID=F_COMSP
TYPE=T_STRINGA
PROMPT="Comune "
SIZE=4
FLAG=U
USE=LF_COMUNI
INPUT=STATO F_STATOSP~COM F_COMSP
OUTPUT=F_DENCOMSP DENCOM~F_PROVCOMSP PROVCOM
SPECIAL=CH SEARCH
[DENCOMSP]
GROUP=900
X=24
Y=5
FLAG=D
MSKID=F_DENCOMSP
TYPE=T_STRINGA
SIZE=50
[DATADOCRIF]
GROUP=1000
X=2
Y=0
FIELDNAME=DATADOCRIF
MSKID=F_DATADOCRIF
TYPE=T_DATA
PROMPT="Documento di riferimento : Data "
[NUMDOCRIF]
GROUP=1000
X=50
Y=0
FIELDNAME=NUMDOCRIF
MSKID=F_NUMDOCRIF
TYPE=T_STRINGA
PROMPT="Numero "
SIZE=7
USE=LF_DOC SELECT NUMDOCRIF!=""
INPUT=ANNO F_ANNO SELECT~PROVV F_PROVV SELECT~CODNUM F_CODNUM SELECT~NDOC F_NDOC
DISPLAY="Num." CODNUM~"Anno" ANNO~"Provv" PROVV~"Tipo" TIPODOC~"N.Doc. " NDOC~"N.Doc.Rif. " NUMDOCRIF
[DATADOCRIFN]
GROUP=1010
X=2
Y=0
FIELDNAME=DATADOCRIF
MSKID=F_DATADOCRIF
TYPE=T_DATA
PROMPT="Documento di riferimento : Data "
[CODNUMRIFN]
GROUP=1010
X=50
Y=0
FIELDNAME=CODNUMRIF
MSKID=F_CODNUMRIF
TYPE=T_STRINGA
PROMPT="Numerazione "
FLAG=UPA
SIZE=4
USE=%NUM
INPUT=CODTAB F_CODNUMRIF
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODNUMRIF CODTAB
[CODNUMRIFN]
GROUP=1010
X=20
Y=1
FIELDNAME=ANNORIF
MSKID=F_ANNORIF
TYPE=T_NUMERO
PROMPT="Anno "
FLAG=AP
SIZE=4
[NUMDOCRIFN]
GROUP=1010
X=50
Y=1
FIELDNAME=NUMDOCRIF
MSKID=F_NUMDOCRIF
TYPE=T_STRINGA
PROMPT="Numero "
SIZE=7
USE=LF_DOC~JO LF_CLIFO TO LF_DOC INTO TIPOCF==TIPOCF CODCF==CODCF
INPUT=ANNO F_ANNORIF SELECT~PROVV "D" SELECT~CODNUM F_CODNUMRIF SELECT~NDOC F_NUMDOCRIF
DISPLAY="Num." CODNUM~"Anno" ANNO~"Provv" PROVV~"Tipo" TIPODOC~"N.Doc. " NDOC~"Codice" CODCF~"Ragione Sociale@50" 20->RAGSOC~"Totale\ndocumento@18V" G1:TOTDOC
OUTPUT=F_ANNORIF ANNO~F_CODNUMRIF CODNUM~F_NUMDOCRIF NDOC~F_DATADOCRIF DATADOC
SPECIAL=CH SEARCH
[CODAG]
GROUP=1100
X=2
Y=0
FIELDNAME=CODAG
MSKID=F_CODAG
TYPE=T_STRINGA
PROMPT="Agente "
SIZE=5
FLAG=UZ
USE=LF_AGENTI
INPUT=CODAGE F_CODAG
DISPLAY="Codice" CODAGE~"Descrizione@50" RAGSOC
OUTPUT=F_CODAG CODAGE~F_DESAG RAGSOC
SPECIAL=CH NORMAL~ADD RU pr0 -4
[DESAG]
GROUP=1100
X=24
Y=0
MSKID=F_DESAG
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=LF_AGENTI KEY 2
INPUT=RAGSOC F_DESAG
DISPLAY="Descrizione@50" RAGSOC~"Codice" CODAGE
OUTPUT=F_CODAG CODAGE~F_DESAG RAGSOC
SPECIAL=ADD RU pr0 -4
[CODAGVIS]
GROUP=1100
X=2
Y=1
FIELDNAME=CODAGVIS
MSKID=F_CODAGVIS
TYPE=T_STRINGA
PROMPT="2o Agente "
SIZE=5
FLAG=UZ
USE=LF_AGENTI
INPUT=CODAGE F_CODAGVIS
DISPLAY="Codice" CODAGE~"Ragione Sociale@50" RAGSOC
OUTPUT=F_CODAGVIS CODAGE~F_DESAGVIS RAGSOC
SPECIAL=CH NORMAL~ADD RU pr0 -4
[DESAGVIS]
GROUP=1100
X=24
Y=1
MSKID=F_DESAGVIS
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=LF_AGENTI KEY 2
INPUT=RAGSOC F_DESAGVIS
DISPLAY="Ragione Sociale@50" RAGSOC~"Codice" CODAGE
OUTPUT=F_CODAGVIS CODAGE~F_DESAGVIS RAGSOC
SPECIAL=ADD RU pr0 -4
[CODZON]
GROUP=1100
X=2
Y=2
FIELDNAME=ZONA
MSKID=F_CODZON
TYPE=T_STRINGA
PROMPT="Zona "
SIZE=2
FLAG=U
USE=ZON
INPUT=CODTAB F_CODZON
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODZON CODTAB~F_DESZON S0
SPECIAL=CH NORMAL
[DESZON]
GROUP=1100
X=24
Y=2
MSKID=F_DESZON
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=ZON KEY 2
INPUT=S0 F_DESZON
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=F_CODZON CODTAB~F_DESZON S0
[CODSPMEZZO]
GROUP=1200
X=2
Y=0
FIELDNAME=CODSPMEZZO
MSKID=F_CODSPMEZZO
TYPE=T_STRINGA
PROMPT="Sped.mezzo "
SIZE=3
FLAG=U
USE=%MSP
INPUT=CODTAB F_CODSPMEZZO
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODSPMEZZO CODTAB~F_DESSPMEZZO S0
SPECIAL=CH NORMAL
[DESSPMEZZO]
GROUP=1200
X=24
Y=0
MSKID=F_DESSPMEZZO
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=%MSP KEY 2
INPUT=S0 F_DESSPMEZZO
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=F_CODSPMEZZO CODTAB~F_DESSPMEZZO S0
[CODPORTO]
GROUP=1210
X=2
Y=0
FIELDNAME=CODPORTO
MSKID=F_CODPORTO
TYPE=T_STRINGA
PROMPT="Porto "
SIZE=3
FLAG=U
USE=%POR
INPUT=CODTAB F_CODPORTO
DISPLAY="Codice" CODTAB~"Porto@50" S0
OUTPUT=F_CODPORTO CODTAB~F_DESPORTO S0
WARNING=Codice porto non trovato
HELP=Inserisci il codice del porto
[DESPORTO]
GROUP=1210
X=24
Y=0
MSKID=F_DESPORTO
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=%POR KEY 2
INPUT=S0 F_DESPORTO
DISPLAY="Porto@50" S0~"Codice" CODTAB
OUTPUT=F_CODPORTO CODTAB~F_DESPORTO S0
WARNING=Codice porto non trovato
HELP=Inserisci il codice del porto
[CODNOTESP1]
GROUP=1300
X=2
Y=0
FIELDNAME=CODNOTESP1
MSKID=F_CODNOTESP1
TYPE=T_STRINGA
PROMPT="Note spe.1'"
SIZE=3
FLAG=U
USE=%NDO
INPUT=CODTAB F_CODNOTESP1
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODNOTESP1 CODTAB~F_DESNOTESP1 S0
[DESNOTESP1]
GROUP=1300
X=24
Y=0
MSKID=F_DESNOTESP1
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=%NDO KEY 2
INPUT=S0 F_DESNOTESP1
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=F_CODNOTESP1 CODTAB~F_DESNOTESP1 S0
[CODNOTESP2]
GROUP=1300
X=2
Y=1
FIELDNAME=CODNOTESP2
MSKID=F_CODNOTESP2
TYPE=T_STRINGA
PROMPT="Note spe.2'"
SIZE=3
FLAG=U
USE=%NDO
INPUT=CODTAB F_CODNOTESP2
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODNOTESP2 CODTAB~F_DESNOTESP2 S0
[DESNOTESP2]
GROUP=1300
X=24
Y=1
MSKID=F_DESNOTESP2
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=%NDO KEY 2
INPUT=S0 F_DESNOTESP2
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=F_CODNOTESP2 CODTAB~F_DESNOTESP2 S0
[CAUSTRASP]
GROUP=1400
X=2
Y=0
FIELDNAME=CAUSTRASP
MSKID=F_CAUSTRASP
TYPE=T_STRINGA
PROMPT="Caus.trasp."
SIZE=3
FLAG=U
USE=%CTR
INPUT=CODTAB F_CAUSTRASP
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CAUSTRASP CODTAB~F_DENCAUSTRASP S0
WARNING=Codice di causale non trovato
HELP=Inserisci il codice dalla causale del trasporto
[DENCAUSTRASP]
GROUP=1400
X=24
Y=0
MSKID=F_DENCAUSTRASP
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=%CTR KEY 2
INPUT=S0 F_DENCAUSTRASP
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=F_CAUSTRASP CODTAB~F_DENCAUSTRASP S0
WARNING=Codice di causale non trovato
HELP=Inserisci il codice dalla causale del trasporto
[CODVETT1]
GROUP=1500
X=2
Y=0
FIELDNAME=CODVETT1
MSKID=F_CODVETT1
TYPE=T_STRINGA
PROMPT="Vettore 1' "
SIZE=6
FLAG=ZU
USE=%VET
INPUT=CODTAB F_CODVETT1
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODVETT1 CODTAB~F_NOMEVETT1 S0
WARNING=Codice primo vettore non trovato
HELP=Inserisci il codice del primo (o unico) vettore
[NOMEVETT1]
GROUP=1500
X=24
Y=0
MSKID=F_NOMEVETT1
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=%VET KEY 2
INPUT=S0 F_NOMEVETT1
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=F_CODVETT1 CODTAB~F_NOMEVETT1 S0
WARNING=Codice primo vettore non trovato
HELP=Inserisci il codice del primo (o unico) vettore
[CODVETT2]
GROUP=1500
X=2
Y=1
FIELDNAME=CODVETT2
MSKID=F_CODVETT2
TYPE=T_STRINGA
PROMPT="Vettore 2' "
SIZE=6
FLAG=ZU
USE=%VET
INPUT=CODTAB F_CODVETT2
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODVETT2 CODTAB~F_NOMEVETT2 S0
WARNING=Codice secondo vettore non trovato
HELP=Inserisci il codice del secondo vettore
[NOMEVETT2]
GROUP=1500
X=24
Y=1
MSKID=F_NOMEVETT2
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=%VET KEY 2
INPUT=S0 F_NOMEVETT2
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=F_CODVETT2 CODTAB~F_NOMEVETT2 S0
WARNING=Codice primo vettore non trovato
HELP=Inserisci il codice del primo (o unico) vettore
[CODVETT3]
GROUP=1500
X=2
Y=2
FIELDNAME=CODVETT3
MSKID=F_CODVETT3
TYPE=T_STRINGA
PROMPT="Vettore 3' "
SIZE=6
FLAG=ZU
USE=%VET
INPUT=CODTAB F_CODVETT3
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODVETT3 CODTAB~F_NOMEVETT3 S0
WARNING=Codice terzo vettore non trovato
HELP=Inserisci il codice del terzo vettore
[NOMEVETT3]
GROUP=1500
X=24
Y=2
MSKID=F_NOMEVETT3
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=%VET KEY 2
INPUT=S0 F_NOMEVETT3
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=F_CODVETT3 CODTAB~F_NOMEVETT3 S0
WARNING=Codice primo vettore non trovato
HELP=Inserisci il codice del primo (o unico) vettore
[CODNOTE]
GROUP=2500
X=2
Y=0
FIELDNAME=CODNOTE
MSKID=F_CODNOTE
TYPE=T_STRINGA
PROMPT="Cod. Note "
SIZE=2
USE=%NOT
INPUT=CODTAB F_CODNOTE
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODNOTE CODTAB~F_NOTECLI S0
WARNING=Note clienti assenti
[NOTECLI]
GROUP=2500
X=24
Y=0
FIELDNAME=NOTE
MSKID=F_NOTECLI
TYPE=T_ZOOM
PROMPT=""
SIZE=7750
USE=%NOT KEY 2
INPUT=S0 F_NOTECLI
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=F_CODNOTE CODTAB~F_NOTECLI S0
[NCOPIE]
GROUP=1600
X=2
Y=0
FIELDNAME=NCOPIE
MSKID=F_NCOPIE
TYPE=T_NUMERO
PROMPT="Num. copie "
SIZE=0200
[GRPARTENZA]
GROUP=1700
X=1
Y=0
MSKID=DLG_NULL
TYPE=T_CORNICE
PROMPT=Partenza
SIZE=3503
[DATAPART]
GROUP=1700
X=2
Y=1
FIELDNAME=DATAPART
MSKID=F_DATAPART
TYPE=T_DATA
PROMPT="Data "
HELP=Inserisci la data di partenza nel formato gg-mm-aaaa
[ORAPART]
GROUP=1700
X=22
Y=1
FIELDNAME=ORAPART
MSKID=F_ORAPART
TYPE=T_STRINGA
PROMPT="Ora "
SIZE=0400
WARNING=Orario di partenza errato
HELP=Orario di partenza nel formato oo:mm (24 ore)
[IMPPAGATO]
GROUP=1800
X=2
Y=0
FIELDNAME=IMPPAGATO
MSKID=F_IMPPAGATO
TYPE=T_CURRENCY
PROMPT="Importo pagato "
SIZE=18
SPECIAL=DRIVENBY F_CODVAL
[ACCSALDO]
GROUP=1800
X=45
Y=0
FIELDNAME=ACCSALDO
MSKID=F_ACCSALDO
TYPE=T_CHECKBOX
PROMPT="Acconto/saldo "
[DOC1]
GROUP=1900
X=2
Y=0
FIELDNAME=DOC1
MSKID=F_DOC1
TYPE=T_MEMO
PROMPT="Documento 1 "
SIZE=50
[DOC2]
GROUP=1900
X=2
Y=1
FIELDNAME=DOC2
MSKID=F_DOC2
TYPE=T_MEMO
PROMPT="Documento 2 "
SIZE=50
[DOC3]
GROUP=1900
X=2
Y=2
FIELDNAME=DOC3
MSKID=F_DOC3
TYPE=T_MEMO
PROMPT="Documento 3 "
SIZE=50
[DATACONS]
GROUP=2000
X=2
Y=0
FIELDNAME=DATACONS
MSKID=F_DATACONS
TYPE=T_DATA
PROMPT="Data consegna "
SPECIAL=CH REQUIRED
[ASPBENI1]
GROUP=2100
X=2
Y=0
FIELDNAME=ASPBENI1
MSKID=F_ASPBENI1
TYPE=T_STRINGA
PROMPT="Asp.beni 1 "
SIZE=3
FLAG=U
USE=%ABE
INPUT=CODTAB F_ASPBENI1
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_ASPBENI1 CODTAB~F_DESCRBENI1 S0
[DESCRBENI1]
GROUP=2100
X=24
Y=0
MSKID=F_DESCRBENI1
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=%ABE KEY 2
INPUT=S0 F_DESCRBENI1
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=F_ASPBENI1 CODTAB~F_DESCRBENI1 S0
[ASPBENI2]
GROUP=2100
X=2
Y=1
FIELDNAME=ASPBENI2
MSKID=F_ASPBENI2
TYPE=T_STRINGA
PROMPT="Asp.beni 2 "
SIZE=3
FLAG=U
USE=%ABE
INPUT=CODTAB F_ASPBENI2
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_ASPBENI2 CODTAB~F_DESCRBENI2 S0
WARNING=Codice aspetto beni non trovato
HELP=Inserisci il codice aspetto dei beni
[DESCRBENI2]
GROUP=2100
X=24
Y=1
MSKID=F_DESCRBENI2
TYPE=T_STRINGA
PROMPT=""
SIZE=50
USE=%ABE KEY 2
INPUT=S0 F_DESCRBENI2
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
OUTPUT=F_ASPBENI2 CODTAB~F_DESCRBENI2 S0
[IMPNETTI]
GROUP=2200
X=2
Y=0
FIELDNAME=IMPNETTI
MSKID=F_IMPNETTI
TYPE=T_CHECKBOX
PROMPT="Importi netti "
[SPESEINC]
GROUP=2400
X=2
Y=0
FIELDNAME=PERCSPINC
MSKID=151
TYPE=T_NUMERO
PROMPT="% spese incasso "
SIZE=602
[ADDBOLLI]
GROUP=2400
X=40
Y=0
FIELDNAME=ADDBOLLI
MSKID=F_ADDBOLLI
TYPE=T_CHECKBOX
PROMPT="Addebito bolli "
[UMPNETTO]
GROUP=2700
X=2
Y=0
FIELDNAME=UMPNETTO
MSKID=F_UMPNETTO
TYPE=T_STRINGA
PROMPT="Peso netto : U.M. "
SIZE=2
FLAG=U
USE=%UMS
INPUT=CODTAB F_UMPNETTO
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_UMPNETTO CODTAB
WARNING=Codice unita di misura del peso netto non trovato
HELP=Inserisci il codice unita di misura del peso netto
[PNETTO]
GROUP=2700
X=26
Y=0
FIELDNAME=PNETTO
MSKID=F_PNETTO
TYPE=T_NUMERO
PROMPT="Peso "
SIZE=1502
FLAG=R
WARNING=Peso netto non corretto o non presente !!!
HELP=Inserisci il peso netto della merce
[DESUMPNETTO]
GROUP=2700
X=2
Y=1
MSKID=F_DESUMPNETTO
TYPE=T_STRINGA
PROMPT="Unita' di misura del peso netto "
SIZE=25
[UMTARA]
GROUP=2710
X=2
Y=0
FIELDNAME=UMTARA
MSKID=F_UMTARA
TYPE=T_STRINGA
PROMPT="Tara : U.M. "
SIZE=2
FLAG=U
USE=%UMS
INPUT=CODTAB F_UMTARA
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_UMTARA CODTAB
WARNING=Codice unita di misura non trovato
HELP=Inserisci il codice unita di misura della tara
[TARA]
GROUP=2710
X=26
Y=0
FIELDNAME=TARA
MSKID=F_TARA
TYPE=T_NUMERO
PROMPT="Peso "
SIZE=1502
FLAG=R
WARNING=Tara errata o non presente !!!
HELP=Inserisci la tara della merce
[DESUMTARA]
GROUP=2710
X=2
Y=1
MSKID=F_DESUMTARA
TYPE=T_STRINGA
PROMPT="Unita' di misura della tara "
SIZE=25
[NCOLLI]
GROUP=2800
X=2
Y=0
FIELDNAME=NCOLLI
MSKID=F_NCOLLI
TYPE=T_NUMERO
PROMPT="Num. colli "
SIZE=0700
WARNING=Numero di colli errato o non presente !!!
HELP=Inserisci il numero dei colli
[CAUSMAG]
GROUP=2900
X=2
Y=0
FIELDNAME=CAUSMAG
MSKID=F_CAUSMAG
TYPE=T_STRINGA
PROMPT="Caus.magazzino "
USE=%CAU
INPUT=CODTAB F_CAUSMAG
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CAUSMAG CODTAB~F_DESCRMAG S0~F_CAUSMAGC S9
WARNING=Causale di magazzino non trovata
SIZE=5
FLAG=U
WARNING=Codice causale non trovato
HELP=Inserisci il codice della causale
[DESCRMAG]
GROUP=2900
X=25
Y=0
MSKID=F_DESCRMAG
TYPE=T_STRINGA
PROMPT=""
USE=%CAU KEY 2
INPUT=S0 F_DESCRMAG
DISPLAY="Descrizione@50" S0~"Codice" CODTAB
COPY=OU F_CAUSMAG
SIZE=50
[CAUSMAGC]
GROUP=2900
X=2
Y=1
MSKID=F_CAUSMAGC
TYPE=T_STRINGA
PROMPT="Caus.mag.coll. "
USE=%CAU
INPUT=CODTAB F_CAUSMAGC
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CAUSMAGC CODTAB~F_DESCRMAGC S0
WARNING=Causale di magazzino non trovata
SIZE=5
FLAG=UDG
HELP=Inserisci il codice della causale
SPECIAL=CH NORMAL
[DESCRMAGC]
GROUP=2900
X=25
Y=1
MSKID=F_DESCRMAGC
TYPE=T_STRINGA
PROMPT=""
SIZE=50
[CUP]
GROUP=3000
X=2
Y=1
MSKID=F_CUP
TYPE=T_STRINGA
PROMPT="Cod.Unico Prog."
FIELDNAME=CUP
USE=%CUP
INPUT=CODTAB F_CUP
DISPLAY="Codice@15" CODTAB~"Descrizione@50" S0
OUTPUT=F_CUP CODTAB~F_DESCRCUP S0
WARNING=Codice Unico di Progetto non trovato
SIZE=15
FLAG=U
HELP=Inserisci il Codice Unico di Progetto
SPECIAL=CH NORMAL
[DESCRCUP]
GROUP=3000
X=35
Y=1
MSKID=F_DESCRCUP
TYPE=T_STRINGA
PROMPT=""
USE=%CUP KEY 2
INPUT=S0 F_DESCRCUP
DISPLAY="Descrizione@50" S0~"Codice@15" CODTAB
COPY=OU F_CUP
SIZE=50 40
[CIG]
GROUP=3000
X=2
Y=2
MSKID=F_CIG
TYPE=T_STRINGA
PROMPT="Cod.Ident.Gara "
FIELDNAME=CIG
USE=%CIG
INPUT=CODTAB F_CIG
DISPLAY="Codice@10" CODTAB~"Descrizione@50" S0
OUTPUT=F_CIG CODTAB~F_DESCRCIG S0
WARNING=Codice Identificativo Gara non trovato
SIZE=10
FLAG=U
HELP=Inserisci il Codice Identificativo Gara
SPECIAL=CH NORMAL
[DESCRCIG]
GROUP=3000
X=35
Y=2
MSKID=F_DESCRCIG
TYPE=T_STRINGA
PROMPT=""
USE=%CIG KEY 2
INPUT=S0 F_DESCRCIG
DISPLAY="Descrizione@50" S0~"Codice@10" CODTAB
COPY=OU F_CIG
SIZE=50 40
[CMSH]
GROUP=3000
X=2
Y=3
MSKID=F_CMSH
TYPE=T_STRINGA
PROMPT=""
FIELDNAME=CODCMS
FLAG=H
SIZE=20
[LVGROUP]
GROUP=4041
X=1
Y=0
MSKID=F_LVGROUP
TYPE=T_CORNICE
SIZE=7908
PROMPT=""
[LVCODNUM]
GROUP=4041
X=2
Y=1
FIELDNAME=CODNUM
MSKID=F_CODNUM
TYPE=T_STRINGA
SIZE=4
PROMPT="Cod. Num. "
FLAG=GDU
USE=%NUM
INPUT=CODTAB F_CODNUM
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_DESNUM S0
SPECIAL=CH NORMAL~ME CO,2@
[LVDESNUM]
GROUP=4041
X=18
Y=1
MSKID=F_DESNUM
TYPE=T_STRINGA
SIZE=43
PROMPT=""
FLAG=GD
SPECIAL=ME CO,3@
[LVSTATO]
GROUP=4041
X=71
Y=1
FIELDNAME=STATO
MSKID=F_STATO
TYPE=T_STRINGA
SIZE=1
PROMPT="Stato "
FLAG=GD
USE=%STD
INPUT=CODTAB F_STATO
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_STATO CODTAB
SPECIAL=CH NORMAL~ME CO,8@
[LVPROVV]
GROUP=4041
X=200
Y=1
FIELDNAME=PROVV
MSKID=F_PROVV
TYPE=T_STRINGA
SIZE=1
PROMPT="Provvisorio/Definitivo"
FLAG=D
[LVTIPODOC]
GROUP=4041
X=2
Y=2
FIELDNAME=TIPODOC
MSKID=F_TIPODOC
TYPE=T_STRINGA
SIZE=4
PROMPT="Tipo Doc. "
FLAG=GDU
USE=%TIP
INPUT=CODTAB F_TIPODOC
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_DESTIPODOC S0
SPECIAL=CH NORMAL~ME CO,4@
[LVDESTIPODOC]
GROUP=4041
X=18
Y=2
MSKID=F_DESTIPODOC
TYPE=T_STRINGA
SIZE=43
PROMPT=""
FLAG=GD
SPECIAL=ME CO,5@
[LVNDOC]
GROUP=4041
X=62
Y=2
FIELDNAME=NDOC
MSKID=F_NDOC
TYPE=T_NUMERO
SIZE=6
PROMPT="Num. Doc. "
FLAG=GDR
SPECIAL=ME CO,6@
[LVANNO]
GROUP=4041
X=2
Y=3
FIELDNAME=ANNO
MSKID=F_ANNO
TYPE=T_STRINGA
SIZE=4
PROMPT="Esercizio "
FLAG=GD
SPECIAL=ME CO,9@
[LVDATADOC]
GROUP=4041
X=18
Y=3
FIELDNAME=DATADOC
MSKID=F_DATADOC
TYPE=T_DATA
FLAG=A
SPECIAL=ME CO,7@
[LVGIORNO]
GROUP=4041
X=34
Y=3
MSKID=F_LVGIORNO
TYPE=T_STRINGA
PROMPT =""
SIZE=9
FLAG=D
[LVSETTIMANA]
GROUP=4041
X=44
Y=3
MSKID=F_LVSETTIMANA
TYPE=T_STRINGA
PROMPT="Settimana "
SIZE=1
FLAG=D
[LVTIPOCF]
GROUP=4041
X=200
Y=4
FIELDNAME=TIPOCF
MSKID=F_TIPOCF
TYPE=T_LISTA
ITEMS=C|Cliente
SIZE=9
PROMPT=""
FLAG=D
[LVCODCF]
GROUP=4041
X=2
Y=4
FIELDNAME=CODCF
MSKID=F_CODCF
TYPE=T_STRINGA
SIZE=6
PROMPT="Cliente "
FLAG=R
USE=LF_CLIFO
INPUT=TIPOCF "C"~CODCF F_CODCF
DISPLAY="Codice" CODCF~"Mnemonico" RICALT~"Ragione Sociale@50" RAGSOC
OUTPUT=F_CODCF CODCF~F_RAGSOC RAGSOC~F_LVRICALT RICALT
SPECIAL=CH REQUIRED~ADD RU cg0 -1 "C"~ME CO,10@
[LVRICALT]
GROUP=4041
X=23
Y=4
MSKID=F_LVRICALT
TYPE=T_STRINGA
SIZE=30
PROMPT=""
USE=LF_CLIFO KE 6
INPUT=TIPOCF "C"~RICALT F_LVRICALT
DISPLAY="Mnemonico" RICALT~"Codice" CODCF~"Ragione Sociale@50" RAGSOC
OUTPUT=@F_CODCF
[LVCODCONT]
GROUP=4041
X=66
Y=4
FIELDNAME=CODCONT
MSKID=F_LVCODCONT
TYPE=T_NUMERO
PROMPT="Contratto "
SIZE=2
FLAG=D
[LVRAGSOC]
GROUP=4041
X=2
Y=5
MSKID=F_RAGSOC
TYPE=T_STRINGA
SIZE=50
PROMPT="Ragione Sociale "
USE=LF_CLIFO KE 2
INPUT=TIPOCF "C"~RAGSOC F_RAGSOC
DISPLAY="Ragione Sociale@50" RAGSOC~"Codice" CODCF~"Mnemonico" RICALT
OUTPUT=@F_CODCF
SPECIAL=CH REQUIRED~ADD RU cg0 -1 "C"~ME CO,11@
[LVDATAPRCO]
GROUP=4041
X=2
Y=6
FIELDNAME=DATAPRCO
MSKID=F_LVDATAPRCO
TYPE=T_DATA
PROMPT="Data Prev. Consegna "
FLAG=D
SPECIAL=ME CO,7@~CH REQUIRED
[LVDATACON]
GROUP=4041
X=37
Y=6
FIELDNAME=DATACON
MSKID=F_LVDATACON
TYPE=T_DATA
PROMPT="Data Conteggio "
FLAG=D
SPECIAL=ME CO,7@
[LVCODCAU]
GROUP=4041
X=2
Y=8
MSKID=F_LVCODCAU
TYPE=T_STRINGA
PROMPT="Causale "
SIZE=5
FLAG=DU
[LVDESCAU]
GROUP=4041
X=19
Y=8
MSKID=F_LVDESCAU
TYPE=T_STRINGA
PROMPT=""
SIZE=50
FLAG=DU
[LVCODITI]
GROUP=4041
X=66
Y=6
FIELDNAME=CODITI
MSKID=F_LVCODITI
TYPE=T_STRINGA
PROMPT="Cod.Iti."
SIZE=3
FLAG=UZ
USE=&ITI
INPUT=CODTAB F_LVCODITI
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_LVCODITI CODTAB
[BLANK]
GROUP=4000
X=100
Y=0
MSKID=F_BLANK
TYPE=T_STRINGA
PROMPT=""
SIZE=1