687c9a462b
Files correlati : Ricompilazione Demo : [ ] Commento : Aggiunto ps1001200 (è il vecchio crpa1) Aggiunto ed iniziato il ps1001300 (nuovo programma per la variazione del budget) git-svn-id: svn://10.65.10.50/trunk@20362 c028cbd2-c16b-5b4b-a496-9718f37d4682
77 lines
1.2 KiB
Plaintext
Executable File
77 lines
1.2 KiB
Plaintext
Executable File
#include "ps1001200a.h"
|
|
|
|
TOOLBAR "" 0 0 0 2
|
|
|
|
#include <stdbar.h>
|
|
|
|
ENDPAGE
|
|
|
|
PAGE "Parametri Importazione" -1 -1 78 20
|
|
|
|
GROUPBOX DLG_NULL 78 4
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
END
|
|
|
|
STRING F_PATH 255 40
|
|
BEGIN
|
|
PROMPT 2 2 "Percorso files da importare "
|
|
DSELECT
|
|
FLAGS "M"
|
|
CHECKTYPE REQUIRED
|
|
WARNING "Selezionare una cartella valida!"
|
|
FIELD PATH
|
|
END
|
|
|
|
STRING F_NAMEFILE 40
|
|
BEGIN
|
|
PROMPT 2 3 "Nome file da importare "
|
|
FLAGS "B"
|
|
CHECKTYPE REQUIRED
|
|
FIELD NAMEFILE
|
|
END
|
|
|
|
STRING F_LASTFILE 40
|
|
BEGIN
|
|
PROMPT 1 5 "Ultimo file importato "
|
|
FLAGS "D"
|
|
END
|
|
|
|
STRING F_COD_CAUS 3
|
|
BEGIN
|
|
PROMPT 1 7 "Causale "
|
|
FLAGS "UZ"
|
|
USE LF_CAUSALI
|
|
INPUT CODCAUS F_COD_CAUS
|
|
DISPLAY "Cod." CODCAUS
|
|
DISPLAY "Descrizione@50" DESCR
|
|
OUTPUT F_COD_CAUS CODCAUS
|
|
OUTPUT F_DESCR_CAUS DESCR
|
|
CHECKTYPE REQUIRED
|
|
END
|
|
|
|
STRING F_DESCR_CAUS 50 40
|
|
BEGIN
|
|
PROMPT 20 7 "Descriz."
|
|
USE LF_CAUSALI KEY 2
|
|
INPUT DESCR F_DESCR_CAUS
|
|
DISPLAY "Descrizione @50" DESCR
|
|
DISPLAY "Cod." CODCAUS
|
|
COPY OUTPUT F_COD_CAUS
|
|
END
|
|
|
|
RADIOBUTTON F_CRPA_DIN 1 27
|
|
BEGIN
|
|
PROMPT 1 9 "Tipologia del secondo campo"
|
|
ITEM "C|Fase (CRPA)"
|
|
ITEM "S|Sede (DINAMICA)"
|
|
END
|
|
|
|
BOOLEAN F_KILLOLD
|
|
BEGIN
|
|
PROMPT 1 13 "Elimina tutti i movimenti ed i saldi preventivi esistenti"
|
|
END
|
|
|
|
ENDPAGE
|
|
ENDMASK
|