campo-sirio/ps/pg0388200a.uml
alex d030bbabe2 Patch level : 4.0 667
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :

Riportata la versione 3.1 patch 766


git-svn-id: svn://10.65.10.50/trunk@14628 c028cbd2-c16b-5b4b-a496-9718f37d4682
2006-12-13 16:22:33 +00:00

141 lines
1.9 KiB
Plaintext
Executable File

#include "pg0388200a.h"
TOOLBAR "" 0 20 0 2
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
PAGE "Parametri Importazione" -1 -1 78 20
STRING F_PATH 255 40
BEGIN
PROMPT 1 1 "Percorso files da importare "
DSELECT
FLAGS "M"
CHECKTYPE REQUIRED
WARNING "Selezionare una cartella valida!"
FIELD PATH
END
BOOLEAN F_IMPBOL
BEGIN
PROMPT 2 3 "@bImportazione bolle"
MESSAGE FALSE DISABLE,F_NAMEBOL
MESSAGE TRUE ENABLE,F_NAMEBOL
END
GROUPBOX DLG_NULL 78 9
BEGIN
PROMPT 1 4 ""
END
STRING F_NAMEBOL 30
BEGIN
PROMPT 2 5 "Nome file da importare "
FLAGS "B"
CHECKTYPE REQUIRED
FIELD NAMEBOL
END
STRING F_NUMBOL 4
BEGIN
PROMPT 2 6 "Numerazione "
USE %NUM
INPUT CODTAB F_NUMBOL
OUTPUT F_DESBOL S0
CHECKTYPE REQUIRED
FLAGS "UD"
FIELD NUMBOL
END
STRING F_DESBOL 50
BEGIN
PROMPT 20 6 ""
FLAGS "D"
END
STRING F_TIPOBOL 4
BEGIN
PROMPT 2 7 "Tipo "
USE %TIP
INPUT CODTAB F_TIPOBOL
OUTPUT F_DESTIPO S0
CHECKTYPE REQUIRED
FLAGS "UD"
FIELD TIPOBOL
END
STRING F_DESTIPO 50
BEGIN
PROMPT 20 7 ""
FLAGS "D"
END
NUMBER F_STATOBOL 1
BEGIN
PROMPT 2 8 "Stato bolle importate "
FLAGS "D"
FIELD STATOBOL
END
NUMBER F_LASTBOL 6
BEGIN
PROMPT 2 9 "Ultima bolla importata "
FLAGS "D"
FIELD LASTBOL
END
TEXT -1
BEGIN
PROMPT 2 10 "@bOrdini"
END
STRING F_NUMORD 4
BEGIN
PROMPT 2 11 "Numerazione "
USE %NUM
INPUT CODTAB F_NUMORD
OUTPUT F_DESORD S0
CHECKTYPE REQUIRED
FLAGS "UD"
FIELD NUMORD
END
STRING F_DESORD 50
BEGIN
PROMPT 20 11 ""
FLAGS "D"
END
BOOLEAN F_IMPINV
BEGIN
PROMPT 2 14 "@bImportazione inventario"
MESSAGE FALSE DISABLE,F_NAMEINV
MESSAGE TRUE ENABLE,F_NAMEINV
END
GROUPBOX DLG_NULL 78 4
BEGIN
PROMPT 1 15 ""
END
STRING F_NAMEINV 30
BEGIN
PROMPT 2 16 "Nome file da importare "
FLAGS "B"
CHECKTYPE REQUIRED
FIELD NAMEINV
END
ENDPAGE
ENDMASK