Patch level :2.0 partners 602

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

View File

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