2003-12-10 12:10:52 +00:00
|
|
|
#include "cm1100.h"
|
|
|
|
|
|
|
|
SECTION GRAPHICS ODD
|
|
|
|
|
|
|
|
LINEA -1 132 1
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 5 "@b"
|
|
|
|
END
|
|
|
|
|
|
|
|
LINEA -1 132 1
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 7 "@b"
|
|
|
|
END
|
|
|
|
|
|
|
|
END
|
|
|
|
|
|
|
|
// intestazione generale stampa pagato per commessa
|
|
|
|
SECTION HEADER ODD 7
|
|
|
|
|
|
|
|
NUMERO -1
|
|
|
|
BEGIN
|
|
|
|
KEY "Nr. pagina"
|
|
|
|
PROMPT 1 1 "Pag. "
|
|
|
|
MESSAGE _PAGENO
|
|
|
|
END
|
|
|
|
|
|
|
|
STRINGA -1
|
|
|
|
BEGIN
|
|
|
|
KEY "Data"
|
|
|
|
PROMPT 115 1 "Data "
|
|
|
|
MESSAGE _TODAY
|
|
|
|
END
|
|
|
|
|
|
|
|
STRINGA -1
|
|
|
|
BEGIN
|
|
|
|
KEY "Intestazione stampa"
|
|
|
|
PROMPT 56 2 "@bPAGATO PER COMMESSA"
|
|
|
|
END
|
|
|
|
|
|
|
|
DATA FR_DATAINI
|
|
|
|
BEGIN
|
|
|
|
KEY "Parametri stampa: data iniziale"
|
|
|
|
PROMPT 1 3 "@bMovimenti dal "
|
|
|
|
END
|
|
|
|
|
|
|
|
DATA FR_DATAFIN
|
|
|
|
BEGIN
|
|
|
|
KEY "Parametri stampa: data finale"
|
|
|
|
PROMPT 40 3 "al "
|
|
|
|
END
|
|
|
|
|
|
|
|
STRINGA FR_DACDC
|
|
|
|
BEGIN
|
|
|
|
KEY "da codice commessa"
|
|
|
|
PROMPT 1 4 "@bDalla commessa "
|
|
|
|
END
|
|
|
|
|
|
|
|
STRINGA FR_ACDC
|
|
|
|
BEGIN
|
|
|
|
KEY "a codice commessa"
|
|
|
|
PROMPT 40 4 "Alla commessa "
|
|
|
|
END
|
|
|
|
|
|
|
|
STRINGA -1
|
|
|
|
BEGIN
|
|
|
|
KEY "codice commessa"
|
|
|
|
PROMPT 1 6 "@bCodice commessa"
|
|
|
|
END
|
|
|
|
|
2003-12-15 15:55:10 +00:00
|
|
|
STRINGA -1
|
|
|
|
BEGIN
|
|
|
|
KEY "numero registrazione"
|
|
|
|
PROMPT 1 6 "@bN. reg."
|
|
|
|
END
|
|
|
|
|
|
|
|
STRINGA -1
|
|
|
|
BEGIN
|
|
|
|
KEY "data pagamento"
|
|
|
|
PROMPT 10 6 "@bData pag."
|
|
|
|
END
|
|
|
|
|
|
|
|
STRINGA -1
|
|
|
|
BEGIN
|
|
|
|
KEY "descrizione pagamento"
|
|
|
|
PROMPT 22 6 "@bDescrizione pagamento"
|
|
|
|
END
|
|
|
|
|
|
|
|
STRINGA -1
|
|
|
|
BEGIN
|
|
|
|
KEY "codice fornitore"
|
|
|
|
PROMPT 65 6 "@b Fornitore"
|
|
|
|
END
|
|
|
|
|
2003-12-10 12:10:52 +00:00
|
|
|
STRINGA -1
|
|
|
|
BEGIN
|
|
|
|
KEY "totale fattura"
|
2003-12-15 15:55:10 +00:00
|
|
|
PROMPT 77 6 " Totale fattura"
|
2003-12-10 12:10:52 +00:00
|
|
|
END
|
|
|
|
|
|
|
|
STRINGA -1
|
|
|
|
BEGIN
|
|
|
|
KEY "totale pagamento"
|
2003-12-15 15:55:10 +00:00
|
|
|
PROMPT 94 6 "Totale pagamento"
|
2003-12-10 12:10:52 +00:00
|
|
|
END
|
|
|
|
|
|
|
|
END // section header odd
|
|
|
|
|
2003-12-15 15:55:10 +00:00
|
|
|
// riga con solo il codice commessa ed una riga vuota
|
|
|
|
SECTION HEADER LAST 2
|
|
|
|
|
|
|
|
STRINGA FR_CODCMS
|
|
|
|
BEGIN
|
|
|
|
KEY "codice commessa"
|
|
|
|
PROMPT 1 1 "@b"
|
|
|
|
END
|
|
|
|
|
|
|
|
END //section header last
|
2003-12-10 12:10:52 +00:00
|
|
|
|
|
|
|
// riga di stampa (utilizzata per ogni gruppo/conto/sottoconto e per tutti i totali)
|
|
|
|
SECTION BODY ODD 1
|
|
|
|
|
|
|
|
STRINGA -1
|
|
|
|
BEGIN
|
|
|
|
KEY "codice commessa"
|
2003-12-15 15:55:10 +00:00
|
|
|
PROMPT 1 1 "@b"
|
2003-12-10 12:10:52 +00:00
|
|
|
MESSAGE _CODCMS
|
2003-12-15 15:55:10 +00:00
|
|
|
FLAGS "H"
|
|
|
|
END
|
|
|
|
|
|
|
|
NUMERO -1 7
|
|
|
|
BEGIN
|
|
|
|
KEY "numero registrazione"
|
|
|
|
PROMPT 1 1 ""
|
|
|
|
MESSAGE _NREG
|
|
|
|
END
|
|
|
|
|
|
|
|
DATA -1
|
|
|
|
BEGIN
|
|
|
|
KEY "data pagamento"
|
|
|
|
PROMPT 10 1 ""
|
|
|
|
MESSAGE _DATAPAG
|
|
|
|
END
|
|
|
|
|
|
|
|
STRINGA -1 45
|
|
|
|
BEGIN
|
|
|
|
KEY "descrizione pagamento"
|
|
|
|
PROMPT 22 1 ""
|
|
|
|
MESSAGE _DESCRPAG
|
|
|
|
END
|
|
|
|
|
|
|
|
NUMERO -1 6
|
|
|
|
BEGIN
|
|
|
|
KEY "codice fornitore"
|
|
|
|
PROMPT 69 1 ""
|
|
|
|
MESSAGE _CODFORN
|
2003-12-10 12:10:52 +00:00
|
|
|
END
|
|
|
|
|
|
|
|
VALUTA -1 15
|
|
|
|
BEGIN
|
|
|
|
KEY "totale fattura"
|
2003-12-15 15:55:10 +00:00
|
|
|
PROMPT 77 1 ""
|
2003-12-10 12:10:52 +00:00
|
|
|
MESSAGE _TOTDOC
|
|
|
|
END
|
|
|
|
|
|
|
|
VALUTA -1 15
|
|
|
|
BEGIN
|
|
|
|
KEY "totale pagamento"
|
2003-12-15 15:55:10 +00:00
|
|
|
PROMPT 94 1 ""
|
2003-12-10 12:10:52 +00:00
|
|
|
MESSAGE _TOTPAG
|
|
|
|
END
|
|
|
|
|
|
|
|
STRINGA -1
|
|
|
|
BEGIN
|
|
|
|
KEY "avanza 1 pagamento"
|
|
|
|
PROMPT 1 1 ""
|
|
|
|
MESSAGE _NEXTPAG
|
|
|
|
FLAGS "H"
|
|
|
|
END
|
|
|
|
|
|
|
|
END // section body
|
|
|
|
|
|
|
|
SECTION FOOTER ODD 3
|
|
|
|
END
|
|
|
|
|
|
|
|
END // form
|