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