Files correlati :cm1.exe cm1100a.frm Ricompilazione Demo : [ ] Commento :secondo step del programma stampa scaduto per commessa del CRePA git-svn-id: svn://10.65.10.50/trunk@11676 c028cbd2-c16b-5b4b-a496-9718f37d4682
226 lines
2.9 KiB
Plaintext
Executable File
226 lines
2.9 KiB
Plaintext
Executable File
#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 "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
|
|
|
|
STRINGA -1
|
|
BEGIN
|
|
KEY "totale fattura"
|
|
PROMPT 77 6 " Totale fattura"
|
|
END
|
|
|
|
STRINGA -1
|
|
BEGIN
|
|
KEY "totale pagamento"
|
|
PROMPT 94 6 "Totale pagamento"
|
|
END
|
|
|
|
END // section header odd
|
|
|
|
// riga con solo il codice commessa ed una riga vuota
|
|
SECTION HEADER LAST 3
|
|
|
|
STRINGA FR_CODCMS
|
|
BEGIN
|
|
KEY "codice commessa"
|
|
PROMPT 1 2 "@b"
|
|
END
|
|
|
|
END //section header last
|
|
|
|
// riga di stampa (utilizzata per ogni gruppo/conto/sottoconto e per tutti i totali)
|
|
SECTION BODY ODD 1
|
|
|
|
STRINGA -1
|
|
BEGIN
|
|
KEY "tipo riga"
|
|
PROMPT 1 1 ""
|
|
MESSAGE _TIPORIGA|COPY,FR_TIPORIGA
|
|
FLAGS "H"
|
|
END
|
|
|
|
LISTA FR_TIPORIGA
|
|
BEGIN
|
|
KEY "lista tipo riga"
|
|
PROMPT 1 1 ""
|
|
ITEM "0|0" MESSAGE ENABLE,1@|DISABLE,2@
|
|
ITEM "1|1" MESSAGE ENABLE,2@|DISABLE,1@
|
|
ITEM "2|2" MESSAGE ENABLE,2@|DISABLE,1@
|
|
FLAGS "H"
|
|
END
|
|
|
|
STRINGA -1
|
|
BEGIN
|
|
KEY "codice commessa"
|
|
PROMPT 1 1 ""
|
|
MESSAGE _CODCMS
|
|
FLAGS "H"
|
|
END
|
|
|
|
NUMERO -1 7
|
|
BEGIN
|
|
KEY "numero registrazione"
|
|
PROMPT 1 1 ""
|
|
MESSAGE _NREG
|
|
GROUP 1
|
|
END
|
|
|
|
DATA -1
|
|
BEGIN
|
|
KEY "data pagamento"
|
|
PROMPT 10 1 ""
|
|
MESSAGE _DATAPAG
|
|
GROUP 1
|
|
END
|
|
|
|
NUMERO -1 3
|
|
BEGIN
|
|
KEY "gruppo"
|
|
PROMPT 3 1 ""
|
|
MESSAGE _GRUPPO
|
|
GROUP 2
|
|
END
|
|
|
|
NUMERO -1 3
|
|
BEGIN
|
|
KEY "conto"
|
|
PROMPT 7 1 ""
|
|
MESSAGE _CONTO
|
|
GROUP 2
|
|
END
|
|
|
|
NUMERO -1 6
|
|
BEGIN
|
|
KEY "sottoconto"
|
|
PROMPT 11 1 ""
|
|
MESSAGE _SOTTOCONTO
|
|
GROUP 2
|
|
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
|
|
GROUP 1
|
|
END
|
|
|
|
VALUTA -1 15
|
|
BEGIN
|
|
KEY "totale fattura"
|
|
PROMPT 77 1 ""
|
|
MESSAGE _TOTDOC
|
|
GROUP 1
|
|
END
|
|
|
|
VALUTA -1 15
|
|
BEGIN
|
|
KEY "totale pagamento"
|
|
PROMPT 94 1 ""
|
|
MESSAGE _TOTPAG
|
|
END
|
|
|
|
STRINGA -1
|
|
BEGIN
|
|
KEY "avanza 1 pagamento"
|
|
PROMPT 1 1 ""
|
|
MESSAGE _NEXTPAG
|
|
FLAGS "H"
|
|
END
|
|
|
|
END // section body
|
|
|
|
SECTION FOOTER ODD 1
|
|
END
|
|
|
|
END // form
|