7c73bdacd7
Files correlati : ba0.exe Ricompilazione Demo : [ ] Commento : Migliorata gestione di ba0close.exe git-svn-id: svn://10.65.10.50/trunk@11227 c028cbd2-c16b-5b4b-a496-9718f37d4682
116 lines
1.6 KiB
Plaintext
Executable File
116 lines
1.6 KiB
Plaintext
Executable File
#include "batbind.h"
|
|
|
|
TOOLBAR "" 0 18 0 2
|
|
|
|
BUTTON DLG_SAVEREC 10 2
|
|
BEGIN
|
|
PROMPT -15 -1 "~Registra"
|
|
MESSAGE EXIT,K_SAVE
|
|
PICTURE BMP_SAVEREC
|
|
PICTURE BMP_SAVERECDN
|
|
END
|
|
|
|
BUTTON DLG_NEWREC 10 2
|
|
BEGIN
|
|
PROMPT -25 -1 "~Nuovo"
|
|
MESSAGE EXIT,K_INS
|
|
PICTURE BMP_NEWREC
|
|
PICTURE BMP_NEWRECDN
|
|
END
|
|
|
|
BUTTON DLG_DELREC 10 2
|
|
BEGIN
|
|
PROMPT -35 -1 "~Elimina"
|
|
MESSAGE EXIT,K_DEL
|
|
PICTURE BMP_DELREC
|
|
PICTURE BMP_DELRECDN
|
|
END
|
|
|
|
BUTTON DLG_CANCEL 10 2
|
|
BEGIN
|
|
PROMPT -45 -1 "~Annulla"
|
|
MESSAGE EXIT,K_ESC
|
|
PICTURE 102
|
|
END
|
|
|
|
BUTTON DLG_QUIT 10 2
|
|
BEGIN
|
|
PROMPT -55 -1 "~Fine"
|
|
MESSAGE EXIT,K_QUIT
|
|
PICTURE BMP_QUIT
|
|
PICTURE BMP_QUITDN
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
PAGE "Tabella studio per invio" -1 -1 78 18
|
|
|
|
STRING F_CODICE 3
|
|
BEGIN
|
|
PROMPT 90 90 ""
|
|
FIELD %INS->CODTAB
|
|
// FLAGS "HG"
|
|
CHECKTYPE REQUIRED
|
|
KEY 1
|
|
END
|
|
|
|
STRING F_NOMEID 10
|
|
BEGIN
|
|
PROMPT 2 1 "Nome simbolico studio per trasferimenti "
|
|
FIELD %INS->S0
|
|
FLAGS "ZU"
|
|
CHECKTYPE REQUIRED
|
|
KEY 2
|
|
END
|
|
|
|
GROUPBOX DLG_NULL 76 7
|
|
BEGIN
|
|
PROMPT 1 3 "Eventuale ultimo invio non completato"
|
|
END
|
|
|
|
NUMBER F_DITTAINV 5
|
|
BEGIN
|
|
PROMPT 2 4 "ditta inviante "
|
|
FLAGS "G"
|
|
FIELD %INS->I0
|
|
END
|
|
|
|
STRING F_RAGSOC 50
|
|
BEGIN
|
|
PROMPT 25 4 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
NUMBER F_NUMULINV 3
|
|
BEGIN
|
|
PROMPT 2 6 "Numero invio "
|
|
FLAGS "R"
|
|
END
|
|
|
|
DATE F_DATAULIN
|
|
BEGIN
|
|
PROMPT 45 6 "Data ultimo invio "
|
|
END
|
|
|
|
STRING F_STATO 1
|
|
BEGIN
|
|
PROMPT 2 7 "Stato invio "
|
|
FLAGS "U"
|
|
END
|
|
|
|
STRING F_USELAB 1
|
|
BEGIN
|
|
PROMPT 18 7 ""
|
|
FLAGS "U"
|
|
END
|
|
|
|
STRING F_CHIAVE 60
|
|
BEGIN
|
|
PROMPT 15 8 ""
|
|
FLAGS "U"
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
ENDMASK
|