campo-sirio/dt/dt0300a.uml
luca cd9f622862 Patch level :10.0 250
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :ammodernate maschere


git-svn-id: svn://10.65.10.50/trunk@18327 c028cbd2-c16b-5b4b-a496-9718f37d4682
2009-02-23 14:06:07 +00:00

178 lines
2.8 KiB
Plaintext
Executable File

#include "dt0300a.h"
TOOLBAR "" 0 0 0 2
#include <stdbar.h>
ENDPAGE
PAGE "Configurazione modulo" 0 2 0 0
TEXT DLG_NULL
BEGIN
PROMPT 2 1 "@bTabella conversione documenti"
END
SPREADSHEET F_CONF_DOC 71 8
BEGIN
PROMPT 1 2 ""
ITEM "Negozio"
ITEM "Causale"
ITEM "Tipo doc. DT"
ITEM "Tipo doc."
ITEM "Stato"
END
STRING F_CONF_CODPAG 4
BEGIN
PROMPT 1 12 "Codice pagamento standard "
HELP "Codice di pagamento"
FIELD CondPag
FLAGS "U"
USE %CPG
INPUT CODTAB F_CONF_CODPAG
DISPLAY "Codice" CODTAB
DISPLAY "Tipo di pagamento@50" S0
OUTPUT F_CONF_CODPAG CODTAB
CHECKTYPE NORMAL
END
BOOLEAN F_CONF_NETTO
BEGIN
PROMPT 40 12 "Contabilizzazione al netto sconto"
HELP "Indicare se trasferire i documenti al netto dello sconto"
FIELD ContNettoSconto
END
STRING F_CONF_SPESEACC1 8
BEGIN
PROMPT 1 13 "Cod. spese acc. 1 "
FIELD SpeseAcc1
FLAGS "U"
USE SPP
INPUT CODTAB F_CONF_SPESEACC1
DISPLAY "Codice " CODTAB
DISPLAY "Descrizione@50 " S0
OUTPUT F_CONF_SPESEACC1 CODTAB
CHECKTYPE NORMAL
END
STRING F_CONF_SPESEACC2 8
BEGIN
PROMPT 1 14 "Cod. spese acc. 2 "
FIELD SpeseAcc2
FLAGS "U"
USE SPP
INPUT CODTAB F_CONF_SPESEACC2
DISPLAY "Codice " CODTAB
DISPLAY "Descrizione@50 " S0
OUTPUT F_CONF_SPESEACC2 CODTAB
CHECKTYPE NORMAL
END
STRING F_CONF_SCONTOFIN 8
BEGIN
PROMPT 1 15 "Cod. spesa per sconto fin. "
FIELD ScontoFin
FLAGS "U"
USE SPP SELECT S9 != " "
INPUT CODTAB F_CONF_SCONTOFIN
DISPLAY "Codice " CODTAB
DISPLAY "Descrizione@50 " S0
OUTPUT F_CONF_SCONTOFIN CODTAB
CHECKTYPE NORMAL
END
ENDPAGE
ENDMASK
TOOLBAR "" 0 0 0 2
BUTTON DLG_OK 10 2
BEGIN
PROMPT -13 -1 ""
END
BUTTON DLG_DELREC 10 2
BEGIN
PROMPT -23 -1 ""
END
BUTTON DLG_CANCEL 10 2
BEGIN
PROMPT -33 -1 ""
END
ENDPAGE
PAGE "" 0 2 0 0
STRING F_S_CODNEG 6
BEGIN
PROMPT 1 1 "Negozio "
END
STRING F_S_CAUS 4
BEGIN
PROMPT 1 2 "Causale "
FLAGS "U"
CHECKTYPE NORMAL
END
LIST F_S_TIPODOCDT 25
BEGIN
PROMPT 1 3 "Tipo doc. DT "
ITEM "A|Fattura accompagnatoria"
ITEM "B|Bolla/DDT"
ITEM "D|Fattura differita"
END
STRING F_S_TIPODOC 4
BEGIN
PROMPT 1 4 "Tipo doc. "
FLAGS "UB"
USE %TIP
INPUT CODTAB F_S_TIPODOC
DISPLAY "Cod. Num." CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_S_TIPODOC CODTAB
OUTPUT F_S_D_TIPODOC S0
CHECKTYPE NORMAL
END
STRING F_S_STATO 1
BEGIN
PROMPT 1 7 "Stato "
USE %STD
INPUT CODTAB F_S_STATO
DISPLAY "Stato" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_S_STATO CODTAB
OUTPUT F_S_D_STATO S0
CHECKTYPE NORMAL
END
STRING F_S_D_TIPODOC 50
BEGIN
PROMPT 23 6 ""
FLAGS "D"
USE %TIP
INPUT CODTAB F_S_TIPODOC
OUTPUT F_S_D_TIPODOC S0
CHECKTYPE NORMAL
END
STRING F_S_D_STATO 50
BEGIN
PROMPT 23 7 ""
FLAGS "D"
USE %STD
INPUT CODTAB F_S_STATO
OUTPUT F_S_D_STATO S0
CHECKTYPE NORMAL
END
ENDPAGE
ENDMASK