campo-sirio/cg/cg5000a.uml

152 lines
2.5 KiB
Plaintext
Executable File

#include "cg5000a.h"
PAGE "Parametri contabilita' studio" -1 -1 76 20
GROUPBOX DLG_NULL 74 4
BEGIN
PROMPT 1 1 "Dati Banca di appoggio"
END
NUMBER FLD_CODABI 5
BEGIN
PROMPT 3 2 "Codice az. banca "
USE %BAN
INPUT CODTAB[1,5] FLD_CODABI
DISPLAY "Banca" CODTAB[1,5]
DISPLAY "Dipendenza" CODTAB[6,10]
DISPLAY "Descrizione@50" S0
OUTPUT FLD_CODABI CODTAB[1,5]
OUTPUT FLD_CODCAB CODTAB[6,10]
OUTPUT FLD_RAGSOCB S0
FIELD CodABI
CHECKTYPE NORMAL
FLAGS "RZ"
END
NUMBER FLD_CODCAB 5
BEGIN
PROMPT 37 2 "Codice dipendenza "
COPY ALL FLD_CODABI
INPUT CODTAB[6,10] FLD_CODABI
CHECKTYPE NORMAL
FIELD CodCAB
FLAGS "RZ"
END
STRING FLD_RAGSOCB 50
BEGIN
PROMPT 3 3 "Rag. Soc. Banca "
FLAGS "D"
END
BOOLEAN CHK_SIND11
BEGIN
PROMPT 2 5 "Somma imposte non detr. ad acq/import. in modello IVA 11"
FIELD Sind11
END
BOOLEAN CHK_STIREG
BEGIN
PROMPT 2 6 "Stampa intestazione registri bollati"
FIELD StiReg
END
BOOLEAN CHK_NODTRG
BEGIN
PROMPT 2 7 "Non stampa data di registrazione sui registri IVA"
FIELD NoDtRg
END
BOOLEAN CHK_POCUDR
BEGIN
PROMPT 2 8 "Posiz. cursore su data registr. in immissione documenti"
HELP "Determina il posizionamento automatico del cursore sulla data di registrazione o sulla causale in prima nota"
FIELD PoCuDr
END
NUMBER FLD_CODAGV 5
BEGIN
PROMPT 2 9 "Codice IVA per ricavi misti agenzie di viaggio "
USE %IVA
INPUT CODTAB FLD_CODAGV
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT FLD_CODAGV CODTAB
CHECKTYPE NORMAL
FIELD CodAgv
END
GROUPBOX DLG_NULL 74 3
BEGIN
PROMPT 1 11 "Interessi liquidazioni trimestrali"
END
NUMBER FLD_INTR0 5 2
BEGIN
PROMPT 3 12 "I "
FLAGS "R"
FIELD InTr(0)
END
NUMBER FLD_INTR1 5 2
BEGIN
PROMPT 20 12 "II "
FLAGS "R"
FIELD InTr(1)
END
NUMBER FLD_INTR2 5 2
BEGIN
PROMPT 40 12 "III "
FLAGS "R"
FIELD InTr(2)
END
NUMBER FLD_INTR3 5 2
BEGIN
PROMPT 60 12 "IV "
FLAGS "R"
FIELD InTr(3)
END
BOOLEAN CHK_CODAPN
BEGIN
PROMPT 2 14 "Controllo dare/avere in gestione primanota differita"
FIELD CoDaPn
END
BOOLEAN CHK_NOVIIP
BEGIN
PROMPT 2 15 "Non visualizza Incasso e Pagamento in automatico"
FIELD NoViIP
END
BOOLEAN CHK_NOVIPC
BEGIN
PROMPT 2 16 "Non visualizza parte contabile in immissione documenti"
FIELD NoViPC
END
BOOLEAN CHK_GSACMI
BEGIN
PROMPT 2 17 "Gestione anno di competenza per movimenti IVA"
FIELD GsAcMi
END
BUTTON DLG_OK 8 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_QUIT 7 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK