campo-sirio/ve/ve6100a.uml
guy 1692642be0 Patch level : 2.0 564
Files correlati     : ve6.exe ve6100a.msk
Ricompilazione Demo : [ ]
Commento            :

AO20084
Lanciando la contabilizzazione una volta finita restituisce un errore VE6,
se invece lancio la contabilizzazione dal Documento allora funziona.


git-svn-id: svn://10.65.10.50/trunk@11408 c028cbd2-c16b-5b4b-a496-9718f37d4682
2003-09-11 14:47:19 +00:00

91 lines
1.6 KiB
Plaintext
Executable File

#include "ve6100a.h"
PAGE "Contabilizzazione documenti" -1 -1 75 10
STRING F_CODICE_ELAB 8
BEGIN
PROMPT 1 1 "Codice "
FLAG "U"
USE %ELD SELECT I0 == 3
INPUT CODTAB F_CODICE_ELAB
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@55" S0
OUTPUT F_CODICE_ELAB CODTAB
OUTPUT F_DESC_ELAB S0
OUTPUT F_SELPROT B4
CHECKTYPE REQUIRED
WARNING "E' necessario specificare il codice elaborazione"
END
STRING F_DESC_ELAB 50
BEGIN
PROMPT 20 1 ""
USE %ELD KEY 2 SELECT I0 == 3
INPUT S0 F_DESC_ELAB
DISPLAY "Descrizione@55" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT F_CODICE_ELAB
END
GROUPBOX DLG_NULL 32 4
BEGIN
PROMPT 1 2 "Date intervallo documenti"
END
DATE F_DATA_INI
BEGIN
PROMPT 2 3 "Inizio "
CHECKTYPE REQUIRED
WARNING "La data di inizio intervallo e' obbligatoria"
END
DATE F_DATA_FIN
BEGIN
PROMPT 2 4 "Fine "
CHECKTYPE REQUIRED
WARNING "La data di fine intervallo deve essere successiva a quella di inizio"
VALIDATE DATE_CMP_FUNC >= F_DATA_INI
END
BOOLEAN F_DATA_AUTO
BEGIN
PROMPT 40 3 "Data registrazione automatica"
MESSAGE TRUE CLEAR,F_DATA_REG|"",F_DATA_REG
END
DATE F_DATA_REG
BEGIN
PROMPT 40 4 "Data registrazione "
FLAG "D"
END
RADIOBUTTON F_SELPROT 1 50
BEGIN
PROMPT 1 6 "Selezione numero protocollo"
ITEM " |Da numero documento"
ITEM "X|Da registro IVA"
FLAGS "DZ"
END
BUTTON DLG_OK 10 2
BEGIN
PROMPT -13 -1 "~Elabora"
PICTURE BMP_ELABORA
FLAGS "D"
END
BUTTON DLG_USER 10 2
BEGIN
PROMPT -23 -1 "~Selezione"
PICTURE BMP_SELECT
END
BUTTON DLG_CANCEL 10 2
BEGIN
PROMPT -33 -1 ""
END
ENDPAGE
ENDMASK