aggiornato modulo fattura Buffetti 8904 M200 ed aggiunti in profilo fattura i campi porto,causale trasporto, N. e data documento di riferimento

git-svn-id: svn://10.65.10.50/trunk@5492 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
pirro 1997-10-30 10:24:55 +00:00
parent be796cb258
commit 2952da11a7
2 changed files with 184 additions and 136 deletions

View File

@ -71,12 +71,16 @@ DESCONT = S_DISABILITATO //810
CODCAMP = S_NORMALE //820
DESCAMP = S_DISABILITATO //820
SCONTOPERC = S_NORMALE //830
DATADOCRIF = S_NORMALE //1000
NUMDOCRIF = S_NORMALE //1000
CODAG = S_NORMALE //1100
DESAG = S_NORMALE //1100
CODZON = S_NORMALE //1100
DESZON = S_NORMALE //1100
CODPORTO = S_NORMALE //1210
DESPORTO = S_NORMALE //1210
CAUSTRASP = S_NORMALE //1400
DENCAUSTRASP = S_NORMALE //1400
CODVETT1 = S_NORMALE //1500
CODVETT2 = S_NASCOSTO //1500
CODVETT3 = S_NASCOSTO //1500
@ -144,8 +148,10 @@ NHANDLER=0
810 = S_NORMALE
820 = S_NORMALE
830 = S_NORMALE
1000 = S_NORMALE
1100 = S_NORMALE
1210 = S_NORMALE
1400 = S_NORMALE
1500 = S_NORMALE
1600 = S_NASCOSTO
1800 = S_NORMALE
@ -156,7 +162,7 @@ NHANDLER=0
4000 = S_NORMALE
[ORDINEGRUPPI]
NGROUPS=17
NGROUPS=21
1=100
2=200
3=300
@ -168,10 +174,13 @@ NGROUPS=17
9=810
10=820
11=830
12=1100
13=1800
14=1900
15=2200
16=2300
17=2400
12=1000
13=1100
14=1210
15=1400
16=1800
17=1900
18=2200
20=2300
21=2400

View File

@ -11,6 +11,7 @@ JOIN %POR TO 33 ALIAS 203 INTO CODTAB==CODPORTO
JOIN %BAN TO 33 ALIAS 204 INTO CODTAB==CODABIA+CODCABA
JOIN %VET TO 33 ALIAS 205 INTO CODTAB==CODVETT1
JOIN %ASP TO 33 ALIAS 206 INTO CODTAB==ASPBENI1
JOIN %CTR TO 33 ALIAS 207 INTO CODTAB==CAUSTRASP
END
@ -37,9 +38,9 @@ BEGIN
FONT "Courier New"
SIZE 12
MODULE "BUFFETTI_FATTURA_01"
PRI_DECIMALS 0 3
PRI_DECIMALS 0 2
QTA_DECIMALS 3 3
IMP_DECIMALS 0 3
IMP_DECIMALS 0 2
EXCLUDE ","
END
@ -74,29 +75,29 @@ BEGIN
MESSAGE _DITTA,!COM
END
STRINGA 5 5 1
STRINGA 5 8 1
BEGIN
KEY "scritta P.IVA"
PROMPT 3 7 "P.IVA"
PROMPT 3 7 "P.IVA IT"
END
STRINGA 6 16 1
BEGIN
KEY "partita iva ditta"
PROMPT 9 7 ""
PROMPT 12 7 ""
MESSAGE _DITTA,!IVA
END
STRINGA 7 9 1
STRINGA 7 12 1
BEGIN
KEY "scritta COD.FISC."
PROMPT 3 8 "COD.FISC."
PROMPT 3 8 "COD.FISC. IT"
END
STRINGA 8 16 1
BEGIN
KEY "codice fiscale ditta"
PROMPT 13 8 ""
PROMPT 16 8 ""
MESSAGE _DITTA,!CF
END
@ -105,6 +106,7 @@ BEGIN
KEY "reg.soc.trib...."
PROMPT 3 9 "REG.SOC.TRIB.R.E. "
MESSAGE _DITTA,!REGSOC
FLAGS "D"
END
NUMERO 10 30 1
@ -112,19 +114,20 @@ BEGIN
KEY "c.c.i.a.a. ....."
PROMPT 3 10 "C.C.I.A.A. "
MESSAGE _DITTA,!CCIAA
FLAGS "D"
END
STRINGA 11 10 1
BEGIN
KEY "data fattura"
PROMPT 61 21 ""
FILED 33->DATADOC
PROMPT 58 21 ""
FIELD 33->DATADOC
END
STRINGA 12 7
BEGIN
KEY "numero fattura"
PROMPT 74 21 ""
PROMPT 73 21 ""
FIELD 33->NDOC
END
@ -192,10 +195,10 @@ BEGIN
MESSAGE _CLIENTE,!INDNUM
END
STRINGA 22 3
STRINGA 22 2
BEGIN
KEY "Numero di pagina"
PROMPT 74 10 ""
PROMPT 80 21 ""
MESSAGE _PAGENO
END
@ -220,75 +223,111 @@ BEGIN
MESSAGE _CLIENTE,!COM->PROVCOM
END
STRINGA 26 3 1
BEGIN
KEY "cliente codice stato"
PROMPT 44 17 ""
MESSAGE _CLIENTE,STATOCF
FLAGS "H"
END
STRINGA 27 25 1
BEGIN
KEY "cliente nome stato"
PROMPT 44 17 ""
MESSAGE _TABLEREAD,%STA,#26,S0
END
STRING 28 11 1
BEGIN
KEY "partita iva cliente"
PROMPT 37 23 ""
MESSAGE _CLIENTE,PAIV
END
STRING 29 2 1
BEGIN
KEY "codice iso iva cliente"
PROMPT 34 23 ""
MESSAGE _CLIENTE,STATOPAIV
END
STRING 30 15
BEGIN
KEY "causale di trasporto"
PROMPT 67 23 ""
FIELD 207@->S0
END
END
SECTION BODY ODD 5
STRINGA 51 13 1
STRINGA 51 12 1
BEGIN
KEY "codice articolo"
FIELD 34->CODART
PROMPT 2 1 ""
END
STRINGA 52 25 4
STRINGA 52 20 4
BEGIN
KEY "descrizione articolo"
MESSAGE _DESCRIGA
PROMPT 17 1 ""
PROMPT 16 1 ""
END
STRINGA 53 2
BEGIN
KEY "unita' di misura"
PROMPT 42 1 ""
PROMPT 37 1 ""
FIELD 34->UMQTA
MESSAGE _ALIGN,#52,BOTTOM
END
NUMBER 54 10
NUMBER 54 9
BEGIN
KEY "quantita'"
PROMPT 45 1 ""
PROMPT 40 1 ""
FIELD 34->QTA
PICTURE "######"
PICTURE "#########"
GROUP 30
MESSAGE _ALIGN,#52,BOTTOM
END
NUMBER 55 15
NUMBER 55 12
BEGIN
KEY "prezzo unitario"
PROMPT 56 1 ""
PICTURE "###.###.###.###"
PROMPT 49 1 ""
FIELD 34->PREZZO
PICTURE "###.###.###"
GROUP 29
MESSAGE _ALIGN,#52,BOTTOM
END
STRINGA 56 25
STRINGA 56 3
BEGIN
KEY "sconto"
PROMPT 72 1 ""
PROMPT 62 1 ""
FIELD 34->SCONTO
MESSAGE _ALIGN,#52,BOTTOM
FLAGS "D"
END
NUMBER 57 15
NUMBER 57 12
BEGIN
KEY "importo netto"
PROMPT 68 1 ""
FLAGS "H"
GROUP 29
PROMPT 66 1 ""
FIELD 34->IMPNN
PICTURE "###.###.###.###"
PICTURE "###.###.###"
GROUP 29
MESSAGE _ALIGN,#52,BOTTOM
END
STRINGA 58 4
STRINGA 58 3
BEGIN
KEY "iva"
PROMPT 81 1 ""
PROMPT 79 1 ""
FIELD 34->CODIVA
MESSAGE _ALIGN,#52,BOTTOM
END
@ -328,7 +367,7 @@ END
END
SECTION FOOTER ODD 13
SECTION FOOTER ODD -52
STRINGA 81 5 1
BEGIN
@ -338,24 +377,23 @@ END
END
SECTION FOOTER LAST 13
SECTION FOOTER LAST -52
NUMBER 101 15
NUMBER 101 12
BEGIN
KEY "spese"
PROMPT 56 3 ""
PICTURE "###.###.###.###"
FIELD TOTSPE
FLAGS "H"
PROMPT 69 1 ""
PICTURE "###.###.###"
FIELD SPESE
GROUP 31
END
NUMBER 102 15
BEGIN
KEY "spese di trasporto"
PROMPT 56 3 ""
PICTURE "###.###.###.###"
// Aggiungere il campo per le spese di trasporto
PROMPT 56 1 ""
PICTURE "###.###.###"
FIELD SPESE
FLAGS "H"
GROUP 31
END
@ -363,297 +401,298 @@ END
NUMBER 103 15
BEGIN
KEY "spese di imballo"
PROMPT 56 4 ""
PICTURE "###.###.###.###"
// Aggiungere il campo per le spese di imballo
PROMPT 56 1 ""
PICTURE "###.###.###"
FIELD SPESE
FLAGS "H"
GROUP 31
END
NUMBER 104 15
NUMBER 104 8
BEGIN
KEY "spese di incasso"
PROMPT 56 5 ""
PICTURE "###.###.###.###"
FIELD SPESEINC
PROMPT 55 11 ""
PICTURE "###.###"
FIELD SPESINC
GROUP 31
END
NUMBER 105 11
BEGIN
KEY "spese bolli"
PROMPT 60 6 ""
PROMPT 60 11 ""
FIELD BOLLI
GROUP 31
FLAGS "D"
END
STRING 106 4
STRING 106 3
BEGIN
KEY "codice iva 1"
PROMPT 2 2 ""
PROMPT 1 3 ""
MESSAGE _RIEPILOGOIVA,1,COD,0
END
NUMBER 107 15
NUMBER 107 12
BEGIN
KEY "imponibile 1"
PROMPT 7 2 ""
PROMPT 6 3 ""
MESSAGE _RIEPILOGOIVA,1,IMP,0
PICTURE "###.###.###.###"
PICTURE "###.###.###"
GROUP 31
END
NUMBER 108 5
NUMBER 108 2
BEGIN
KEY "iva 1"
PROMPT 23 2 ""
PROMPT 18 3 ""
MESSAGE _RIEPILOGOIVA,1,ALI,0
PICTURE "##,@@"
PICTURE "##"
END
NUMBER 109 15
NUMBER 109 10
BEGIN
KEY "imposta 1"
PROMPT 28 2 ""
PROMPT 22 3 ""
MESSAGE _RIEPILOGOIVA,1,IVA,1
PICTURE "###.###.###.###"
PICTURE "##.###.###"
GROUP 31
END
STRING 110 4
STRING 110 3
BEGIN
KEY "codice iva 2"
PROMPT 2 3 ""
PROMPT 1 4 ""
MESSAGE _RIEPILOGOIVA,1,COD,0
END
NUMBER 111 15
NUMBER 111 12
BEGIN
KEY "imponibile 2"
PROMPT 7 3 ""
PROMPT 6 4 ""
MESSAGE _RIEPILOGOIVA,1,IMP,0
PICTURE "###.###.###.###"
PICTURE "###.###.###"
GROUP 31
END
NUMBER 112 5
NUMBER 112 2
BEGIN
KEY "iva 2"
PROMPT 23 3 ""
PROMPT 18 4 ""
MESSAGE _RIEPILOGOIVA,1,ALI,0
PICTURE "##,@@"
PICTURE "##"
END
NUMBER 113 15
NUMBER 113 10
BEGIN
KEY "imposta 2"
PROMPT 28 3 ""
PROMPT 22 4 ""
MESSAGE _RIEPILOGOIVA,1,IVA,1
PICTURE "###.###.###.###"
PICTURE "##.###.###"
GROUP 31
END
STRING 114 4
STRING 114 3
BEGIN
KEY "codice iva 3"
PROMPT 2 4 ""
PROMPT 1 5 ""
MESSAGE _RIEPILOGOIVA,1,COD,0
END
NUMBER 115 15
NUMBER 115 12
BEGIN
KEY "imponibile 3"
PROMPT 7 4 ""
PROMPT 6 5 ""
MESSAGE _RIEPILOGOIVA,1,IMP,0
PICTURE "###.###.###.###"
PICTURE "###.###.###"
GROUP 31
END
NUMBER 116 5
NUMBER 116 2
BEGIN
KEY "iva 3"
PROMPT 23 4 ""
PROMPT 18 5 ""
MESSAGE _RIEPILOGOIVA,1,ALI,0
PICTURE "##,@@"
PICTURE "##"
END
NUMBER 117 15
NUMBER 117 10
BEGIN
KEY "imposta 3"
PROMPT 28 4 ""
PROMPT 22 5 ""
MESSAGE _RIEPILOGOIVA,1,IVA,1
PICTURE "###.###.###.###"
PICTURE "##.###.###"
GROUP 31
END
NUMBER 118 15
NUMBER 118 12
BEGIN
KEY "imponibile 4"
PROMPT 7 5 ""
PROMPT 6 7 ""
MESSAGE _RIEPILOGOIVA,30,IMP,0
PICTURE "###.###.###.###"
PICTURE "###.###.###"
GROUP 31
END
STRINGA 119 4
STRINGA 119 3
BEGIN
KEY "codice iva 4"
PROMPT 2 5 ""
PROMPT 1 7 ""
MESSAGE _RIEPILOGOIVA,30,COD,0
END
STRINGA 120 45
BEGIN
KEY "descrizione altri 4"
PROMPT 23 5 ""
PROMPT 33 7 ""
MESSAGE _RIEPILOGOIVA,30,DES,1
END
NUMBER 121 15
NUMBER 121 12
BEGIN
KEY "imponibile 5"
PROMPT 7 6 ""
PROMPT 6 8 ""
MESSAGE _RIEPILOGOIVA,30,IMP,0
PICTURE "###.###.###.###"
PICTURE "###.###.###"
GROUP 31
END
STRINGA 122 4
STRINGA 122 3
BEGIN
KEY "codice iva 5"
PROMPT 2 6 ""
PROMPT 1 8 ""
MESSAGE _RIEPILOGOIVA,30,COD,0
END
STRINGA 123 45
BEGIN
KEY "descrizione altri 5"
PROMPT 23 6 ""
PROMPT 33 8 ""
MESSAGE _RIEPILOGOIVA,30,DES,1
END
NUMBER 124 15
BEGIN
KEY "totale imponibile"
PROMPT 71 6 ""
MESSAGE _TOTIMPONIBILI,1
PICTURE "###.###.###.###"
PROMPT 4 11 ""
MESSAGE _TOTIMPONIBILI,29
PICTURE "###.###.###"
GROUP 31
END
NUMBER 125 15
NUMBER 125 14
BEGIN
KEY "totale imposta"
PROMPT 71 7 ""
PROMPT 18 11 ""
FIELD IMPOSTE
PICTURE "###.###.###.###"
PICTURE "###.###.###"
GROUP 31
END
NUMBER 126 15
BEGIN
KEY "totale esenti"
PROMPT 71 8 ""
MESSAGE _TOTIMPONIBILI,4
PICTURE "###.###.###.###"
PROMPT 35 11 ""
MESSAGE _TOTIMPONIBILI,28
PICTURE "###.###.###"
GROUP 31
END
NUMBER 127 15
BEGIN
KEY "totale importi netti (non scontati)"
PROMPT 71 1 ""
FIELD TOTMERC
PICTURE "###.###.###.###"
PROMPT 2 1 ""
FIELD TOTMER
PICTURE "###.###.###"
GROUP 31
END
NUMBER 128 15
NUMBER 128 12
BEGIN
KEY "totale fattura"
PROMPT 71 9 ""
PROMPT 69 11 ""
FIELD TOTDOC
PICTURE "###.###.###.###"
PICTURE "###.###.###"
GROUP 31
END
DATA 129 10 1
BEGIN
KEY "scadenza pagamento 1"
PROMPT 3 10 ""
PROMPT 1 13 ""
MESSAGE _SCADENZE,DATA,0
END
NUMBER 130 15
NUMBER 130 12
BEGIN
KEY "importo scadenza 1"
PROMPT 16 10 ""
PROMPT 13 13 ""
MESSAGE _SCADENZE,IMPORTO,1
PICTURE "###.###.###.###"
PICTURE "###.###.###"
GROUP 31
END
DATA 131 10 1
BEGIN
KEY "scadenza pagamento 2"
PROMPT 32 10 ""
PROMPT 27 13 ""
MESSAGE _SCADENZE,DATA,0
END
NUMBER 132 15
NUMBER 132 12
BEGIN
KEY "importo scadenza 2"
PROMPT 45 10 ""
PROMPT 39 13 ""
MESSAGE _SCADENZE,IMPORTO,1
PICTURE "###.###.###.###"
PICTURE "###.###.###"
GROUP 31
END
DATA 133 10 1
BEGIN
KEY "scadenza pagamento 3"
PROMPT 3 11 ""
PROMPT 1 14 ""
MESSAGE _SCADENZE,DATA,0
END
NUMBER 134 15
NUMBER 134 12
BEGIN
KEY "importo scadenza 3"
PROMPT 16 11 ""
PROMPT 14 14 ""
MESSAGE _SCADENZE,IMPORTO,1
PICTURE "###.###.###.###"
PICTURE "###.###.###"
GROUP 31
END
DATA 135 10 1
BEGIN
KEY "scadenza pagamento 4"
PROMPT 32 11 ""
PROMPT 27 14 ""
MESSAGE _SCADENZE,DATA,0
END
NUMBER 136 15
NUMBER 136 12
BEGIN
KEY "importo scadenza 4"
PROMPT 45 11 ""
PROMPT 39 14 ""
MESSAGE _SCADENZE,IMPORTO,1
PICTURE "###.###.###.###"
PICTURE "###.###.###"
GROUP 31
END
DATA 137 10 1
BEGIN
KEY "scadenza pagamento 5"
PROMPT 3 12 ""
PROMPT 3 15 ""
MESSAGE _SCADENZE,DATA,0
END
NUMBER 138 15
BEGIN
KEY "importo scadenza 5"
PROMPT 16 12 ""
PROMPT 16 15 ""
MESSAGE _SCADENZE,IMPORTO,1
PICTURE "###.###.###.###"
PICTURE "###.###.###"
GROUP 31
END