2345 lines
73 KiB
Plaintext
2345 lines
73 KiB
Plaintext
|
#include "mg3frm.h"
|
|||
|
|
USE LF_ANAMAG KEY 1
|
|||
|
|
SORT LF_MAG BY ANNOES CODART LIVELLO CODMAG
|
|||
|
|
JOIN TO LF_ANAMAG INTO ANNOES==1996 CODART==CODART
|
|||
|
|
JOIN MAG TO LF_MAG ALIAS 500 INTO CODTAB==CODMAG[1,3]
|
|||
|
|
JOIN MAG TO LF_MAG ALIAS 501 INTO CODTAB==CODMAG
|
|||
|
|
JOIN GMC TO LF_ANAMAG ALIAS 400 INTO CODTAB==GRMERC[1,3]
|
|||
|
|
JOIN GMC TO LF_ANAMAG ALIAS 401 INTO CODTAB==GRMERC
|
|||
|
|
JOIN LF_UMART TO LF_ANAMAG INTO CODART==CODART
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
DESCRIPTION
|
|||
|
|
BEGIN
|
|||
|
|
47->* "Anagrafica articoli"
|
|||
|
|
109->* "Archivio Giacenze"
|
|||
|
|
MAG->* "Tabella magazzini"
|
|||
|
|
49->* "Unit<69> di misura articoli"
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
GENERAL
|
|||
|
|
BEGIN
|
|||
|
|
OFFSET 0 1
|
|||
|
|
// FONT "Courier New"
|
|||
|
|
// SIZE 12
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRAPHIC
|
|||
|
|
BEGIN
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION HEADER ODD 8
|
|||
|
|
|
|||
|
|
STRINGA 1 40 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "nome ditta"
|
|||
|
|
PROMPT 1 1 "Ditta "
|
|||
|
|
MESSAGE _DITTA, !RAGSOC
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
STRINGA 2 10
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Data"
|
|||
|
|
PROMPT 120 1 "Data "
|
|||
|
|
MESSAGE _TODAY
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 3 7
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Nr. pagina"
|
|||
|
|
PROMPT 137 1 "Pagina "
|
|||
|
|
MESSAGE _PAGENO
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 4 32
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Intestazione stampa"
|
|||
|
|
PROMPT 45 2 "Stampa dati storici giacenze"
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
STRINGA FF_FILTRO 20
|
|||
|
|
BEGIN
|
|||
|
|
KEY "RANGE"
|
|||
|
|
PROMPT 74 2 ""
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
STRINGA FF_RANGEARTIC 40
|
|||
|
|
BEGIN
|
|||
|
|
KEY "RANGE"
|
|||
|
|
PROMPT 1 3 ""
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
STRINGA FF_RANGEMAGAZ 40
|
|||
|
|
BEGIN
|
|||
|
|
KEY "RANGE"
|
|||
|
|
PROMPT 1 4 ""
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
STRINGA FF_RANGECATMER 40
|
|||
|
|
BEGIN
|
|||
|
|
KEY "RANGE"
|
|||
|
|
PROMPT 45 4 ""
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
|
|||
|
|
STRINGA 5 146
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Separatore (iniziale)"
|
|||
|
|
PROMPT 1 5 "---------------------------------------------------------------------------------------------------------------------------------------------------"
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
|
|||
|
|
LIST FF_PREZZIVALORI 1
|
|||
|
|
BEGIN
|
|||
|
|
PROMPT 1 1 ""
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "PREZZIOVALORI"
|
|||
|
|
ITEM "P|0"
|
|||
|
|
MESSAGE ENABLE,FG_RIGAPREZZI@|DISABLE,FG_RIGAVALORI@
|
|||
|
|
ITEM "V|1"
|
|||
|
|
MESSAGE DISABLE,FG_RIGAPREZZI@|ENABLE,FG_RIGAVALORI@
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
LIST FF_FLAGGIAC 1
|
|||
|
|
BEGIN
|
|||
|
|
PROMPT 1 1 ""
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "FLAG GIACENZA"
|
|||
|
|
ITEM "0|0"
|
|||
|
|
MESSAGE HIDE,14
|
|||
|
|
ITEM "1|1"
|
|||
|
|
MESSAGE SHOW,14
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
LIST FF_FLAGSOTTOS 1
|
|||
|
|
BEGIN
|
|||
|
|
PROMPT 1 1 ""
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "FLAG SOTTOSCORTA"
|
|||
|
|
ITEM "0|0"
|
|||
|
|
MESSAGE HIDE,15
|
|||
|
|
ITEM "1|1"
|
|||
|
|
MESSAGE SHOW,15
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
LIST FF_FLAGVALMEDI 1
|
|||
|
|
BEGIN
|
|||
|
|
PROMPT 1 1 ""
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "FLAG VALORI MEDI"
|
|||
|
|
ITEM "0|N"
|
|||
|
|
MESSAGE HIDE,FG_VALMEDI@
|
|||
|
|
ITEM "1|Y"
|
|||
|
|
MESSAGE SHOW,FG_VALMEDI@
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
STRINGA 6 20
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 2 6 "Codice"
|
|||
|
|
END
|
|||
|
|
STRINGA 7 40
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 23 6 "Descrizione"
|
|||
|
|
END
|
|||
|
|
STRINGA 7 40
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 54 6 "UM"
|
|||
|
|
END
|
|||
|
|
STRINGA 8 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 68 6 "Giac."
|
|||
|
|
GROUP FG_RIGAPREZZI
|
|||
|
|
END
|
|||
|
|
STRINGA 8 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 65 6 "Acq."
|
|||
|
|
GROUP FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
STRINGA 9 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 74 6 "Ult.costo"
|
|||
|
|
GROUP FG_RIGAPREZZI
|
|||
|
|
END
|
|||
|
|
STRINGA 9 12 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 75 6 "Val.Acq."
|
|||
|
|
GROUP FG_RIGAVALORI FG_VALORI
|
|||
|
|
END
|
|||
|
|
STRINGA 9 12 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
FLAG "H"
|
|||
|
|
PROMPT 75 7 " Medio"
|
|||
|
|
GROUP FG_RIGAVALORI FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
STRINGA 10 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 91 6 "Ven."
|
|||
|
|
GROUP FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
STRINGA 10 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 90 6 "Prezzo"
|
|||
|
|
GROUP FG_RIGAPREZZI
|
|||
|
|
END
|
|||
|
|
STRINGA 11 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 101 6 "Val.Ven."
|
|||
|
|
GROUP FG_RIGAVALORI FG_VALORI
|
|||
|
|
END
|
|||
|
|
STRINGA 11 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
FLAG "H"
|
|||
|
|
PROMPT 101 7 " Medio"
|
|||
|
|
GROUP FG_RIGAVALORI FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
STRINGA 12 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 117 6 "Rim."
|
|||
|
|
GROUP FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
STRINGA 13 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 127 6 "Val.Rim."
|
|||
|
|
GROUP FG_RIGAVALORI FG_VALORI
|
|||
|
|
END
|
|||
|
|
STRINGA 13 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
FLAG "H"
|
|||
|
|
PROMPT 127 7 " Medio"
|
|||
|
|
GROUP FG_RIGAVALORI FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
STRINGA 14 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 139 6 "Giacenza"
|
|||
|
|
GROUP FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
STRINGA 15 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "H1"
|
|||
|
|
PROMPT 139 6 "Scorta-Giac."
|
|||
|
|
GROUP FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
STRINGA 17 146
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Separatore (finale)"
|
|||
|
|
PROMPT 1 8 "---------------------------------------------------------------------------------------------------------------------------------------------------"
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION BODY ODD 0 COLUMNWISE
|
|||
|
|
|
|||
|
|
LIST FF_PREZZIVALORI 1
|
|||
|
|
BEGIN
|
|||
|
|
PROMPT 1 1 ""
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "PREZZIOVALORI"
|
|||
|
|
ITEM "P|0"
|
|||
|
|
MESSAGE ENABLE,FG_RIGAPREZZI@|DISABLE,FG_RIGAVALORI@
|
|||
|
|
ITEM "V|1"
|
|||
|
|
MESSAGE DISABLE,FG_RIGAPREZZI@|ENABLE,FG_RIGAVALORI@
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
LIST FF_FLAGGIAC 1
|
|||
|
|
BEGIN
|
|||
|
|
PROMPT 1 1 ""
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "FLAG GIACENZA"
|
|||
|
|
ITEM "0|0"
|
|||
|
|
MESSAGE DISABLE,BO->47
|
|||
|
|
ITEM "1|1"
|
|||
|
|
MESSAGE ENABLE,BO->47
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
LIST FF_FLAGSOTTOS 1
|
|||
|
|
BEGIN
|
|||
|
|
PROMPT 1 1 ""
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "FLAG SOTTOSCORTA"
|
|||
|
|
ITEM "0|0"
|
|||
|
|
MESSAGE DISABLE,BO->48
|
|||
|
|
ITEM "1|1"
|
|||
|
|
MESSAGE ENABLE,BO->48
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
LIST FF_FLAGVALMEDI 1
|
|||
|
|
BEGIN
|
|||
|
|
PROMPT 1 1 ""
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "FLAG VALORI MEDI"
|
|||
|
|
ITEM "0|N"
|
|||
|
|
MESSAGE SHOW,FG_VALORI@|DISABLE,FG_VALMEDI@
|
|||
|
|
ITEM "1|Y"
|
|||
|
|
MESSAGE HIDE,FG_VALORI@|ENABLE,FG_VALMEDI@
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION H_CATMER 1 1 1 GROUP
|
|||
|
|
STRINGA 11 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Codice CATMER"
|
|||
|
|
PROMPT 2 1 "Cat. merc."
|
|||
|
|
MESSAGE _USER,CODCATMER|COPY,1551
|
|||
|
|
END
|
|||
|
|
STRINGA 12 70 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
MESSAGE _USER,CATMER|COPY,1550
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
STRINGA 60 20 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,15@|_USER,RESET_UM,1553
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_CATMER 1 0 0 FILE LF_ANAMAG GROUP GRMERC
|
|||
|
|
|
|||
|
|
STRINGA 60 20 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,14@|_USER,RESET_UM,1453
|
|||
|
|
END
|
|||
|
|
SECTION H_GCODART1 1 1 1 HEADER
|
|||
|
|
STRINGA 16 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE _USER,CODGRUPPOART,1|COPY,1451
|
|||
|
|
END
|
|||
|
|
STRINGA 17 30 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
MESSAGE _USER,GRUPPOART,1|COPY,1450
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_CODART1 1 0 0 FILE LF_ANAMAG GROUP CODART
|
|||
|
|
STRINGA 60 40 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,13@|_USER,RESET_UM,1353
|
|||
|
|
END
|
|||
|
|
SECTION H_GCODART2 1 1 1 HEADER
|
|||
|
|
STRINGA 16 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE _USER,CODGRUPPOART,2|COPY,1351
|
|||
|
|
END
|
|||
|
|
STRINGA 17 30 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
MESSAGE _USER,GRUPPOART,2|COPY,1350
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_CODART2 1 0 0 FILE LF_ANAMAG GROUP CODART
|
|||
|
|
STRINGA 60 40 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,12@|_USER,RESET_UM,1253
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION H_GCODART3 1 1 1 HEADER
|
|||
|
|
STRINGA 16 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE _USER,CODGRUPPOART,3|COPY,1251
|
|||
|
|
END
|
|||
|
|
STRINGA 17 30 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
MESSAGE _USER,GRUPPOART,3|COPY,1250
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_CODART3 1 0 0 FILE LF_ANAMAG GROUP CODART
|
|||
|
|
STRINGA 60 20 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,11@|_USER,RESET_UM,1153
|
|||
|
|
END
|
|||
|
|
SECTION H_GCODART4 1 1 1 HEADER
|
|||
|
|
STRINGA 16 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE _USER,CODGRUPPOART,4|COPY,1151
|
|||
|
|
END
|
|||
|
|
STRINGA 17 30 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
MESSAGE _USER,GRUPPOART,4|COPY,1150
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_CODART4 1 0 0 FILE LF_ANAMAG GROUP CODART
|
|||
|
|
STRINGA 60 40 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,10@|_USER,RESET_UM,1053
|
|||
|
|
END
|
|||
|
|
SECTION H_GCODART5 1 1 1 HEADER
|
|||
|
|
STRINGA 16 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE _USER,CODGRUPPOART,5|COPY,1051
|
|||
|
|
END
|
|||
|
|
STRINGA 17 30 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
MESSAGE _USER,GRUPPOART,5|COPY,1050
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_CODART5 1 0 0 FILE LF_ANAMAG GROUP CODART
|
|||
|
|
STRINGA 60 40 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,9@|_USER,RESET_UM,953
|
|||
|
|
END
|
|||
|
|
SECTION H_GCODART6 1 1 1 HEADER
|
|||
|
|
STRINGA 16 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE _USER,CODGRUPPOART,6|COPY,951
|
|||
|
|
END
|
|||
|
|
STRINGA 17 30 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
MESSAGE _USER,GRUPPOART,6|COPY,950
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_CODART6 1 0 0 FILE LF_ANAMAG GROUP CODART
|
|||
|
|
STRINGA 60 40 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,8@|_USER,RESET_UM,853
|
|||
|
|
END
|
|||
|
|
SECTION H_GCODART7 1 1 1 HEADER
|
|||
|
|
STRINGA 16 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE _USER,CODGRUPPOART,7|COPY,851
|
|||
|
|
END
|
|||
|
|
STRINGA 17 30 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
MESSAGE _USER,GRUPPOART,7|COPY,850
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_CODART7 1 0 0 FILE LF_ANAMAG GROUP CODART
|
|||
|
|
STRINGA 60 40 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,7@|_USER,RESET_UM,753
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION H_GCODART8 1 1 1 HEADER
|
|||
|
|
STRINGA 16 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE _USER,CODGRUPPOART,8|COPY,751
|
|||
|
|
END
|
|||
|
|
STRINGA 17 30 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE GRUPPO"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
MESSAGE _USER,GRUPPOART,8|COPY,750
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_CODART8 1 0 0 FILE LF_ANAMAG GROUP CODART
|
|||
|
|
STRINGA 60 40 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,6@|_USER,RESET_UM,653
|
|||
|
|
END
|
|||
|
|
SECTION H_ARTICOLO 1 1 1 HEADER
|
|||
|
|
STRINGA 2020 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE articolo"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
FIELD CODART
|
|||
|
|
MESSAGE COPY,651
|
|||
|
|
END
|
|||
|
|
STRINGA 21 30 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY "DESCR.articolo"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
FIELD LF_ANAMAG->DESCR
|
|||
|
|
MESSAGE COPY,650
|
|||
|
|
END
|
|||
|
|
NUMERO 22 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ULC"
|
|||
|
|
FLAG "H"
|
|||
|
|
PROMPT 7 2 ""
|
|||
|
|
FIELD LF_ANAMAG->ULTCOS1
|
|||
|
|
MESSAGE COPY,648
|
|||
|
|
END
|
|||
|
|
NUMERO 23 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "PREZZO"
|
|||
|
|
FLAG "H"
|
|||
|
|
PROMPT 7 2 ""
|
|||
|
|
MESSAGE _USER,PREZZO|COPY,649
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION FILE_GIACENZE 1 0 0 FILE LF_MAG
|
|||
|
|
STRINGA 60 20 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,5@
|
|||
|
|
END
|
|||
|
|
SECTION H_GLIVGIAC1 1 1 1 HEADER
|
|||
|
|
STRINGA 31 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Livello giac"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE _USER,CODGRUPPOGIAC,1|COPY,551
|
|||
|
|
END
|
|||
|
|
STRINGA 31 30 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Livello giac"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
MESSAGE _USER,GRUPPOGIAC,1|COPY,550
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_LIVGIAC1 1 0 0 FILE LF_MAG GROUP CODART
|
|||
|
|
STRINGA 60 20 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,4@
|
|||
|
|
END
|
|||
|
|
SECTION H_GLIVGIAC2 1 1 1 HEADER
|
|||
|
|
STRINGA 31 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Livello giac"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE _USER,CODGRUPPOGIAC,2|COPY,451
|
|||
|
|
END
|
|||
|
|
STRINGA 31 30 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Livello giac"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
MESSAGE _USER,GRUPPOGIAC,2|COPY,450
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_LIVGIAC2 1 0 0 FILE LF_MAG GROUP CODART
|
|||
|
|
STRINGA 60 20 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,3@
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION H_GLIVGIAC3 1 1 1 HEADER
|
|||
|
|
STRINGA 31 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Livello giac"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE _USER,CODGRUPPOGIAC,3|COPY,351
|
|||
|
|
END
|
|||
|
|
STRINGA 31 30 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Livello giac"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
MESSAGE _USER,GRUPPOGIAC,3|COPY,350
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_LIVGIAC3 1 0 0 FILE LF_MAG GROUP CODART
|
|||
|
|
STRINGA 60 40 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "CATMER"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE RESET,2@
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION H_GLIVGIAC4 1 1 1 HEADER
|
|||
|
|
STRINGA 31 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Livello giac"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
MESSAGE _USER,CODGRUPPOGIAC,4|COPY,251
|
|||
|
|
END
|
|||
|
|
STRINGA 31 30 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Livello giac"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
MESSAGE _USER,GRUPPOGIAC,4|COPY,250
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_LIVGIAC4 1 0 0 FILE LF_MAG GROUP CODART
|
|||
|
|
STRINGA 60 20 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "DESCR. MAGAZZ"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
FIELD 500@->s0
|
|||
|
|
MESSAGE RESET,1@|COPY,150
|
|||
|
|
END
|
|||
|
|
STRINGA 61 50 1
|
|||
|
|
BEGIN
|
|||
|
|
FLAG "H"
|
|||
|
|
KEY "COD. MAGAZZ"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
FIELD 500@->CODTAB
|
|||
|
|
MESSAGE COPY,151
|
|||
|
|
END
|
|||
|
|
SECTION H_MAGAZZINO 1 0 0 GROUP
|
|||
|
|
SECTION H_MAGAZZINO_NODEP 1 0 0 STR_EXPR 500@->B0!="X" // NON DIVISO IN DEPOSITI
|
|||
|
|
STRINGA 60 40 1
|
|||
|
|
BEGIN
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
KEY "codice magazzino"
|
|||
|
|
MESSAGE HIDE,TOT_DEPOSITO
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
SECTION H_MAGAZZINO_DEP 1 1 1 STR_EXPR 500@->B0=="X" // DIVISIONE IN DEPOSITI
|
|||
|
|
STRINGA 60 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "descr magazzino"
|
|||
|
|
FIELD 500@->CODTAB[1,3]
|
|||
|
|
PROMPT 2 1 " Magazzino "
|
|||
|
|
MESSAGE SHOW,TOT_DEPOSITO
|
|||
|
|
END
|
|||
|
|
STRINGA 61 70 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "codice magazzino"
|
|||
|
|
FIELD 500@->s0
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
SECTION GRUPPI_MAGAZZINO 1 0 0 FILE LF_MAG GROUP CODMAG[1,3]
|
|||
|
|
SECTION H_DEPOSITO 1 0 0 GROUP
|
|||
|
|
END
|
|||
|
|
SECTION TOT_DEPOSITO 1 1 1 GROUP
|
|||
|
|
STRINGA 51 20
|
|||
|
|
BEGIN
|
|||
|
|
KEY "CODICE"
|
|||
|
|
FIELD 501@->CODTAB[4,5]
|
|||
|
|
PROMPT 2 1 " Deposito "
|
|||
|
|
END
|
|||
|
|
STRINGA 52 30
|
|||
|
|
BEGIN
|
|||
|
|
KEY "descr"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
FIELD 501@->s0
|
|||
|
|
END
|
|||
|
|
STRINGA 53 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
FIELD LF_UMART->UM
|
|||
|
|
MESSAGE COPY,153
|
|||
|
|
END
|
|||
|
|
NUMERO 41 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
FIELD LF_MAG->ACQ
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,141
|
|||
|
|
GROUP FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 42 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
FIELD LF_MAG->VALACQ
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,142
|
|||
|
|
GROUP FG_VALORI FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 82 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,LF_MAG->VALACQ/LF_MAG->ACQ
|
|||
|
|
GROUP FG_VALMEDI FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 43 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VEN"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
FIELD LF_MAG->VEN
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,143
|
|||
|
|
GROUP FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 44 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALV"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
FIELD LF_MAG->VALVEN
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,144
|
|||
|
|
GROUP FG_VALORI FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 84 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALV"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,LF_MAG->VALVEN/LF_MAG->VEN
|
|||
|
|
GROUP FG_VALMEDI FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 45 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "RIM"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
FIELD LF_MAG->RIM
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,145
|
|||
|
|
GROUP FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 46 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
FIELD LF_MAG->VALRIM
|
|||
|
|
MESSAGE ADD,146
|
|||
|
|
GROUP FG_VALORI FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 86 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,LF_MAG->VALRIM/LF_MAG->RIM
|
|||
|
|
GROUP FG_VALMEDI FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 47 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
FIELD LF_MAG->GIAC
|
|||
|
|
PICTURE "#######@,@#"
|
|||
|
|
MESSAGE ADD,147
|
|||
|
|
GROUP FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 48 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "scorta-giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "#######@,@#"
|
|||
|
|
MESSAGE _NUMEXPR,LF_MAG->SCORTAMIN-LF_MAG->GIAC|ADD,147
|
|||
|
|
GROUP FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 49 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
FIELD LF_MAG->GIAC
|
|||
|
|
PICTURE "#######@,@#"
|
|||
|
|
MESSAGE ADD,141
|
|||
|
|
GROUP FG_RIGAPREZZI
|
|||
|
|
END
|
|||
|
|
END // depositi dello stesso magazzino
|
|||
|
|
END // MAGAZZ
|
|||
|
|
|
|||
|
|
SECTION TOT_MAGAZZINO 1 1 1 GROUP
|
|||
|
|
STRINGA 151 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Magazzino"
|
|||
|
|
PROMPT 2 1 " Totale mag. "
|
|||
|
|
END
|
|||
|
|
STRINGA 150 30 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Magazzino"
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 153 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE COPY,253
|
|||
|
|
END
|
|||
|
|
NUMERO 141 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,241
|
|||
|
|
GROUP 1
|
|||
|
|
END
|
|||
|
|
NUMERO 142 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,242
|
|||
|
|
GROUP 1 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 182 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#142/#141
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 143 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,243
|
|||
|
|
GROUP 1
|
|||
|
|
END
|
|||
|
|
NUMERO 144 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,244
|
|||
|
|
GROUP 1 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 184 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#144/#143
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 145 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,245
|
|||
|
|
GROUP 1
|
|||
|
|
END
|
|||
|
|
NUMERO 146 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,246
|
|||
|
|
GROUP 1 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 186 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#146/#145
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 147 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "#######@,@#"
|
|||
|
|
MESSAGE ADD,247
|
|||
|
|
GROUP 1
|
|||
|
|
END
|
|||
|
|
END // tot magazz
|
|||
|
|
|
|||
|
|
END // GGIAC4
|
|||
|
|
SECTION TOT_GLIVGIAC4 1 1 1 GROUP
|
|||
|
|
STRINGA 251 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY "Livello giac4"
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 250 30 2
|
|||
|
|
BEGIN
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 253 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE COPY,353
|
|||
|
|
END
|
|||
|
|
NUMERO 241 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,341
|
|||
|
|
GROUP 2
|
|||
|
|
END
|
|||
|
|
NUMERO 242 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,342
|
|||
|
|
GROUP 2 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 282 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#242/#241
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 243 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,343
|
|||
|
|
GROUP 2
|
|||
|
|
END
|
|||
|
|
NUMERO 244 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,344
|
|||
|
|
GROUP 2 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 284 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#244/#243
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 245 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,345
|
|||
|
|
GROUP 2
|
|||
|
|
END
|
|||
|
|
NUMERO 246 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,346
|
|||
|
|
GROUP 2 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 286 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#246/#245
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 247 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,347
|
|||
|
|
GROUP 2
|
|||
|
|
END
|
|||
|
|
END // tot ggiac4
|
|||
|
|
|
|||
|
|
END // GGIAC3
|
|||
|
|
SECTION TOT_GLIVGIAC3 1 1 1 GROUP
|
|||
|
|
STRINGA 351 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 350 30 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 353 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE COPY,453
|
|||
|
|
END
|
|||
|
|
NUMERO 341 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,441
|
|||
|
|
GROUP 3
|
|||
|
|
END
|
|||
|
|
NUMERO 342 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,442
|
|||
|
|
GROUP 3 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 382 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#342/#341
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 343 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,443
|
|||
|
|
GROUP 3
|
|||
|
|
END
|
|||
|
|
NUMERO 344 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,444
|
|||
|
|
GROUP 3 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 384 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#344/#343
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 345 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,445
|
|||
|
|
GROUP 3
|
|||
|
|
END
|
|||
|
|
NUMERO 346 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,446
|
|||
|
|
GROUP 3 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 386 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#346/#345
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 347 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,447
|
|||
|
|
GROUP 3
|
|||
|
|
END
|
|||
|
|
END // tot ggiac3
|
|||
|
|
|
|||
|
|
END // GGIAC2
|
|||
|
|
SECTION TOT_GLIVGIAC2 1 1 1 GROUP
|
|||
|
|
STRINGA 451 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 450 30 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 453 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE COPY,553
|
|||
|
|
END
|
|||
|
|
NUMERO 441 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,541
|
|||
|
|
GROUP 4
|
|||
|
|
END
|
|||
|
|
NUMERO 442 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,542
|
|||
|
|
GROUP 4 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 482 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#442/#441
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 443 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,543
|
|||
|
|
GROUP 4
|
|||
|
|
END
|
|||
|
|
NUMERO 444 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,544
|
|||
|
|
GROUP 4 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 484 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#444/#443
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 445 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,545
|
|||
|
|
GROUP 4
|
|||
|
|
END
|
|||
|
|
NUMERO 446 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,546
|
|||
|
|
GROUP 4 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 486 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#446/#445
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 447 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,547
|
|||
|
|
GROUP 4
|
|||
|
|
END
|
|||
|
|
END // tot ggiac2
|
|||
|
|
END // GGIAC1
|
|||
|
|
SECTION TOT_GLIVGIAC1 1 1 1 GROUP
|
|||
|
|
STRINGA 551 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 550 30 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 553 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE COPY,653
|
|||
|
|
END
|
|||
|
|
NUMERO 541 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,641
|
|||
|
|
GROUP 5
|
|||
|
|
END
|
|||
|
|
NUMERO 542 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,642
|
|||
|
|
GROUP 5 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 582 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#542/#541
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 543 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,643
|
|||
|
|
GROUP 5
|
|||
|
|
END
|
|||
|
|
NUMERO 544 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,644
|
|||
|
|
GROUP 5 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 584 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#544/#543
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 545 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,645
|
|||
|
|
GROUP 5
|
|||
|
|
END
|
|||
|
|
NUMERO 546 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,646
|
|||
|
|
GROUP 5 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 586 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#546/#545
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 547 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,647
|
|||
|
|
GROUP 5
|
|||
|
|
END
|
|||
|
|
END // tot ggiac1
|
|||
|
|
|
|||
|
|
END // FILE GIACENZE
|
|||
|
|
SECTION TOT_ARTICOLO 1 1 1 group
|
|||
|
|
STRINGA 651 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 650 30 2
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 653 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE _USER,COPY_UM,753
|
|||
|
|
END
|
|||
|
|
NUMERO 641 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,741
|
|||
|
|
GROUP 6
|
|||
|
|
END
|
|||
|
|
NUMERO 642 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,742
|
|||
|
|
GROUP 6 FG_VALORI FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 682 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#642/#641
|
|||
|
|
GROUP FG_VALMEDI FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 643 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,743
|
|||
|
|
GROUP 6 FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 644 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,744
|
|||
|
|
GROUP 6 FG_VALORI FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 684 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#644/#643
|
|||
|
|
GROUP FG_VALMEDI FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 645 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,745
|
|||
|
|
GROUP 6 FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 646 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,746
|
|||
|
|
GROUP 6 FG_VALORI FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 686 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#646/#645
|
|||
|
|
GROUP FG_VALMEDI FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 647 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE ADD,747
|
|||
|
|
GROUP 6
|
|||
|
|
GROUP FG_RIGAVALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 648 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ULC"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.###"
|
|||
|
|
GROUP FG_RIGAPREZZI
|
|||
|
|
END
|
|||
|
|
NUMERO 649 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "PREZZO"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "###.###.###"
|
|||
|
|
GROUP FG_RIGAPREZZI
|
|||
|
|
END
|
|||
|
|
END // TOT ART
|
|||
|
|
|
|||
|
|
END // GART8
|
|||
|
|
SECTION TOT_GART8 1 1 1 group
|
|||
|
|
STRINGA 751 20
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 750 30
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 753 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE _USER,COPY_UM,853
|
|||
|
|
END
|
|||
|
|
NUMERO 741 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,753|ADD,841
|
|||
|
|
GROUP 7
|
|||
|
|
END
|
|||
|
|
NUMERO 742 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,842
|
|||
|
|
GROUP 7 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 782 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#742/#741
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 743 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,753|ADD,843
|
|||
|
|
GROUP 7
|
|||
|
|
END
|
|||
|
|
NUMERO 744 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,844
|
|||
|
|
GROUP 7 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 784 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#744/#743
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 745 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,753|ADD,845
|
|||
|
|
GROUP 7
|
|||
|
|
END
|
|||
|
|
NUMERO 746 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,846
|
|||
|
|
GROUP 7 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 786 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#746/#745
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 747 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,753|ADD,847
|
|||
|
|
GROUP 7
|
|||
|
|
END
|
|||
|
|
END // tot gart8
|
|||
|
|
|
|||
|
|
END // GART7
|
|||
|
|
SECTION TOT_GART7 1 1 1 group
|
|||
|
|
STRINGA 851 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 850 30 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 853 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE _USER,COPY_UM,953
|
|||
|
|
END
|
|||
|
|
NUMERO 841 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,853|ADD,941
|
|||
|
|
GROUP 8
|
|||
|
|
END
|
|||
|
|
NUMERO 842 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,942
|
|||
|
|
GROUP 8 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 882 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#842/#841
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 843 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,853|ADD,943
|
|||
|
|
GROUP 8
|
|||
|
|
END
|
|||
|
|
NUMERO 844 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,944
|
|||
|
|
GROUP 8 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 884 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#844/#843
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 845 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,853|ADD,945
|
|||
|
|
GROUP 8
|
|||
|
|
END
|
|||
|
|
NUMERO 846 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,946
|
|||
|
|
GROUP 8 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 886 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#846/#845
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 847 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,853|ADD,947
|
|||
|
|
GROUP 8
|
|||
|
|
END
|
|||
|
|
END // tot gart7
|
|||
|
|
|
|||
|
|
END // GART6
|
|||
|
|
SECTION TOT_GART6 1 1 1 group
|
|||
|
|
STRINGA 951 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 950 30 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 953 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE _USER,COPY_UM,1053
|
|||
|
|
END
|
|||
|
|
NUMERO 941 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,953|ADD,1041
|
|||
|
|
GROUP 9
|
|||
|
|
END
|
|||
|
|
NUMERO 942 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1042
|
|||
|
|
GROUP 9 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 982 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#942/#941
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 943 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,953|ADD,1043
|
|||
|
|
GROUP 9
|
|||
|
|
END
|
|||
|
|
NUMERO 944 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1044
|
|||
|
|
GROUP 9 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 984 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#944/#943
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 945 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,953|ADD,1045
|
|||
|
|
GROUP 9
|
|||
|
|
END
|
|||
|
|
NUMERO 946 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1046
|
|||
|
|
GROUP 9 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 986 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#946/#945
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
|
|||
|
|
NUMERO 947 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,953|ADD,1047
|
|||
|
|
GROUP 9
|
|||
|
|
END
|
|||
|
|
END // tot gart6
|
|||
|
|
|
|||
|
|
END // GART5
|
|||
|
|
SECTION TOT_GART5 1 1 1 group
|
|||
|
|
STRINGA 1051 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 1050 30 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 1053 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE _USER,COPY_UM,1153
|
|||
|
|
END
|
|||
|
|
NUMERO 1041 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1053|ADD,1141
|
|||
|
|
GROUP 10
|
|||
|
|
END
|
|||
|
|
NUMERO 1042 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1142
|
|||
|
|
GROUP 10 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1082 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1042/#1041
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1043 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1053|ADD,1143
|
|||
|
|
GROUP 10
|
|||
|
|
END
|
|||
|
|
NUMERO 1044 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1144
|
|||
|
|
GROUP 10 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1084 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1044/#1043
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1045 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1053|ADD,1145
|
|||
|
|
GROUP 10
|
|||
|
|
END
|
|||
|
|
NUMERO 1046 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1146
|
|||
|
|
GROUP 10 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1086 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1046/#1045
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1047 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1053|ADD,1147
|
|||
|
|
GROUP 10
|
|||
|
|
END
|
|||
|
|
END // tot gart5
|
|||
|
|
|
|||
|
|
END // GART4
|
|||
|
|
SECTION TOT_GART4 1 1 1 group
|
|||
|
|
STRINGA 1151 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 1150 30 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 1153 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE _USER,COPY_UM,1253
|
|||
|
|
END
|
|||
|
|
NUMERO 1141 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1153|ADD,1241
|
|||
|
|
GROUP 11
|
|||
|
|
END
|
|||
|
|
NUMERO 1142 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1242
|
|||
|
|
GROUP 11 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1182 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1142/#1141
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1143 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1153|ADD,1243
|
|||
|
|
GROUP 11
|
|||
|
|
END
|
|||
|
|
NUMERO 1144 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1244
|
|||
|
|
GROUP 11 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1184 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1144/#1143
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1145 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1153|ADD,1245
|
|||
|
|
GROUP 11
|
|||
|
|
END
|
|||
|
|
NUMERO 1146 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1246
|
|||
|
|
GROUP 11 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1186 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1146/#1145
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1147 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1153|ADD,1247
|
|||
|
|
GROUP 11
|
|||
|
|
END
|
|||
|
|
END // tot gart4
|
|||
|
|
|
|||
|
|
END // GART3
|
|||
|
|
SECTION TOT_GART3 1 1 1 group
|
|||
|
|
STRINGA 1251 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 1250 30 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 1253 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE _USER,COPY_UM,1353
|
|||
|
|
END
|
|||
|
|
NUMERO 1241 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1253|ADD,1341
|
|||
|
|
GROUP 12
|
|||
|
|
END
|
|||
|
|
NUMERO 1242 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1342
|
|||
|
|
GROUP 12 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1282 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1242/#1241
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1243 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1253|ADD,1343
|
|||
|
|
GROUP 12
|
|||
|
|
END
|
|||
|
|
NUMERO 1244 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1344
|
|||
|
|
GROUP 12 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1284 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1244/#1243
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1245 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1253|ADD,1345
|
|||
|
|
GROUP 12
|
|||
|
|
END
|
|||
|
|
NUMERO 1246 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1346
|
|||
|
|
GROUP 12 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1286 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1246/#1245
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1247 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1253|ADD,1347
|
|||
|
|
GROUP 12
|
|||
|
|
END
|
|||
|
|
END // tot gart3
|
|||
|
|
|
|||
|
|
END // GART2
|
|||
|
|
SECTION TOT_GART2 1 1 1 group
|
|||
|
|
STRINGA 1351 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 1350 30 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 1353 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE _USER,COPY_UM,1453
|
|||
|
|
END
|
|||
|
|
NUMERO 1341 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1353|ADD,1441
|
|||
|
|
GROUP 13
|
|||
|
|
END
|
|||
|
|
NUMERO 1342 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1442
|
|||
|
|
GROUP 13 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1382 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1342/#1341
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1343 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1353|ADD,1443
|
|||
|
|
GROUP 13
|
|||
|
|
END
|
|||
|
|
NUMERO 1344 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1444
|
|||
|
|
GROUP 13 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1384 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1344/#1343
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1345 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1353|ADD,1445
|
|||
|
|
GROUP 13
|
|||
|
|
END
|
|||
|
|
NUMERO 1346 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1446
|
|||
|
|
GROUP 13 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1386 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1346/#1345
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1347 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1353|ADD,1447
|
|||
|
|
GROUP 13
|
|||
|
|
END
|
|||
|
|
END // tot gart2
|
|||
|
|
|
|||
|
|
END // GART1
|
|||
|
|
SECTION TOT_GART1 1 1 1 group
|
|||
|
|
STRINGA 1451 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 1450 30 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 1453 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
MESSAGE _USER,COPY_UM,1553
|
|||
|
|
END
|
|||
|
|
NUMERO 1441 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1453|ADD,1541
|
|||
|
|
GROUP 14
|
|||
|
|
END
|
|||
|
|
NUMERO 1442 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1542
|
|||
|
|
GROUP 14 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1482 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1442/#1441
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1443 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1453|ADD,1543
|
|||
|
|
GROUP 14
|
|||
|
|
END
|
|||
|
|
NUMERO 1444 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1544
|
|||
|
|
GROUP 14 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1484 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1444/#1443
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1445 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1453|ADD,1545
|
|||
|
|
GROUP 14
|
|||
|
|
END
|
|||
|
|
NUMERO 1446 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
MESSAGE ADD,1546
|
|||
|
|
GROUP 14 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1486 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1446/#1445
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1447 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1453|ADD,1547
|
|||
|
|
GROUP 14
|
|||
|
|
END
|
|||
|
|
END // tot gart1
|
|||
|
|
|
|||
|
|
END // GRUPPI_CATMER
|
|||
|
|
|
|||
|
|
SECTION TOT_CATMER 1 1 1 group
|
|||
|
|
STRINGA 1551 20 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 2 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 1550 30 1
|
|||
|
|
BEGIN
|
|||
|
|
KEY ""
|
|||
|
|
PROMPT 3 1 ""
|
|||
|
|
END
|
|||
|
|
STRINGA 1553 3
|
|||
|
|
BEGIN
|
|||
|
|
KEY "UM"
|
|||
|
|
PROMPT 5 1 ""
|
|||
|
|
END
|
|||
|
|
NUMERO 1541 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ACQ"
|
|||
|
|
PROMPT 6 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1553
|
|||
|
|
GROUP 15
|
|||
|
|
END
|
|||
|
|
NUMERO 1542 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
GROUP 15 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1582 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALACQ"
|
|||
|
|
PROMPT 7 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1542/#1541
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1543 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "ven"
|
|||
|
|
PROMPT 8 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1553
|
|||
|
|
GROUP 15
|
|||
|
|
END
|
|||
|
|
NUMERO 1544 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
GROUP 15 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1584 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALven"
|
|||
|
|
PROMPT 9 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1544/#1543
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1545 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "rim"
|
|||
|
|
PROMPT 10 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1553
|
|||
|
|
GROUP 15
|
|||
|
|
END
|
|||
|
|
NUMERO 1546 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "###.###.##@"
|
|||
|
|
GROUP 15 FG_VALORI
|
|||
|
|
END
|
|||
|
|
NUMERO 1586 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "VALrim"
|
|||
|
|
PROMPT 11 1 ""
|
|||
|
|
PICTURE "#######,@##"
|
|||
|
|
MESSAGE _NUMEXPR,#1546/#1545
|
|||
|
|
GROUP FG_VALMEDI
|
|||
|
|
END
|
|||
|
|
NUMERO 1547 12
|
|||
|
|
BEGIN
|
|||
|
|
KEY "giac"
|
|||
|
|
PROMPT 12 1 ""
|
|||
|
|
PICTURE "########,@#"
|
|||
|
|
MESSAGE _USER,VALIDATE_UM,1553
|
|||
|
|
GROUP 15
|
|||
|
|
END
|
|||
|
|
END // tot catmerc
|
|||
|
|
|
|||
|
|
END // section body, loop anamag
|
|||
|
|
|
|||
|
|
SECTION FOOTER ODD 2
|
|||
|
|
END // fine footersection
|
|||
|
|
|
|||
|
|
END // fine form
|