1995-10-16 11:08:14 +00:00
|
|
|
#include "cg4900a.h"
|
1995-10-09 10:16:06 +00:00
|
|
|
|
|
|
|
|
PAGE "Visualizzazione liquidazione acconti" -1 -1 70 6
|
|
|
|
|
|
|
|
|
|
NUMBER F_CODDITTA 5
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT 1 1 "Codice ditta "
|
|
|
|
|
HELP "Codice della ditta da attivare"
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
BUTTON F_SELECT 2 1
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT 20 1 "*"
|
|
|
|
|
PICTURE 109
|
|
|
|
|
MESSAGE EXIT,DLG_SELECT
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
STRING F_RAGSOC 50 30
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT 25 1 "Rag. soc. "
|
|
|
|
|
HELP "Ragione sociale della ditta da selezionare"
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
BUTTON F_SELECT 2 1
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT 66 1 "*"
|
|
|
|
|
PICTURE 109
|
|
|
|
|
MESSAGE EXIT,DLG_SELECT
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
NUMBER F_YEAR 4
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT 1 2 "Anno liquidazione "
|
|
|
|
|
FLAGS "A"
|
|
|
|
|
VALIDATE FIXLEN_FUNC 4
|
|
|
|
|
CHECKTYPE REQUIRED
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
BUTTON DLG_OK 9 2
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT -12 -1 ""
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
BUTTON DLG_CANCEL 9 2
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT -22 -1 ""
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
ENDPAGE
|
|
|
|
|
ENDMASK
|
