Aggiornato file sorgente.

git-svn-id: svn://10.65.10.50/trunk@1849 c028cbd2-c16b-5b4b-a496-9718f37d4682

ve/ve0300a.src

@@ -109,7 +109,7 @@ PROMPT=Tipo cliente/fornitore
 //SPECIAL=JO LF_CFVEN TO LF_CLIFO KE 1 INTO TIPOCF=TIPOCF CODCF=CODCF
 //WARNING=Ragione sociale non trovata
 //HELP=Inserire la ragione sociale della ditta
-
+/*
    [OCFPI]
    // chiave per la ricerca cliente occasionale puo' essere P.IVA oppure C.F. oppure un progressivo
    // i dati precedenti vanno letti dal file 18 occas (ragsoc,indir,civ,stato,com,cap)
@@ -335,7 +335,6 @@ USE=%LNG
    INPUT=CODTAB F_CODLIN
    DISPLAY="Codice" CODTAB~"Descrizione@50" S0
    OUTPUT=F_CODLIN CODTAB~F_DESLIN S0
-SPECIAL=CH NORMAL
 
    [DESLIN]
    GROUP=300
@@ -744,11 +743,6 @@ MSKID=F_CODPORTO
    TYPE=T_STRINGA
    PROMPT="Cod. porto "
    SIZE=2
-USE=%POR
-INPUT=CODTAB 131
-DISPLAY="Codice" CODTAB~"Porto@50" S0
-OUTPUT=131 CODTAB~317 S0
-SPECIAL="Causale trasporto@50" S0
    WARNING=Codice porto non trovato
    HELP=Inserisci il codice del porto
 
@@ -817,7 +811,7 @@ HELP=Inserisci il codice del primo (o unico) vettore
 
    [NOMEVETT1]
    GROUP=1500
-X=20
+   X=24
    Y=0
    MSKID=F_NOMEVETT1
    TYPE=T_STRINGA
@@ -838,7 +832,7 @@ HELP=Inserisci il codice del secondo vettore
 
    [NOMEVETT2]
    GROUP=1500
-X=20
+   X=24
    Y=1
    MSKID=F_NOMEVETT2
    TYPE=T_STRINGA
@@ -859,7 +853,7 @@ WARNING=Codice terzo vettore non trovato
    HELP=Inserisci il codice del terzo vettore
    [NOMEVETT3]
    GROUP=1500
-X=20
+   X=24
    Y=2
    MSKID=F_NOMEVETT3
    TYPE=T_STRINGA
@@ -888,7 +882,7 @@ HELP=Inserisci la data di partenza nel formato gg-mm-aaaa
 
    [ORAPART]
    GROUP=1700
-X=32
+   X=37
    Y=0
    FIELDNAME=ORAPART
    MSKID=F_ORAPART
@@ -901,7 +895,7 @@ HELP=Inserisci l'orario di partenza nel formato oo:mm (24 ore)
    [IMPPAGATO]
    GROUP=1800
    X=1
-Y=1
+   Y=0
    FIELDNAME=IMPPAGATO
    MSKID=F_IMPPAGATO
    TYPE=T_NUMERO
@@ -910,8 +904,8 @@ SIZE=1802
 
    [ACCSALDO]
    GROUP=1800
-X=1
+   X=37
-Y=2
+   Y=0
    FIELDNAME=ACCSALDO
    MSKID=F_ACCSALDO
    TYPE=T_CHECKBOX
@@ -920,7 +914,7 @@ PROMPT="Acconto/saldo "
    [DOC1]
    GROUP=1900
    X=1
-Y=1
+   Y=0
    FIELDNAME=DOC1
    MSKID=F_DOC1
    TYPE=T_STRINGA
@@ -930,7 +924,7 @@ SIZE=12
    [DOC2]
    GROUP=1900
    X=1
-Y=2
+   Y=1
    FIELDNAME=DOC2
    MSKID=F_DOC2
    TYPE=T_STRINGA
@@ -940,7 +934,7 @@ SIZE=12
    [DOC3]
    GROUP=1900
    X=1
-Y=3
+   Y=2
    FIELDNAME=DOC3
    MSKID=F_DOC3
    TYPE=T_STRINGA
@@ -950,7 +944,7 @@ SIZE=12
    [DATACONS]
    GROUP=2000
    X=1
-Y=1
+   Y=0
    FIELDNAME=DATACONS
    MSKID=F_DATACONS
    TYPE=T_DATA
@@ -959,7 +953,7 @@ PROMPT="Data consegna "
    [ASPBENI1]
    GROUP=2100   
    X=1
-Y=1
+   Y=0
    FIELDNAME=ASPBENI1
    MSKID=F_ASPBENI1
    TYPE=T_STRINGA
@@ -969,21 +963,21 @@ SIZE=2
    [DESCRBENI1]
    GROUP=2100
    X=1
-Y=2
+   Y=1          
    MSKID=F_DESCRBENI1
    TYPE=T_STRINGA
-PROMPT=Descrizione beni 1
+   PROMPT="Descrizione beni 1 "
    SIZE=50
    FLAG=U
 
    [ASPBENI2]
    GROUP=2100
    X=1
-Y=3
+   Y=2
    FIELDNAME=ASPBENI2
    MSKID=F_ASPBENI2
    TYPE=T_STRINGA
-PROMPT=Aspetto beni 2
+   PROMPT="Aspetto beni 2     "
    SIZE=2
    WARNING=Codice aspetto beni non trovato
    HELP=Inserisci il codice dell'aspetto dei beni
@@ -991,10 +985,10 @@ HELP=Inserisci il codice dell'aspetto dei beni
    [DESCRBENI2]
    GROUP=2100
    X=1
-Y=4
+   Y=3  
    MSKID=F_DESCRBENI2
    TYPE=T_STRINGA
-PROMPT=Descrizione beni 2
+   PROMPT="Descrizione beni 2 "
    SIZE=50
    FLAG=U
 
@@ -1005,7 +999,7 @@ Y=1
    FIELDNAME=IMPNETTI
    MSKID=F_IMPNETTI
    TYPE=T_CHECKBOX
-PROMPT=Importi netti
+   PROMPT="Importi netti "
 
    [RAGGREFF]
    GROUP=2300
@@ -1014,7 +1008,7 @@ Y=1
    FIELDNAME=RAGGREFF
    MSKID=150
    TYPE=T_CHECKBOX
-PROMPT=Raggruppamento effetti
+   PROMPT="Raggruppamento effetti "
 
    [SPESEINC]
    GROUP=2400
@@ -1023,7 +1017,7 @@ Y=1
    FIELDNAME=SPESEINC
    MSKID=151
    TYPE=T_CHECKBOX
-PROMPT=Spese all'incasso
+   PROMPT="Spese all'incasso "
 
    [ADDBRB]
    GROUP=2500
@@ -1032,7 +1026,7 @@ Y=1
    FIELDNAME=ADDBRB
    MSKID=F_ADDBRB
    TYPE=T_CHECKBOX
-PROMPT=Addebito bolli ricevute bancarie
+   PROMPT="Addebito bolli ricevute bancarie "
 
    [ADDBTR]
    GROUP=2500
@@ -1041,7 +1035,7 @@ Y=2
    FIELDNAME=ADDBTR
    MSKID=F_ADDBTR
    TYPE=T_CHECKBOX
-PROMPT=Addebito bolli tratte
+   PROMPT="Addebito bolli tratte "
 
    [ADDBDE]
    GROUP=2500
@@ -1050,56 +1044,56 @@ Y=3
    FIELDNAME=ADDBDE
    MSKID=F_ADDBDE
    TYPE=T_CHECKBOX
-PROMPT=Addebito bolli debiti esteri
+   PROMPT="Addebito bolli debiti esteri "
 
    [CODIVABRB]
    GROUP=2600
    X=1
-Y=1
+   Y=0
    FIELDNAME=CODIVABRB
    MSKID=F_CODIVABRB
    TYPE=T_STRINGA
-PROMPT=Codice iva bolli ricevute bancarie
+   PROMPT="Codice iva bolli ricevute bancarie "
    SIZE=4
 
    [CODIVABTR]
    GROUP=2600
    X=1
-Y=2
+   Y=1
    FIELDNAME=CODIVABTR
    MSKID=F_CODIVABTR
    TYPE=T_STRINGA
-PROMPT=Codice iva bolli tratte
+   PROMPT="Codice iva bolli tratte            "
    SIZE=4
 
    [CODIVABTRE]
    GROUP=2600
    X=1
-Y=3
+   Y=2
    FIELDNAME=CODIVABTRE
    MSKID=F_CODIVABTRE
    TYPE=T_STRINGA
-PROMPT=Codice iva bolli tratte estere
+   PROMPT="Codice iva bolli tratte estere     "
    SIZE=4
 
    [CODIVABDE]
    GROUP=2600
    X=1
-Y=4
+   Y=3
    FIELDNAME=CODIVABDE
    MSKID=F_CODIVABDE
    TYPE=T_STRINGA
-PROMPT=Codice iva bolli esteri
+   PROMPT="Codice iva bolli esteri            "
    SIZE=4
 
    [UMTARA]
    GROUP=2700
    X=1
-Y=1
+   Y=0
    FIELDNAME=UMTARA
    MSKID=F_UMTARA
    TYPE=T_STRINGA
-PROMPT=Codice Unità misura tara
+   PROMPT="Codice unità misura tara       "
    SIZE=2
    WARNING=Codice unità di misura non trovato
    HELP=Inserisci il codice dell'unità di misura della tara
@@ -1107,11 +1101,11 @@ HELP=Inserisci il codice dell'unit
    [TARA]
    GROUP=2700
    X=1
-Y=2
+   Y=1
    FIELDNAME=TARA
    MSKID=F_TARA
    TYPE=T_NUMERO
-PROMPT=Tara
+   PROMPT="Tara                           "
    SIZE=1502
    FLAG=R
    WARNING=Tara errata o non presente !!!
@@ -1123,18 +1117,18 @@ X=1
    Y=3
    MSKID=F_DESUMTARA
    TYPE=T_STRINGA
-PROMPT=Unità di misura della tara
+   PROMPT="Unità di misura della tara     "
    SIZE=25
    FLAG=U
 
    [UMPNETTO]
    GROUP=2700
    X=1
-Y=4
+   Y=3
    FIELDNAME=UMPNETTO
    MSKID=F_UMPNETTO
    TYPE=T_STRINGA
-PROMPT=Codice Unità misura peso netto
+   PROMPT="Codice Unità misura peso netto "
    SIZE=2
    WARNING=Codice unità di misura del peso netto non trovato
    HELP=Inserisci il codice dell'unità di misura del peso netto
@@ -1142,11 +1136,11 @@ HELP=Inserisci il codice dell'unit
    [PNETTO]
    GROUP=2700
    X=1
-Y=5
+   Y=4
    FIELDNAME=PNETTO
    MSKID=F_PNETTO
    TYPE=T_NUMERO
-PROMPT=Peso netto
+   PROMPT="Peso netto                     "
    SIZE=1502
    FLAG=R
    WARNING=Peso netto non corretto o non presente !!!
@@ -1158,18 +1152,18 @@ X=1
    Y=6
    MSKID=F_DESUMPNETTO
    TYPE=T_STRINGA
-PROMPT=Unità di misura del peso netto
+   PROMPT="Unità di misura peso netto     "
    SIZE=25
    FLAG=U
 
    [NCOLLI]
    GROUP=2800
    X=1
-Y=1
+   Y=0
    FIELDNAME=NCOLLI
    MSKID=F_NCOLLI       
    TYPE=T_NUMERO
-PROMPT=Numero colli
+   PROMPT="Numero colli "
    SIZE=0700
    WARNING=Numero di colli errato o non presente !!!
    HELP=Inserisci il numero dei colli
@@ -1177,11 +1171,11 @@ HELP=Inserisci il numero dei colli
    [CAUSMAG1]
    GROUP=2900           
    X=1
-Y=1
+   Y=0
    FIELDNAME=CAUSMAG1
    MSKID=F_CAUSMAG1
    TYPE=T_STRINGA
-PROMPT=Codice causale di magazzino 1
+   PROMPT="Cod. causale di mag. 1 "
    SIZE=3
    FLAG=U
    WARNING=Codice causale non trovato
@@ -1193,18 +1187,18 @@ X=1
    Y=2
    MSKID=F_DESCRMAG1
    TYPE=T_STRINGA
-PROMPT=Causale di magazzino 1
+   PROMPT="Causale di magazzino 1 "
    SIZE=50
    FLAG=U
 
    [CAUSMAG2]
-GROUP=29
+   GROUP=2900
    X=1
-Y=3
+   Y=2
    FIELDNAME=CAUSMAG2
    MSKID=F_CAUSMAG2
    TYPE=T_STRINGA
-PROMPT=Codice causale di magazzino 2
+   PROMPT="Cod. causale di mag. 2 "
    SIZE=3
    FLAG=U
    WARNING=Codice causale non trovato
@@ -1216,7 +1210,7 @@ X=1
    Y=4
    MSKID=F_DESCRMAG2
    TYPE=T_STRINGA
-PROMPT=Causale di magazzino 2
+   PROMPT="Causale di magazzino 2 "
    SIZE=50
    FLAG=U