root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level :2.0 partners 602

Browse Source 
Files correlati     :or1100b.frm
Ricompilazione Demo : [ ]
Commento            :
AO20103
Se faccio una Stampa Ordini per Clienti/Fornitori+Dettaglio righe mi viene restituito il
messaggio: "Can't find item with ID 10" seguito da "Runtime error C:\CAMPO32\OR1.EXE".


git-svn-id: svn://10.65.10.50/trunk@11504 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2003-10-16 09:07:35 +00:00
parent 237316d334
commit c76f11b414
1 changed files with 86 additions and 53 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

139
or/or1100b.frm
View File

@ -15,8 +15,6 @@ END
GENERAL GENERAL
BEGIN BEGIN
OFFSET 0 0 OFFSET 0 0
FONT "Courier New"
SIZE 10
END END
@ -46,7 +44,7 @@ END
NUMERO 4 40 NUMERO 4 40
BEGIN BEGIN
KEY "Intestazione stampa" KEY "Intestazione stampa"
PROMPT 40 2 "@bStampa ordini per cliente/fornitore" PROMPT 40 2 "Stampa ordini per cliente/fornitore"
END END
END //HEADER END //HEADER
@ -54,7 +52,7 @@ END //HEADER
SECTION BODY ODD 4 COLUMNWISE SECTION BODY ODD 4 COLUMNWISE
NUMERO 1 10 NUMBER BODY_COL_1 10
BEGIN BEGIN
SPECIAL STRINGA INTESTAZIONE "Codice" "Codice" SPECIAL STRINGA INTESTAZIONE "Codice" "Codice"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo" SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
@ -66,17 +64,17 @@ BEGIN
PICTURE "########" PICTURE "########"
END END
STRINGA 2 40 STRING BODY_COL_2 40
BEGIN BEGIN
SPECIAL STRINGA INTESTAZIONE "Descrizione" "Descrizione" SPECIAL STRINGA INTESTAZIONE "Descrizione" "Descrizione"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo" SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA " X" "Fincatura sinistra e destra" SPECIAL STRINGA FINCATURA " X" "Fincatura sinistra e destra"
KEY "Descrizione Rag Soc" KEY "Descrizione Rag Soc"
PROMPT 2 1 "" PROMPT 2 1 ""
FIELD LF_CLIFO->RAGSOC MESSAGE _ORDINE,RAGSOC,0
END END
STRINGA 3 4 STRINGA BODY_COL_3 4
BEGIN BEGIN
SPECIAL STRINGA INTESTAZIONE "Val." "Val." SPECIAL STRINGA INTESTAZIONE "Val." "Val."
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo" SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
@ -85,7 +83,7 @@ BEGIN
PROMPT 3 1 "" PROMPT 3 1 ""
END END
DATA 4 10 DATA BODY_COL_4 10
BEGIN BEGIN
SPECIAL STRINGA INTESTAZIONE "Data cons." "Data cons." SPECIAL STRINGA INTESTAZIONE "Data cons." "Data cons."
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo" SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
@ -114,7 +112,7 @@ BEGIN
PROMPT 6 1 "" PROMPT 6 1 ""
END END
STRINGA 7 4 STRINGA BODY_COL_7 4
BEGIN BEGIN
SPECIAL STRINGA INTESTAZIONE "UM" "UM" SPECIAL STRINGA INTESTAZIONE "UM" "UM"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo" SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
@ -125,7 +123,7 @@ BEGIN
GROUP G_DETTAGLIO GROUP G_DETTAGLIO
END END
STRINGA 8 13 STRINGA BODY_COL_8 15
BEGIN BEGIN
SPECIAL STRINGA INTESTAZIONE "Q.ta Ordinata" "Q.ta Ordinata" SPECIAL STRINGA INTESTAZIONE "Q.ta Ordinata" "Q.ta Ordinata"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo" SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
@ -136,7 +134,7 @@ BEGIN
GROUP G_DETTAGLIO GROUP G_DETTAGLIO
END END
STRINGA 9 13 STRINGA BODY_COL_9 15
BEGIN BEGIN
SPECIAL STRINGA INTESTAZIONE "Q.ta Evasa" "Q.ta Evasa" SPECIAL STRINGA INTESTAZIONE "Q.ta Evasa" "Q.ta Evasa"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo" SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
@ -147,9 +145,27 @@ BEGIN
GROUP G_DETTAGLIO GROUP G_DETTAGLIO
END END
STRINGA BODY_COL_10 13
BEGIN
SPECIAL STRINGA INTESTAZIONE "@CPr. scontato" "Prezzo un. scontato"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
KEY "Prezzo un. scontato" // Solo intestazione
FLAGS "H"
PROMPT 10 1 ""
GROUP G_DETTAGLIO
END
// Raggruppamento righe documenti per lo stesso cli/fo STRINGA BODY_COL_11 15
SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF BEGIN
SPECIAL STRINGA INTESTAZIONE "@CResiduo" "Residuo"
SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
KEY "Residuo" // Solo intestazione
FLAGS "H"
PROMPT 11 1 ""
GROUP G_DETTAGLIO
END
STRINGA BODY_COL_12 15 STRINGA BODY_COL_12 15
BEGIN BEGIN
@ -166,14 +182,14 @@ END
// Raggruppamento righe documenti per lo stesso cli/fo // Raggruppamento righe documenti per lo stesso cli/fo
SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+LF_DOC->OCFPI SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+LF_DOC->OCFPI
NUMERO 101 10 NUMBER 101 10
BEGIN BEGIN
PROMPT 1 1 "" PROMPT 1 1 ""
FLAGS "H" FLAGS "H"
MESSAGE RESET,G_TOTALEART@ MESSAGE RESET,G_TOTALEART@
END END
STRINGA 102 40 2 STRING 102 40 2
BEGIN BEGIN
KEY "Descrizione documento" KEY "Descrizione documento"
PROMPT 2 1 "" PROMPT 2 1 ""
@ -181,7 +197,7 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
FLAGS "D" FLAGS "D"
END END
STRINGA 103 4 STRING 103 4
BEGIN BEGIN
KEY "Codice Valuta" KEY "Codice Valuta"
PROMPT 3 1 "" PROMPT 3 1 ""
@ -223,17 +239,17 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
SECTION RIGHEDOC 2 1 1 FILE LF_RIGHEDOC GROUP ANNO+NDOC // changes into CODART grouping SECTION RIGHEDOC 2 1 1 FILE LF_RIGHEDOC GROUP ANNO+NDOC // changes into CODART grouping
FLAGS "D" // Da abilitare solo su dettaglio righe FLAGS "D" // Da abilitare solo su dettaglio righe
NUMERO 201 10 NUMBER 201 10
BEGIN BEGIN
PROMPT 1 1 "" PROMPT 1 1 ""
END END
STRINGA 202 40 2 STRING 202 40 2
BEGIN BEGIN
KEY "Descrizione articolo" KEY "Descrizione articolo"
PROMPT 2 1 "" PROMPT 2 1 ""
MESSAGE _STREXPR,"**Art. "+LF_RIGHEDOC->CODART+" "+LF_ANAMAG->DESCR MESSAGE _STREXPR,"**Art. "+LF_RIGHEDOC->CODART+" "+LF_ANAMAG->DESCR
END END
STRINGA 203 4 STRING 203 4
BEGIN BEGIN
KEY "Codice Valuta" KEY "Codice Valuta"
PROMPT 3 1 "" PROMPT 3 1 ""
@ -248,15 +264,17 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
BEGIN BEGIN
KEY "Valore Ordinato" KEY "Valore Ordinato"
PROMPT 5 1 "" PROMPT 5 1 ""
MESSAGE _ORDINE,VALORE FIELD LF_RIGHEDOC->RIGAVALORE
DRIVENBY 203 DRIVENBY 203
// PICTURE "."
END END
VALUTA 206 15 VALUTA 206 15
BEGIN BEGIN
KEY "Valore Residuo" KEY "Valore Residuo"
PROMPT 6 1 "" PROMPT 6 1 ""
MESSAGE _ORDINE,VALRES FIELD LF_RIGHEDOC->RIGAVALRES
DRIVENBY 203 DRIVENBY 203
// PICTURE "."
END END
STRINGA 207 4 STRINGA 207 4
BEGIN BEGIN
@ -264,19 +282,18 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
PROMPT 7 1 "" PROMPT 7 1 ""
FIELD LF_RIGHEDOC->UMQTA FIELD LF_RIGHEDOC->UMQTA
END END
NUMERO 208 13 NUMBER 208 15
BEGIN BEGIN
KEY "Q.ta Ordinata" KEY "Q.ta Ordinata"
PROMPT 8 1 "" PROMPT 8 1 ""
FIELD LF_RIGHEDOC->QTA FIELD LF_RIGHEDOC->QTA
PICTURE "#@,@@@" PICTURE "########@,@@@@@"
END END
NUMERO 209 13 NUMBER 209 15
BEGIN BEGIN
KEY "Q.ta Evasa" KEY "Q.ta Evasa"
PROMPT 9 1 "" PROMPT 9 1 ""
MESSAGE _ORDINE,QTAEVASA FIELD LF_RIGHEDOC->QTAEVASA
PICTURE "########@,@@@@@" PICTURE "########@,@@@@@"
END END
VALUTA 210 13 VALUTA 210 13
@ -284,16 +301,17 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
KEY "Pr. Scontato" KEY "Pr. Scontato"
PROMPT 10 1 "" PROMPT 10 1 ""
MESSAGE _ORDINE,PREZZONS MESSAGE _ORDINE,PREZZONS
// PICTURE "."
DRIVENBY 203 DRIVENBY 203
FLAGS "U" FLAGS "U"
END END
NUMERO 211 15 NUMBER 211 15
BEGIN BEGIN
PROMPT 11 1 "" // Residuo PROMPT 11 1 "" // Residuo
PICTURE "########@,@@@@@" PICTURE "########@,@@@@@"
MESSAGE _ORDINE,RESIDUO MESSAGE _ORDINE,RESIDUO
END END
NUMERO 212 15 NUMBER 212 15
BEGIN BEGIN
PROMPT 12 1 "" // Giacenza attuale PROMPT 12 1 "" // Giacenza attuale
PICTURE "########@,@@@@@" PICTURE "########@,@@@@@"
@ -305,19 +323,19 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
SECTION RIGHEART 1 0 0 FILE LF_RIGHEDOC GROUP CODVAL+CODART+DATACONS SECTION RIGHEART 1 0 0 FILE LF_RIGHEDOC GROUP CODVAL+CODART+DATACONS
FLAGS "D" FLAGS "D"
NUMERO 301 10 NUMBER 301 10
BEGIN BEGIN
PROMPT 1 1 "" PROMPT 1 1 ""
FLAGS "H" FLAGS "H"
END END
STRINGA 302 40 2 STRING 302 40 2
BEGIN BEGIN
KEY "Descrizione" KEY "Descrizione"
PROMPT 2 1 "" PROMPT 2 1 ""
MESSAGE _ORDINE,DESCRIZIONE|COPY,402 MESSAGE _ORDINE,DESCRIZIONE|COPY,402
FLAGS "H" FLAGS "H"
END END
STRINGA 303 4 STRING 303 4
BEGIN BEGIN
KEY "Codice Valuta" KEY "Codice Valuta"
PROMPT 3 1 "" PROMPT 3 1 ""
@ -339,6 +357,7 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
PROMPT 5 1 "" PROMPT 5 1 ""
FIELD LF_RIGHEDOC->RIGAVALORE FIELD LF_RIGHEDOC->RIGAVALORE
MESSAGE _ORDINE,VALTABLE,VALORD|ADD,405 MESSAGE _ORDINE,VALTABLE,VALORD|ADD,405
// PICTURE "."
DRIVENBY 303 DRIVENBY 303
FLAGS "H" FLAGS "H"
END END
@ -347,9 +366,10 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
KEY "Valore Residuo" KEY "Valore Residuo"
PROMPT 6 1 "" PROMPT 6 1 ""
FIELD LF_RIGHEDOC->RIGAVALRES FIELD LF_RIGHEDOC->RIGAVALRES
// PICTURE "."
DRIVENBY 303 DRIVENBY 303
FLAGS "H" FLAGS "H"
MESSAGE _ORDINE,VALRES|_ORDINE,VALTABLE,VALRES|ADD,406 MESSAGE _ORDINE,VALTABLE,VALRES|ADD,406
END END
STRINGA 307 4 STRINGA 307 4
BEGIN BEGIN
@ -359,18 +379,20 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
MESSAGE _ORDINE,SELECTUM|COPY,407 MESSAGE _ORDINE,SELECTUM|COPY,407
FLAGS "H" FLAGS "H"
END END
NUMERO 308 13 NUMBER 308 15
BEGIN BEGIN
KEY "Q.ta Ordinata" KEY "Q.ta Ordinata"
PROMPT 8 1 "" PROMPT 8 1 ""
MESSAGE _ORDINE,QTA|_ORDINE,CONVUM|ADD,408 FIELD LF_RIGHEDOC->QTA
MESSAGE _ORDINE,CONVUM|ADD,408
FLAGS "H" FLAGS "H"
END END
NUMERO 309 13 NUMBER 309 15
BEGIN BEGIN
KEY "Q.ta Evasa" KEY "Q.ta Evasa"
PROMPT 9 1 "" PROMPT 9 1 ""
MESSAGE _ORDINE,QTAEVASA|_ORDINE,CONVUM|ADD,409 FIELD LF_RIGHEDOC->QTAEVASA
MESSAGE _ORDINE,CONVUM|ADD,409
FLAGS "H" FLAGS "H"
END END
VALUTA 310 13 VALUTA 310 13
@ -381,14 +403,14 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
DRIVENBY 303 DRIVENBY 303
FLAGS "HU" FLAGS "HU"
END END
NUMERO 311 15 NUMBER 311 15
BEGIN BEGIN
KEY " Residuo" KEY " Residuo"
PROMPT 11 1 "" PROMPT 11 1 ""
MESSAGE _ORDINE,RESIDUO|_ORDINE,CONVUM|ADD,411 MESSAGE _ORDINE,RESIDUO|_ORDINE,CONVUM|ADD,411
FLAGS "H" FLAGS "H"
END END
NUMERO 312 15 NUMBER 312 15
BEGIN BEGIN
KEY "Giacenza attuale" KEY "Giacenza attuale"
PROMPT 12 1 "" PROMPT 12 1 ""
@ -398,7 +420,7 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
END // END SECTION RIGHEART END // END SECTION RIGHEART
// Totalizers for previous section // Totalizers for previous section
NUMERO 401 10 NUMBER 401 10
BEGIN BEGIN
PROMPT 1 1 "" PROMPT 1 1 ""
FLAGS "D" FLAGS "D"
@ -425,6 +447,7 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
BEGIN BEGIN
KEY "Valore Ordinato" KEY "Valore Ordinato"
PROMPT 5 1 "" PROMPT 5 1 ""
// PICTURE "."
FLAGS "D" FLAGS "D"
DRIVENBY 403 DRIVENBY 403
GROUP G_TOTALEART GROUP G_TOTALEART
@ -433,6 +456,7 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
BEGIN BEGIN
KEY "Valore Residuo" KEY "Valore Residuo"
PROMPT 6 1 "" PROMPT 6 1 ""
// PICTURE "."
FLAGS "D" FLAGS "D"
DRIVENBY 403 DRIVENBY 403
GROUP G_TOTALEART GROUP G_TOTALEART
@ -444,15 +468,15 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
FLAGS "D" FLAGS "D"
GROUP G_TOTALEART GROUP G_TOTALEART
END END
NUMERO 408 13 NUMBER 408 15
BEGIN BEGIN
KEY "Q.ta Ordinata" KEY "Q.ta Ordinata"
PROMPT 8 1 "" PROMPT 8 1 ""
PICTURE "#@,@@@" PICTURE "########@,@@@@@"
FLAGS "D" FLAGS "D"
GROUP G_TOTALEART GROUP G_TOTALEART
END END
NUMERO 409 13 NUMBER 409 15
BEGIN BEGIN
KEY "Q.ta Evasa" KEY "Q.ta Evasa"
PROMPT 9 1 "" PROMPT 9 1 ""
@ -464,11 +488,12 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
BEGIN BEGIN
KEY "Pr. non scontato" KEY "Pr. non scontato"
PROMPT 10 1 "" PROMPT 10 1 ""
// PICTURE "."
DRIVENBY 403 DRIVENBY 403
FLAGS "DU" FLAGS "DU"
GROUP G_TOTALEART GROUP G_TOTALEART
END END
NUMERO 411 15 NUMBER 411 15
BEGIN BEGIN
KEY "Residuo" KEY "Residuo"
PROMPT 11 1 "" PROMPT 11 1 ""
@ -476,7 +501,7 @@ SECTION DOCUMENTI 2 1 1 FILE LF_RIGHEDOC GROUP LF_CLIFO->TIPOCF+LF_CLIFO->CODCF+
FLAGS "D" FLAGS "D"
GROUP G_TOTALEART GROUP G_TOTALEART
END END
NUMERO 412 15 NUMBER 412 15
BEGIN BEGIN
KEY "Giac. attuale" KEY "Giac. attuale"
PROMPT 12 1 "" PROMPT 12 1 ""
@ -491,12 +516,12 @@ END // END SECTION DOCUMENTI
SECTION TOTVAL1 3 0 1 GROUP SECTION TOTVAL1 3 0 1 GROUP
FLAGS "D" FLAGS "D"
NUMERO 51 10 NUMBER 51 10
BEGIN BEGIN
PROMPT 1 1 "" PROMPT 1 1 ""
END END
STRINGA 52 40 STRING 52 40
BEGIN BEGIN
PROMPT 2 1 "" PROMPT 2 1 ""
END END
@ -516,6 +541,7 @@ FLAGS "D"
BEGIN BEGIN
KEY "Tot Valore Ordinato per cli/fo" KEY "Tot Valore Ordinato per cli/fo"
PROMPT 5 1 "" PROMPT 5 1 ""
// PICTURE "."
DRIVENBY 53 DRIVENBY 53
END END
@ -523,6 +549,7 @@ FLAGS "D"
BEGIN BEGIN
KEY "Tot Valore Residuo per cli/fo" KEY "Tot Valore Residuo per cli/fo"
PROMPT 6 1 "" PROMPT 6 1 ""
// PICTURE "."
DRIVENBY 53 DRIVENBY 53
END END
END // Fine sezione totale in valuta #1 END // Fine sezione totale in valuta #1
@ -530,12 +557,12 @@ END // Fine sezione totale in valuta #1
SECTION TOTVAL2 1 0 1 GROUP SECTION TOTVAL2 1 0 1 GROUP
FLAGS "D" FLAGS "D"
NUMERO 61 10 NUMBER 61 10
BEGIN BEGIN
PROMPT 1 1 "" PROMPT 1 1 ""
END END
STRINGA 62 40 STRING 62 40
BEGIN BEGIN
PROMPT 2 1 "" PROMPT 2 1 ""
END END
@ -555,6 +582,7 @@ FLAGS "D"
BEGIN BEGIN
KEY "Tot Valore Ordinato per cli/fo" KEY "Tot Valore Ordinato per cli/fo"
PROMPT 5 1 "" PROMPT 5 1 ""
// PICTURE "."
DRIVENBY 63 DRIVENBY 63
END END
@ -562,6 +590,7 @@ FLAGS "D"
BEGIN BEGIN
KEY "Tot Valore Residuo per cli/fo" KEY "Tot Valore Residuo per cli/fo"
PROMPT 6 1 "" PROMPT 6 1 ""
// PICTURE "."
DRIVENBY 63 DRIVENBY 63
END END
END // Fine sezione totale in valuta #2 END // Fine sezione totale in valuta #2
@ -569,12 +598,12 @@ END // Fine sezione totale in valuta #2
SECTION TOTVAL3 1 0 1 GROUP SECTION TOTVAL3 1 0 1 GROUP
FLAGS "D" FLAGS "D"
NUMERO 71 10 NUMBER 71 10
BEGIN BEGIN
PROMPT 1 1 "" PROMPT 1 1 ""
END END
STRINGA 72 40 STRING 72 40
BEGIN BEGIN
PROMPT 2 1 "" PROMPT 2 1 ""
END END
@ -594,6 +623,7 @@ FLAGS "D"
BEGIN BEGIN
KEY "Tot Valore Ordinato per cli/fo" KEY "Tot Valore Ordinato per cli/fo"
PROMPT 5 1 "" PROMPT 5 1 ""
// PICTURE "."
DRIVENBY 73 DRIVENBY 73
END END
@ -601,18 +631,19 @@ FLAGS "D"
BEGIN BEGIN
KEY "Tot Valore Residuo per cli/fo" KEY "Tot Valore Residuo per cli/fo"
PROMPT 6 1 "" PROMPT 6 1 ""
// PICTURE "."
DRIVENBY 73 DRIVENBY 73
END END
END // Fine sezione totale in valuta #3 END // Fine sezione totale in valuta #3
SECTION TOTVAL4 1 0 1 GROUP SECTION TOTVAL4 1 0 1 GROUP
FLAGS "D" FLAGS "D"
NUMERO 81 10 NUMBER 81 10
BEGIN BEGIN
PROMPT 1 1 "" PROMPT 1 1 ""
END END
STRINGA 82 40 STRING 82 40
BEGIN BEGIN
PROMPT 2 1 "" PROMPT 2 1 ""
END END
@ -632,6 +663,7 @@ FLAGS "D"
BEGIN BEGIN
KEY "Tot Valore Ordinato per cli/fo" KEY "Tot Valore Ordinato per cli/fo"
PROMPT 5 1 "" PROMPT 5 1 ""
// PICTURE "."
DRIVENBY 83 DRIVENBY 83
END END
@ -639,10 +671,11 @@ FLAGS "D"
BEGIN BEGIN
KEY "Tot Valore Residuo per cli/fo" KEY "Tot Valore Residuo per cli/fo"
PROMPT 6 1 "" PROMPT 6 1 ""
// PICTURE "."
DRIVENBY 83 DRIVENBY 83
END END
END // Fine sezione totale in valuta #4 END // Fine sezione totale in valuta #4
END // End of Body END // End of Body
END // End of Form