0b3cad8984
Files correlati :cg3.exe cg3800a.frm Ricompilazione Demo : [ ] Commento :nuova implementazione CM20083; aggiunto link ai movimenti doppi git-svn-id: svn://10.65.10.50/trunk@11753 c028cbd2-c16b-5b4b-a496-9718f37d4682
158 lines
2.0 KiB
Plaintext
Executable File
158 lines
2.0 KiB
Plaintext
Executable File
#include "cg3800.h"
|
|
|
|
SECTION GRAPHICS ODD
|
|
|
|
LINEA -1 132 1
|
|
BEGIN
|
|
PROMPT 1 5 "@b"
|
|
END
|
|
|
|
LINEA -1 132 1
|
|
BEGIN
|
|
PROMPT 1 8 "@b"
|
|
END
|
|
|
|
END
|
|
|
|
// intestazione generale stampa pagato per commessa
|
|
SECTION HEADER ODD 8
|
|
|
|
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 "@bLISTA FATTURE DOPPIE"
|
|
END
|
|
|
|
DATA FR_DADATA
|
|
BEGIN
|
|
KEY "Parametri stampa: data iniziale"
|
|
PROMPT 1 3 "@bMovimenti dal "
|
|
END
|
|
|
|
DATA FR_ADATA
|
|
BEGIN
|
|
KEY "Parametri stampa: data finale"
|
|
PROMPT 40 3 "al "
|
|
END
|
|
|
|
STRINGA -1
|
|
BEGIN
|
|
KEY "anno documento"
|
|
PROMPT 1 6 "@bANNO"
|
|
END
|
|
|
|
STRINGA -1
|
|
BEGIN
|
|
KEY "numero documento"
|
|
PROMPT 6 6 "@bNUM. DOC. "
|
|
END
|
|
|
|
STRING -1
|
|
BEGIN
|
|
KEY "codice fornitore"
|
|
PROMPT 18 6 "@bFORNITORE"
|
|
END
|
|
|
|
STRING -1
|
|
BEGIN
|
|
KEY "ragione sociale"
|
|
PROMPT 28 6 "@bRAGIONE SOCIALE"
|
|
END
|
|
|
|
STRING -1
|
|
BEGIN
|
|
KEY "numero registrazione"
|
|
PROMPT 6 7 "@bNum.Reg."
|
|
END
|
|
|
|
STRING -1
|
|
BEGIN
|
|
KEY "data registrazione"
|
|
PROMPT 15 7 "@bData Reg."
|
|
END
|
|
|
|
STRING -1
|
|
BEGIN
|
|
KEY "descrizione registrazione"
|
|
PROMPT 26 7 "@bDescrizione"
|
|
END
|
|
|
|
END // section header odd
|
|
|
|
// documento duplicato
|
|
SECTION HEADER LAST 2
|
|
|
|
NUMERO FR_ANNODOC 4
|
|
BEGIN
|
|
KEY "anno doc"
|
|
PROMPT 1 2 ""
|
|
END
|
|
|
|
STRINGA FR_NDOC 7
|
|
BEGIN
|
|
KEY "num doc"
|
|
PROMPT 6 2 ""
|
|
END
|
|
|
|
NUMERO FR_CODCF 6
|
|
BEGIN
|
|
KEY "codice clifo"
|
|
PROMPT 18 2 ""
|
|
END
|
|
|
|
STRINGA FR_RAGSOC 50
|
|
BEGIN
|
|
KEY "ragsoc"
|
|
PROMPT 28 2 ""
|
|
END
|
|
|
|
END //end della header last: section del documento che viene duplicato
|
|
|
|
SECTION BODY ODD 1 // section dei duplicati
|
|
|
|
NUMERO FR_NUMREG
|
|
BEGIN
|
|
KEY "numero registrazione"
|
|
PROMPT 6 1 "$[b]"
|
|
END
|
|
|
|
STRINGA -1
|
|
BEGIN
|
|
KEY "spegnitore del colore"
|
|
PROMPT 15 1 "$[n]"
|
|
END
|
|
|
|
DATA FR_DATAREG
|
|
BEGIN
|
|
KEY "data registrazione"
|
|
PROMPT 15 1 ""
|
|
END
|
|
|
|
STRINGA FR_DESCREG 50
|
|
BEGIN
|
|
KEY "descrizione registrazione"
|
|
PROMPT 26 1 ""
|
|
END
|
|
|
|
END //end section duplicati
|
|
|
|
|
|
SECTION FOOTER ODD 1
|
|
END
|
|
|
|
END // form
|