152 lines
2.8 KiB
Plaintext
Executable File
152 lines
2.8 KiB
Plaintext
Executable File
#include "cg4300a.h"
|
|
PAGE "Calcolo Liquidazioni" -1 -1 68 15
|
|
|
|
RADIOBUTTON CG43_RDB_VERS 15
|
|
BEGIN
|
|
PROMPT 4 1 "Versamenti"
|
|
HELP "Indicare di quali versamenti procedere con la liquidazione"
|
|
ITEM "1|Tutti" MESSAGE HIDE,CG43_LST_TRIM|SHOW,CG43_LST_MESE
|
|
ITEM "2|Mensili" MESSAGE HIDE,CG43_LST_TRIM|SHOW,CG43_LST_MESE
|
|
ITEM "3|Trimestrali" MESSAGE SHOW,CG43_LST_TRIM|HIDE,CG43_LST_MESE
|
|
END
|
|
|
|
GROUPBOX DLG_NULL 40 5
|
|
BEGIN
|
|
PROMPT 23 1 "Scelta ditte"
|
|
END
|
|
|
|
|
|
NUMBER CG43_FLD_DFR 5
|
|
BEGIN
|
|
PROMPT 24 2 "Da codice "
|
|
FLAGS "UR"
|
|
HELP "Codice ditta di partenza per la selezione"
|
|
USE LF_NDITTE KEY 1
|
|
DISPLAY "Codice" CODDITTA
|
|
DISPLAY "Ragione sociale@50" RAGSOC
|
|
DISPLAY "Vers" FREQVIVA
|
|
OUTPUT CG43_FLD_DFR CODDITTA
|
|
END
|
|
|
|
NUMBER CG43_FLD_DTO 5
|
|
BEGIN
|
|
PROMPT 24 3 "A codice "
|
|
FLAGS "UR"
|
|
HELP "Codice ditta di fine selezione"
|
|
COPY USE CG43_FLD_DFR
|
|
DISPLAY "Codice" CODDITTA
|
|
DISPLAY "Ragione sociale@50" RAGSOC
|
|
DISPLAY "Vers" FREQVIVA
|
|
OUTPUT CG43_FLD_DTO CODDITTA
|
|
END
|
|
|
|
STRING CG43_FLD_SELECTED 5
|
|
BEGIN
|
|
PROMPT 24 4 "Scelte n. "
|
|
FLAGS "D"
|
|
END
|
|
|
|
BUTTON DLG_SELECT 10 2
|
|
BEGIN
|
|
PROMPT 48 2 "~Selezione"
|
|
HELP "Selezione ditte di cui fare la liquidazione"
|
|
MESSAGE EXIT, DLG_SELECT
|
|
END
|
|
|
|
BUTTON CG43_BUT_ANN 10
|
|
BEGIN
|
|
PROMPT 48 4 "A~zzera"
|
|
HELP "Azzerare la selezione delle ditte da fare la liquidazione"
|
|
MESSAGE EXIT,CG43_BUT_ANN
|
|
END
|
|
|
|
/*
|
|
BUTTON CG43_BUT_CHK 8
|
|
BEGIN
|
|
PROMPT 50 4 "Verifica"
|
|
MESSAGE EXIT,CG43_BUT_CHK
|
|
END
|
|
*/
|
|
|
|
NUMBER CG43_FLD_ANNO 4
|
|
BEGIN
|
|
PROMPT 30 7 "Anno "
|
|
HELP "Anno di cui effettuare il calcolo"
|
|
FLAGS "A"
|
|
END
|
|
|
|
|
|
LIST CG43_LST_MESE 10
|
|
BEGIN
|
|
PROMPT 4 7 "Periodo "
|
|
HELP "Mese di cui effettuare il calcolo liquidazione"
|
|
ITEM "13|Annuale"
|
|
FLAGS "AM"
|
|
END
|
|
|
|
LIST CG43_LST_TRIM 12
|
|
BEGIN
|
|
PROMPT 4 7 "Periodo "
|
|
HELP "Trimestre di cui effettuare il calcolo liquidazione"
|
|
ITEM "3|1 Trimestre "
|
|
ITEM "6|2 Trimestre "
|
|
ITEM "9|3 Trimestre "
|
|
ITEM "12|4 Tr./Annuale"
|
|
ITEM "13|Controllo 13a"
|
|
END
|
|
|
|
LIST CG43_LST_CALC 13
|
|
BEGIN
|
|
PROMPT 4 8 "Ricalcola "
|
|
HELP "Indicare se rifare il calcolo durante la stampa"
|
|
// ITEM "1|Se necessario"
|
|
ITEM "2|Mese corrente"
|
|
ITEM "3|Tutti i mesi"
|
|
// ITEM "4|Non calcolare"
|
|
END
|
|
|
|
|
|
GROUPBOX DLG_NULL 60 3
|
|
BEGIN
|
|
PROMPT 4 10 "Stampa"
|
|
END
|
|
|
|
|
|
BOOLEAN CG43_CHK_STAMPA
|
|
BEGIN
|
|
PROMPT 5 11 "Esegui "
|
|
HELP "Indicare se stampare il prospetto delle liquidazioni"
|
|
MESSAGE TRUE ENABLE,CG43_FLD_DATA
|
|
MESSAGE FALSE DISABLE,CG43_FLD_DATA
|
|
END
|
|
|
|
|
|
DATE CG43_FLD_DATA
|
|
BEGIN
|
|
PROMPT 16 11 "con data "
|
|
HELP "Data di stampa del prospetto delle liquidazioni"
|
|
FLAGS "A"
|
|
END
|
|
|
|
|
|
BOOLEAN CG43_CHK_FINAL
|
|
BEGIN
|
|
PROMPT 47 11 "Definitivo"
|
|
HELP "Indicare se la liquidazione e' registrata come definitiva"
|
|
END
|
|
|
|
|
|
BUTTON DLG_OK 10 2
|
|
BEGIN
|
|
PROMPT -12 -1 ""
|
|
END
|
|
|
|
BUTTON DLG_CANCEL 10 2
|
|
BEGIN
|
|
PROMPT -22 -1 ""
|
|
END
|
|
|
|
|
|
ENDPAGE
|
|
ENDMASK
|