From ba64f9d51e8501f869f4424e7626a1236633bf52 Mon Sep 17 00:00:00 2001 From: marcello Date: Mon, 2 Oct 1995 13:52:15 +0000 Subject: [PATCH] Modifiche a moduli per bolle, fatture, fatture accomp. git-svn-id: svn://10.65.10.50/trunk@1918 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- ve/veacc.frm | 81 ++++++++++++++++++++++++++++------------ ve/vebol.frm | 32 ++++++---------- ve/vefat.frm | 102 ++++++++++++++++++++++++++++++++++++++++----------- 3 files changed, 150 insertions(+), 65 deletions(-) diff --git a/ve/veacc.frm b/ve/veacc.frm index 8cc70cc0b..cae0d8600 100755 --- a/ve/veacc.frm +++ b/ve/veacc.frm @@ -1,3 +1,13 @@ +<<<<<<< veacc.frm + +// Completare la sezione "iva" nel body +// Manca il campo "causale" nella section footer +// Completare con i messaggi di Matteo. + +// Una volta completato, togliere dalla relazione i files che non servono. + +======= +>>>>>>> 1.2 USE 33 JOIN 34 ALIAS 101 INTO CODNUM=CODNUM ANNO=ANNO PROVV=PROVV NDOC=NDOC JOIN 17 ALIAS 201 INTO TIPOCF=TIPOCF CODCF=CODCF @@ -51,7 +61,7 @@ BEGIN SIZE 12 END -SECTION HEADER ODD 0 +SECTION HEADER ODD 27 STRINGA 1 36 1 BEGIN @@ -119,22 +129,20 @@ BEGIN PROMPT 15 6 "" END +<<<<<<< veacc.frm +STRINGA 9 +======= NUMERO 11 +>>>>>>> 1.2 BEGIN KEY "reg.soc.trib...." - PROMPT 25 6 "" + PROMPT 5 6 "REG.SOC.TRIB.R.E. 8897" END NUMERO 12 BEGIN KEY "c.c.i.a.a. 143011" - PROMPT 5 7 "" -END - -NUMERO 13 -BEGIN - KEY "c.c.i.a.a. 143011" - PROMPT 14 7 "" + PROMPT 5 7 "C.C.I.A.A. 143011" END STRINGA 14 36 2 @@ -160,7 +168,7 @@ END STRINGA 17 30 2 BEGIN - KEY "destinatario, comune " + KEY "destinatario, comune" PROMPT 50 14 "" FIELD 1101@->DENCOM END @@ -193,15 +201,29 @@ BEGIN FIELD 701@->INDIR END -STRINGA 83 30 1 +STRINGA 84 30 1 BEGIN KEY "destinazione, cap" PROMPT 1 12 "" FIELD 1102@->CAPCOM END +<<<<<<< veacc.frm +STRINGA 85 50 1 +======= STRINGA 83 30 1 +>>>>>>> 1.2 BEGIN +<<<<<<< veacc.frm + FLAGS "H" + PROMPT 1 1 "" + FIELD 16->COM +END + +STRINGA 86 30 1 +BEGIN +======= +>>>>>>> 1.2 KEY "destinazione, comune" PROMPT 1 14 "" FIELD 1102@->DENCOM @@ -214,11 +236,16 @@ BEGIN FIELD 33->NUMDOCRIF END -STRINGA 23 8 1 +DATA 23 8 1 BEGIN KEY "data conferma" PROMPT 28 19 "" +<<<<<<< veacc.frm + FIELD DATADOCRIF + FORMAT "1444-" +======= FIELD 33->DATADOCRIF +>>>>>>> 1.2 END STRINGA 24 48 1 @@ -530,70 +557,78 @@ BEGIN PROMPT 68 54 "" END -STRINGA 72 1 1 +LISTA 72 1 1 BEGIN KEY "trasporto a cura del mitt." PROMPT 1 57 "" + ITEM "M|x" + FIELD CODSPMEZZO END -STRINGA 73 1 1 +LISTA 73 1 1 BEGIN KEY "trasporto a cura del dest." PROMPT 7 57 "" + ITEM "D|x" + FIELD CODSPMEZZO END STRINGA 74 1 1 BEGIN KEY "trasporto a cura del vett." PROMPT 15 57 "" + ITEM "V|x" + FIELD CODSPMEZZO END -STRINGA 75 8 1 +DATA 75 8 1 BEGIN KEY "data inizio trasporto" PROMPT 45 57 "" + FIELD DATAPART + FORMAT "1444-" END STRINGA 76 5 1 BEGIN KEY "ora inizio trasporto" PROMPT 57 57 "" + FIELD ORAPART END STRINGA 77 40 1 BEGIN - KEY "nominativo vettore 1" + KEY "nominativo vettore" // nell'originale (.gen) c'era: "nominativo vettore 1" PROMPT 1 59 "" + FIELD %VET->S0 END STRINGA 78 40 1 BEGIN - KEY "nominativo vettore 2" + KEY "indirizzo vettore" // nell'originale (.gen) c'era: "nominativo vettore 2" PROMPT 1 60 "" + FIELD %VET->S1 // il campo S1 e' usato per l'indirizzo vettore END STRINGA 79 41 1 BEGIN KEY "aspetto esteriore dei beni" PROMPT 1 63 "" -END - -STRINGA 80 20 1 -BEGIN - KEY "causale" - PROMPT 23 57 "" + FIELD %ASP->S0 END STRINGA 81 12 1 BEGIN KEY "peso" PROMPT 44 63 "" + FIELD PNETTO END STRINGA 82 8 1 BEGIN KEY "colli" PROMPT 57 63 "" + FIELD NCOLLI END END diff --git a/ve/vebol.frm b/ve/vebol.frm index 1f8dc2fe3..8923c98e9 100755 --- a/ve/vebol.frm +++ b/ve/vebol.frm @@ -19,15 +19,6 @@ JOIN %BAN INTO CODTAB==CODABIA+CODCABA JOIN %VET INTO CODTAB==CODVETT1 JOIN %ASP INTO CODTAB==ASPBENI1 -/* da togliere, perché vengono usati i messaggi _ISAMREAD -JOIN %BAN INTO CODTAB==CODABIA+CODCABA -JOIN %BAN INTO CODTAB==CODABIP+CODCABP -JOIN NDO INTO CODTAB==CODNOTESP1 -JOIN NDO INTO CODTAB==CODNOTESP2 -JOIN 13 TO 304@ ALIAS 1101 INTO COM==COMCF -JOIN 13 TO 304@ ALIAS 1102 INTO COM==COM -*/ - END DESCRIPTION BEGIN @@ -156,7 +147,7 @@ BEGIN KEY "data bolla" PROMPT 60 25 "" FIELD DATADOC - FORMAT "1444-" + FORMAT "1442-" END NUMERO 20 @@ -173,6 +164,13 @@ BEGIN FIELD 16->INDIR END +STRINGA 32 5 1 +BEGIN + KEY "destinazione, cap" + PROMPT 5 18 "" + FIELD 16->CAP +END + STRINGA 49 5 1 BEGIN FLAGS "H" @@ -180,13 +178,6 @@ BEGIN FIELD 16->COM END -STRINGA 32 5 1 -BEGIN - KEY "destinazione, cap" - PROMPT 5 18 "" - MESSAGE _ISAMREAD 13 COM=#49 CAPCOM -END - STRINGA 33 21 1 BEGIN KEY "destinazione, comune" @@ -213,7 +204,7 @@ BEGIN KEY "data conferma" PROMPT 16 25 "" FIELD DATADOCRIF - FORMAT "1444-" + FORMAT "1442-" END STRINGA 24 48 1 @@ -362,15 +353,14 @@ BEGIN KEY "data inizio trasporto" PROMPT 51 61 "" FIELD DATAPART - FORMAT "1444-" + FORMAT "1442-" END -DATA 43 5 1 +STRINGA 43 5 1 BEGIN KEY "ora inizio trasporto" PROMPT 60 61 "" FIELD ORAPART - FORMAT "1444-" END STRINGA 44 27 1 diff --git a/ve/vefat.frm b/ve/vefat.frm index 9f1ea2eb0..71923559e 100755 --- a/ve/vefat.frm +++ b/ve/vefat.frm @@ -1,4 +1,43 @@ +<<<<<<< vefat.frm + +// - I FIELD sul file 20 (clifo) vanno sostituiti con messaggi _CLIENTE. +// - "Cliente provincia" e' gestito dalla relazione. Dovra' essere gestito da un messaggio _CLIENTE +// - Manca "azzera totalizzatore 1" +// - Completare "iva" nelle righe della fattura +// - Nella coda della fattura, completare i campi che non sono totalizzatori +// - Codici per i totalizzatori: +// SPTRAS spese di trasporto +// SPINC spese incasso +// SPIMB spese imballaggio +// SPBOL spese bolli +// TIMP totale imponibile +// TIMPS totale imposta +// TESEN totale esenti +// IMPNETTO totale importi netti (stesso codice per il totalizzatore della riga) +// TFATT totale fattura +// NETPAG netto da pagare +// +// Togliere dalla relazione i files che non servono, quando tutti i campi sono OK. + +======= +>>>>>>> 1.2 USE 33 +<<<<<<< vefat.frm +JOIN 34 INTO CODNUM==CODNUM ANNO==ANNO PROVV==PROVV NDOC==NDOC +JOIN 17 INTO TIPOCF==TIPOCF CODCF==CODCF +JOIN 20 INTO TIPOCF==TIPOCF CODCF==CODCF +JOIN 16 INTO TIPOCF==TIPOCF CODCF==CODCF CODIND==CODINDSP +JOIN 16 TO 17 ALIAS 116 INTO TIPOCF==TIPOCF CODCF==CODCF CODIND==CODINDSP +JOIN 47 TO 34 INTO CODART==CODART +JOIN 52 INTO TIPOCF==TIPOCF CODCF==CODCF +JOIN 13 TO 20 INTO CAPCOM==CAPCF // da togliere quando ci saranno i messaggi _CLIENTE +JOIN %CPG INTO CODTAB==CODPAG +JOIN %AGE INTO CODTAB==CODAG +JOIN %POR INTO CODTAB==CODPORTO +JOIN %BAN INTO CODTAB==CODABIA+CODCABA +JOIN %VET INTO CODTAB==CODVETT1 +JOIN %ASP INTO CODTAB==ASPBENI1 +======= JOIN 34 ALIAS 101 INTO CODNUM=CODNUM ANNO=ANNO PROVV=PROVV NDOC=NDOC JOIN 17 ALIAS 201 INTO TIPOCF=TIPOCF CODCF=CODCF JOIN 20 ALIAS 202 INTO TIPOCF=TIPOCF CODCF=CODCF @@ -19,11 +58,27 @@ JOIN NDO ALIAS 1002 INTO CODTAB=CODNOTESP2 JOIN 13 TO 304@ ALIAS 1101 INTO COM=COMCF JOIN 13 TO 304@ ALIAS 1102 INTO COM=COM +>>>>>>> 1.2 END DESCRIPTION BEGIN 33->* "Documenti di vendita" +<<<<<<< vefat.frm + 34->* "Righe documenti di vendita" + 17->* "Clienti/Fornitori per vendite" + 20->* "Clienti/Fornitori" + 47 ->* "Righe listini" + 52 ->* "Contratti clienti" + 16 ->* "Indirizzi di spedizione" + 116->* "Indirizzi di spedizione" + 13->* "Comuni" + %CPG->* "Condizioni di pagamento" + %AGE ->* "Agenti" + %MSP ->* "Modalità di spedizioni" + %POR ->* "Modalità di consegna" + %BAN ->* "Banche" +======= 101@->* "Righe documenti di vendita" 201@->* "Clienti/Fornitori per vendite" 202@->* "Clienti/Fornitori" @@ -43,6 +98,7 @@ BEGIN 1002@->* "Tabella Note Documento" 1101@->* "Comuni" 1102@->* "Comuni" +>>>>>>> 1.2 END GENERAL @@ -112,31 +168,13 @@ END NUMERO 9 10 1 BEGIN KEY "reg.soc.trib...." - PROMPT 3 9 "" -END - -NUMERO 10 10 1 -BEGIN - KEY "reg.soc.trib...." - PROMPT 13 9 "" -END - -NUMERO 11 2 1 -BEGIN - KEY "reg.soc.trib...." - PROMPT 23 9 "" + PROMPT 3 9 "RED.SOC.TRIB.R.E. " END NUMERO 12 10 1 BEGIN KEY "c.c.i.a.a. ....." - PROMPT 3 10 "" -END - -NUMERO 13 7 1 -BEGIN - KEY "c.c.i.a.a. ....." - PROMPT 12 10 "" + PROMPT 3 10 "C.C.I.A.A. " END STRINGA 14 8 1 @@ -181,18 +219,27 @@ BEGIN FIELD 33->NUMDOCRIF END -NUMERO 20 8 1 +DATA 20 8 1 BEGIN KEY "data conferma" PROMPT 20 23 "" +<<<<<<< vefat.frm + FIELD DATADOCRIF + FORMAT "1444-" +======= FIELD 33->DATADOCRIF +>>>>>>> 1.2 END STRINGA 21 49 1 BEGIN KEY "condizioni di pagamento" PROMPT 3 25 "" +<<<<<<< vefat.frm + FIELD %CPG->S0 +======= FIELD 901@->S0 +>>>>>>> 1.2 END STRINGA 22 29 1 @@ -238,6 +285,14 @@ BEGIN PROMPT 50 15 "" END +<<<<<<< vefat.frm +STRINGA 30 2 1 +BEGIN + KEY "cliente provincia" + PROMPT 73 16 "" + FIELD 13->PROVCOM +END +======= STRINGA 29 20 1 BEGIN KEY "cliente localita 2" @@ -249,6 +304,7 @@ BEGIN KEY "cliente provincia" PROMPT 73 16 "" END +>>>>>>> 1.2 STRINGA 31 2 1 BEGIN @@ -531,6 +587,10 @@ STRINGA 75 12 1 BEGIN KEY "netto da pagare" PROMPT 71 66 "" +<<<<<<< vefat.frm + MESSAGE _COD_TESTA NETPAG +======= +>>>>>>> 1.2 END END