148 lines
2.6 KiB
Plaintext
Executable File
148 lines
2.6 KiB
Plaintext
Executable File
#include "cg4300a.h"
|
|
PAGE "Calcolo Liquidazioni" -1 -1 68 15
|
|
|
|
RADIOBUTTON CG43_RDB_VERS 15
|
|
BEGIN
|
|
PROMPT 4 1 "Versamenti"
|
|
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 6
|
|
BEGIN
|
|
PROMPT 24 2 "Da codice "
|
|
HELP "Immettere codice ditta di partenza per la selezione"
|
|
USE LF_NDITTE KEY 1
|
|
DISPLAY "Codice" CODDITTA
|
|
DISPLAY "Ragione sociale " RAGSOC
|
|
DISPLAY "Vers" FREQVIVA
|
|
OUTPUT CG43_FLD_DFR CODDITTA
|
|
END
|
|
|
|
NUMBER CG43_FLD_DTO 6
|
|
BEGIN
|
|
PROMPT 24 3 "A codice "
|
|
HELP "Immettere codice ditta di fine selezione"
|
|
COPY USE CG43_FLD_DFR
|
|
DISPLAY "Codice" CODDITTA
|
|
DISPLAY "Ragione sociale " RAGSOC
|
|
DISPLAY "Vers" FREQVIVA
|
|
OUTPUT CG43_FLD_DTO CODDITTA
|
|
END
|
|
|
|
STRING CG43_FLD_SELECTED 6
|
|
BEGIN
|
|
PROMPT 24 4 "Scelte n. "
|
|
FLAGS "D"
|
|
END
|
|
|
|
BUTTON DLG_SELECT 8
|
|
BEGIN
|
|
PROMPT 50 2 "Selezione"
|
|
MESSAGE EXIT, DLG_SELECT
|
|
END
|
|
|
|
BUTTON CG43_BUT_ANN 8
|
|
BEGIN
|
|
PROMPT 50 3 "Annulla"
|
|
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 "Immettere l'anno di calcolo"
|
|
FLAGS "A"
|
|
END
|
|
|
|
|
|
LIST CG43_LST_MESE 10
|
|
BEGIN
|
|
PROMPT 4 7 "Periodo "
|
|
HELP "Immettere il mese di calcolo liquidazione"
|
|
ITEM "13|Annuale"
|
|
FLAGS "AM"
|
|
END
|
|
|
|
LIST CG43_LST_TRIM 12
|
|
BEGIN
|
|
PROMPT 4 7 "Periodo "
|
|
HELP "Immettere il trimestre di 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 "
|
|
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 "Se selezionato, stampa 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 "Immettere la data di stampa"
|
|
FLAGS "A"
|
|
END
|
|
|
|
|
|
BOOLEAN CG43_CHK_FINAL
|
|
BEGIN
|
|
PROMPT 47 11 "Definitivo"
|
|
HELP "Se selezionato, la liquidazione e' registrata come definitiva"
|
|
END
|
|
|
|
|
|
BUTTON DLG_OK 8 2
|
|
BEGIN
|
|
PROMPT -12 -1 ""
|
|
END
|
|
|
|
BUTTON DLG_CANCEL 7 2
|
|
BEGIN
|
|
PROMPT -22 -1 ""
|
|
END
|
|
|
|
|
|
ENDPAGE
|
|
ENDMASK
|