campo-sirio/src/ha/ha0500a.uml
mtollari 1b14ec9415 Spostamento cartella sorgenti
git-svn-id: svn://10.65.10.50/branches/R_10_00@23236 c028cbd2-c16b-5b4b-a496-9718f37d4682
2016-09-09 13:59:02 +00:00

135 lines
2.1 KiB
Plaintext
Executable File

#include "ha0500a.h"
PAGE "Generazione NAC" -1 -1 78 15
GROUPBOX DLG_NULL 76 5
BEGIN
PROMPT 1 1 "@bParametri documenti"
END
STRING F_CODAGE 6
BEGIN
PROMPT 2 2 "Agente "
FLAGS "U"
USE LF_AGENTI
INPUT CODAGE F_CODAGE
DISPLAY "Codice" CODAGE
DISPLAY "Descrizione@50" RAGSOC
OUTPUT F_CODAGE CODAGE
OUTPUT F_DESCRAGE RAGSOC
CHECKTYPE NORMAL
END
STRING F_DESCRAGE 50
BEGIN
PROMPT 22 2 ""
USE LF_AGENTI KEY 2
INPUT RAGSOC F_DESCRAGE
DISPLAY "Descrizione@50" RAGSOC
DISPLAY "Codice" CODAGE
COPY OUTPUT F_CODAGE
CHECKTYPE NORMAL
END
STRING F_CODCF 6
BEGIN
PROMPT 2 3 "Cliente "
USE LF_CLIFO
INPUT TIPOCF "C"
INPUT CODCF F_CODCF
DISPLAY "Codice" CODCF
DISPLAY "Ragione sociale@50" RAGSOC
OUTPUT F_CODCF CODCF
OUTPUT F_RAGSOC RAGSOC
CHECKTYPE NORMAL
FLAGS "U"
END
STRING F_RAGSOC 50
BEGIN
PROMPT 22 3 ""
USE LF_CLIFO KEY 2
INPUT TIPOCF "C"
INPUT RAGSOC F_RAGSOC
DISPLAY "Ragione sociale@50" RAGSOC
DISPLAY "Codice" CODCF
COPY OUTPUT F_CODCF
CHECKTYPE NORMAL
END
DATE F_DADATA
BEGIN
PROMPT 2 4 "Da data "
END
DATE F_ADATA
BEGIN
PROMPT 22 4 "A data "
CHECKTYPE REQUIRED
VALIDATE DATE_CMP_FUNC >= F_DADATA
WARNING "Inserire una data successiva a quella iniziale"
END
GROUPBOX DLG_NULL 76 4
BEGIN
PROMPT 1 6 "@bParametri elaborazione"
END
BOOLEAN F_DEFINITIVO
BEGIN
PROMPT 2 7 "Definitiva"
END
BOOLEAN F_KILLPROVV
BEGIN
PROMPT 2 8 "Elimina note di accredito provvisorie"
END
DATE F_DATAELAB
BEGIN
PROMPT 45 7 "Data elaborazione "
FLAGS "A"
CHECKTYPE REQUIRED
END
DATE F_DATANOLO
BEGIN
PROMPT 45 8 "Data NAC nolo "
FLAGS "A"
CHECKTYPE REQUIRED
END
RADIOBUTTON F_TIPOCONTR 1 56
BEGIN
PROMPT 1 10 "@bContratti da elaborare"
ITEM "7|Anticipo/Posticipo/Rifatturazione"
MESSAGE ENABLE,F_FREQUENZA
ITEM "8|Nolo"
MESSAGE DISABLE,F_FREQUENZA
END
RADIOBUTTON F_FREQUENZA 1 17
BEGIN
PROMPT 59 10 "@bFrequenza"
ITEM "T|Trimestre"
ITEM "S|Semestre"
ITEM "A|Anno"
ITEM " |Tutte"
END
STRING DLG_PROFILE 46
BEGIN
PROMPT 1 -1 "Profilo "
PSELECT
END
ENDPAGE
TOOLBAR "" 0 0 0 2
#include <elabar.h>
ENDPAGE
ENDMASK