64 lines
900 B
Plaintext
64 lines
900 B
Plaintext
|
#include "pd1890100.h"
|
||
|
|
|
||
|
|
PAGE "Esportazione scadenzario" -1 -1 78 20
|
||
|
|
|
||
|
|
GROUPBOX DLG_NULL 78 3
|
||
|
|
BEGIN
|
||
|
|
PROMPT 1 0 "@bDitta"
|
||
|
|
END
|
||
|
|
|
||
|
|
NUMBER F_CODDITTA 5
|
||
|
|
BEGIN
|
||
|
|
PROMPT 2 1 "Codice "
|
||
|
|
FLAGS "DFR"
|
||
|
|
USE LF_NDITTE
|
||
|
|
INPUT CODDITTA F_CODDITTA
|
||
|
|
OUTPUT F_RAGSOC RAGSOC
|
||
|
|
CHECKTYPE REQUIRED
|
||
|
|
END
|
||
|
|
|
||
|
|
STRING F_RAGSOC 50
|
||
|
|
BEGIN
|
||
|
|
PROMPT 17 1 "Rag.Soc. "
|
||
|
|
FLAGS "D"
|
||
|
|
END
|
||
|
|
|
||
|
|
GROUPBOX DLG_NULL 78 6
|
||
|
|
BEGIN
|
||
|
|
PROMPT 1 3 "@bParametri"
|
||
|
|
END
|
||
|
|
|
||
|
|
|
||
|
|
DATE F_DATA
|
||
|
|
BEGIN
|
||
|
|
PROMPT 2 4 "Data per calcolo rischio "
|
||
|
|
HELP "Data per calcolo esposto"
|
||
|
|
CHECKTYPE REQUIRED
|
||
|
|
WARNING "Data obbligatoria"
|
||
|
|
END
|
||
|
|
|
||
|
|
NUMBER F_GIORNI 3
|
||
|
|
BEGIN
|
||
|
|
PROMPT 2 5 "Giorni per calcolo rischio "
|
||
|
|
HELP "Inserire il numero di giorni per il calcolo del rischio"
|
||
|
|
END
|
||
|
|
|
||
|
|
STRING F_PATH 60 40
|
||
|
|
BEGIN
|
||
|
|
PROMPT 2 7 "Nome del file dbf da creare "
|
||
|
|
END
|
||
|
|
|
||
|
|
|
||
|
|
BUTTON DLG_OK 10 2
|
||
|
|
BEGIN
|
||
|
|
PROMPT -12 -1 ""
|
||
|
|
END
|
||
|
|
|
||
|
|
BUTTON DLG_QUIT 10 2
|
||
|
|
BEGIN
|
||
|
|
PROMPT -22 -1 ""
|
||
|
|
END
|
||
|
|
|
||
|
|
ENDPAGE
|
||
|
|
ENDMASK
|