7da1be4f90
Files correlati : Ricompilazione Demo : [ ] Commento : Riportata la versione 01.05 patch 312 git-svn-id: svn://10.65.10.50/trunk@8093 c028cbd2-c16b-5b4b-a496-9718f37d4682
186 lines
2.4 KiB
Plaintext
Executable File
186 lines
2.4 KiB
Plaintext
Executable File
#include "cg6800.h"
|
|
|
|
TOOLBAR "" 0 20 0 2
|
|
|
|
BUTTON DLG_SAVEREC 10 2
|
|
BEGIN
|
|
PROMPT -13 -1 "~Registra"
|
|
MESSAGE EXIT,K_SAVE
|
|
PICTURE BMP_SAVEREC
|
|
END
|
|
|
|
BUTTON DLG_CANCEL 10 2
|
|
BEGIN
|
|
PROMPT -23 -1 ""
|
|
MESSAGE EXIT,K_ESC
|
|
END
|
|
|
|
BUTTON DLG_QUIT 10 2
|
|
BEGIN
|
|
PROMPT -33 -1 ""
|
|
MESSAGE EXIT,K_QUIT
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
PAGE "Movimento" -1 -1 78 18
|
|
|
|
NUMBER F_NUMREG 7
|
|
BEGIN
|
|
PROMPT 1 1 "Numero registrazione "
|
|
HELP "Inserire il numero di registrazione che si vuole modificare"
|
|
FLAGS "Z"
|
|
CHECKTYPE REQUIRED
|
|
END
|
|
|
|
NUMBER F_NUMRIG 2
|
|
BEGIN
|
|
PROMPT 38 1 "Numero di riga "
|
|
HELP "Inserire il numero della riga desiderata. Se non viene specificata si entra in modifica della testata"
|
|
FLAGS "Z"
|
|
END
|
|
|
|
DATE F_DATAREG
|
|
BEGIN
|
|
PROMPT 1 3 "Data registrazione "
|
|
END
|
|
|
|
DATE F_DATACOMP
|
|
BEGIN
|
|
PROMPT 38 3 "Data competenza "
|
|
END
|
|
|
|
NUMBER F_ANNO 4
|
|
BEGIN
|
|
PROMPT 66 3 "Codice "
|
|
FLAGS "D"
|
|
END
|
|
|
|
DATE F_DATADOC
|
|
BEGIN
|
|
PROMPT 1 4 "Data del documento "
|
|
END
|
|
|
|
STRING F_NUMDOC 7
|
|
BEGIN
|
|
PROMPT 38 4 "Numero documento "
|
|
END
|
|
|
|
STRING F_REGIVA 3
|
|
BEGIN
|
|
PROMPT 1 6 "Registro IVA "
|
|
FLAGS "UZ"
|
|
END
|
|
|
|
STRING F_DESCRREG 49
|
|
BEGIN
|
|
PROMPT 28 6 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
NUMBER F_PROTIVA 5
|
|
BEGIN
|
|
PROMPT 1 7 "Numero protocollo iva "
|
|
END
|
|
|
|
NUMBER F_NUPROTIVA 5
|
|
BEGIN
|
|
PROMPT 40 7 "Ultimo protoc. riepilog. "
|
|
END
|
|
|
|
STRING F_CODCAUS 3
|
|
BEGIN
|
|
PROMPT 1 8 "Codice causale "
|
|
FLAGS "Z"
|
|
END
|
|
|
|
STRING F_DESCRCAU 49
|
|
BEGIN
|
|
PROMPT 28 8 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
STRING F_CODPAG 4
|
|
BEGIN
|
|
PROMPT 1 9 "Codice pagamento "
|
|
FLAGS "U#"
|
|
END
|
|
|
|
STRING F_DESCRPAG 48
|
|
BEGIN
|
|
PROMPT 29 9 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
LIST F_PROVV 1 16
|
|
BEGIN
|
|
PROMPT 1 10 "Movimento provvisorio "
|
|
ITEM " |No (Definitivo)"
|
|
ITEM "C|Cespiti"
|
|
ITEM "P|Contabile"
|
|
END
|
|
|
|
NUMBER F_GRUPPO 3
|
|
BEGIN
|
|
PROMPT 1 11 "Sottoconto partita "
|
|
END
|
|
|
|
NUMBER F_CONTO 3
|
|
BEGIN
|
|
PROMPT 29 11 ""
|
|
END
|
|
|
|
NUMBER F_SOTTOCONTO 6
|
|
BEGIN
|
|
PROMPT 34 11 ""
|
|
END
|
|
|
|
STRING F_DESCRPARTITA 50
|
|
BEGIN
|
|
PROMPT 1 12 "Descrizione partita "
|
|
FLAGS "D"
|
|
END
|
|
|
|
LIST F_SEZIONE 9
|
|
BEGIN
|
|
PROMPT 1 13 "Sezione "
|
|
ITEM " |Nessuna"
|
|
ITEM "D|Dare"
|
|
ITEM "A|Avere"
|
|
END
|
|
|
|
STRING F_DESCR 30
|
|
BEGIN
|
|
PROMPT 1 14 "Descrizione aggiuntiva "
|
|
END
|
|
|
|
CURRENCY F_IMPORTO 15
|
|
BEGIN
|
|
PROMPT 1 15 "Importo "
|
|
END
|
|
|
|
NUMBER F_GRUPPOC 3
|
|
BEGIN
|
|
PROMPT 1 16 "Sottoconto contropart. "
|
|
END
|
|
|
|
NUMBER F_CONTOC 3
|
|
BEGIN
|
|
PROMPT 29 16 ""
|
|
END
|
|
|
|
NUMBER F_SOTTOC 6
|
|
BEGIN
|
|
PROMPT 34 16 ""
|
|
END
|
|
|
|
STRING F_DESCRCPARTITA 50
|
|
BEGIN
|
|
PROMPT 1 17 "Descrizione c/partita "
|
|
FLAGS "D"
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
ENDMASK
|