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

@@ -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 ""
+ PROMPT 5 7 "C.C.I.A.A. 143011"
-END
-
-NUMERO 13
-BEGIN
- KEY "c.c.i.a.a. 143011"
- PROMPT 14 7 ""
 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
+ FIELD %ASP->S0
-
-STRINGA 80 20 1
-BEGIN
- KEY "causale"
- PROMPT 23 57 ""
 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

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

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 ""
+ PROMPT  3 9 "RED.SOC.TRIB.R.E.     "
-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 ""
 END
 
 NUMERO 12 10 1
 BEGIN
  KEY "c.c.i.a.a. ....."
- PROMPT  3 10 ""
+ PROMPT  3 10 "C.C.I.A.A.       "
-END
-
-NUMERO 13 7 1
-BEGIN
- KEY "c.c.i.a.a. ....."
- PROMPT  12 10 ""
 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