Tolti i fottuti ^M e aggiunte le bitmap per la registrazione.

git-svn-id: svn://10.65.10.50/trunk@3049 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-06-20 16:09:04 +00:00
parent a8e2eb8d1f
commit e4ee055d3b

View File

@ -1,185 +1,187 @@
#include "cg4900.h" #include "cg4900.h"
TOOLBAR "" 0 20 0 2 TOOLBAR "" 0 20 0 2
BUTTON DLG_SAVEREC 8 2 BUTTON DLG_SAVEREC 8 2
BEGIN BEGIN
PROMPT -13 -1 "~Registra" PROMPT -13 -1 "~Registra"
MESSAGE EXIT,K_SAVE PICTURE BMP_SAVEREC
END PICTURE BMP_SAVERECDN
MESSAGE EXIT,K_SAVE
BUTTON DLG_CANCEL 8 2 END
BEGIN
PROMPT -23 -1 "" BUTTON DLG_CANCEL 8 2
MESSAGE EXIT,K_ESC BEGIN
END PROMPT -23 -1 ""
MESSAGE EXIT,K_ESC
BUTTON DLG_QUIT 8 2 END
BEGIN
PROMPT -33 -1 "" BUTTON DLG_QUIT 8 2
MESSAGE EXIT,K_QUIT BEGIN
END PROMPT -33 -1 ""
MESSAGE EXIT,K_QUIT
ENDPAGE END
PAGE "Acconto su operazioni effettuate" -1 -1 77 20 ENDPAGE
GROUPBOX DLG_NULL 78 3 PAGE "Acconto su operazioni effettuate" -1 -1 77 20
BEGIN
PROMPT 1 0 "@bDitta corrente" GROUPBOX DLG_NULL 78 3
END BEGIN
PROMPT 1 0 "@bDitta corrente"
NUMBER F_CODDITTA 5 END
BEGIN
PROMPT 3 1 "Codice " NUMBER F_CODDITTA 5
FLAGS "DFR" BEGIN
USE LF_NDITTE KEY 1 PROMPT 3 1 "Codice "
INPUT CODDITTA F_CODDITTA FLAGS "DFR"
OUTPUT F_RAGSOC RAGSOC USE LF_NDITTE KEY 1
CHECKTYPE REQUIRED INPUT CODDITTA F_CODDITTA
END OUTPUT F_RAGSOC RAGSOC
CHECKTYPE REQUIRED
STRING F_RAGSOC 50 END
BEGIN
PROMPT 17 1 "Rag. Soc. " STRING F_RAGSOC 50
FLAGS "D" BEGIN
END PROMPT 17 1 "Rag. Soc. "
FLAGS "D"
TEXT DLG_NULL END
BEGIN
PROMPT 51 3 "Credito" TEXT DLG_NULL
END BEGIN
PROMPT 51 3 "Credito"
TEXT DLG_NULL END
BEGIN
PROMPT 66 3 "Debito" TEXT DLG_NULL
END BEGIN
PROMPT 66 3 "Debito"
NUMBER F_IVAVEN 15 END
BEGIN
PROMPT 1 4 "Iva sulle operazioni annotate fino al 20 dic. " NUMBER F_IVAVEN 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 1 4 "Iva sulle operazioni annotate fino al 20 dic. "
END FLAGS "RD"
PICTURE "."
NUMBER F_NONFAT 15 END
BEGIN
PROMPT 1 5 "Iva su operaz. fino al 20 dic., ma non fatturate " NUMBER F_NONFAT 15
FLAGS "R" BEGIN
PICTURE "." PROMPT 1 5 "Iva su operaz. fino al 20 dic., ma non fatturate "
MESSAGE K_TAB,F_RISVEN|K_TAB,F_IVACRE|K_TAB,F_IVADEB FLAGS "R"
END PICTURE "."
MESSAGE K_TAB,F_RISVEN|K_TAB,F_IVACRE|K_TAB,F_IVADEB
NUMBER F_NONANN 15 END
BEGIN
PROMPT 1 6 "Iva su operaz. fino al 20 dic., ma non annotate " NUMBER F_NONANN 15
FLAGS "R" BEGIN
PICTURE "." PROMPT 1 6 "Iva su operaz. fino al 20 dic., ma non annotate "
MESSAGE K_TAB,F_RISVEN|K_TAB,F_IVACRE|K_TAB,F_IVADEB FLAGS "R"
END PICTURE "."
MESSAGE K_TAB,F_RISVEN|K_TAB,F_IVACRE|K_TAB,F_IVADEB
NUMBER F_IVARED 15 END
BEGIN
PROMPT 1 7 "Rettifiche iva a debito " NUMBER F_IVARED 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 1 7 "Rettifiche iva a debito "
END FLAGS "RD"
PICTURE "."
NUMBER F_IVARIM 15 END
BEGIN
PROMPT 1 8 "Iva chiesta a rimborso " NUMBER F_IVARIM 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 1 8 "Iva chiesta a rimborso "
END FLAGS "RD"
PICTURE "."
NUMBER F_RISVEN 15 END
BEGIN
PROMPT 1 9 "RISULTATO " NUMBER F_RISVEN 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 1 9 "RISULTATO "
NUM_CALC {#F_IVAVEN + #F_NONFAT + #F_NONANN + #F_IVARED + #F_IVARIM} FLAGS "RD"
END PICTURE "."
NUM_CALC {#F_IVAVEN + #F_NONFAT + #F_NONANN + #F_IVARED + #F_IVARIM}
NUMBER F_IVAACQ 15 END
BEGIN
PROMPT 1 10 "Iva su acq. annotati fino al 20 dic. " NUMBER F_IVAACQ 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 1 10 "Iva su acq. annotati fino al 20 dic. "
END FLAGS "RD"
PICTURE "."
NUMBER F_PERPRO 15 END
BEGIN
PROMPT 1 11 "meno % di prorata pari a Lire " NUMBER F_PERPRO 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 1 11 "meno % di prorata pari a Lire "
END FLAGS "RD"
PICTURE "."
NUMBER F_CREPRE 15 END
BEGIN
PROMPT 1 12 "Credito precedente " NUMBER F_CREPRE 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 1 12 "Credito precedente "
END FLAGS "RD"
PICTURE "."
NUMBER F_ULTDET 15 END
BEGIN
PROMPT 1 13 "Ulteriori detrazioni " NUMBER F_ULTDET 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 1 13 "Ulteriori detrazioni "
END FLAGS "RD"
PICTURE "."
NUMBER F_IVAREC 15 END
BEGIN
PROMPT 1 14 "Rettifiche iva a credito " NUMBER F_IVAREC 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 1 14 "Rettifiche iva a credito "
END FLAGS "RD"
PICTURE "."
NUMBER F_RISACQ 15 END
BEGIN
PROMPT 1 15 "RISULTATO " NUMBER F_RISACQ 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 1 15 "RISULTATO "
END FLAGS "RD"
PICTURE "."
NUMBER F_IVACRE 15 END
BEGIN
PROMPT 15 16 "IVA A CREDITO " NUMBER F_IVACRE 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 15 16 "IVA A CREDITO "
NUM_CALC {#F_RISACQ - #F_RISVEN} FLAGS "RD"
END PICTURE "."
NUM_CALC {#F_RISACQ - #F_RISVEN}
NUMBER F_CREEVI 15 END
BEGIN
PROMPT 6 17 "CREDITO DA EVIDENZIARE " NUMBER F_CREEVI 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 6 17 "CREDITO DA EVIDENZIARE "
END FLAGS "RD"
PICTURE "."
NUMBER F_IVADEB 15 END
BEGIN
PROMPT 16 16 "IVA A DEBITO " NUMBER F_IVADEB 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 16 16 "IVA A DEBITO "
NUM_CALC {#F_RISVEN - #F_RISACQ} FLAGS "RD"
END PICTURE "."
NUM_CALC {#F_RISVEN - #F_RISACQ}
NUMBER F_ACCVER 15 END
BEGIN
PROMPT 10 17 "ACCONTO DA VERSARE " NUMBER F_ACCVER 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 10 17 "ACCONTO DA VERSARE "
END FLAGS "RD"
PICTURE "."
NUMBER F_ACCNVER 15 END
BEGIN
PROMPT 6 17 "ACCONTO DA NON VERSARE " NUMBER F_ACCNVER 15
FLAGS "RD" BEGIN
PICTURE "." PROMPT 6 17 "ACCONTO DA NON VERSARE "
END FLAGS "RD"
PICTURE "."
ENDPAGE END
ENDMASK ENDPAGE
ENDMASK