Correzioni per XI
git-svn-id: svn://10.65.10.50/trunk@2832 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
8403ea28ad
commit
20b383cc49
@ -3,7 +3,7 @@
|
|||||||
|
|
||||||
PAGE "Scarico Archivio" -1 -1 70 13
|
PAGE "Scarico Archivio" -1 -1 70 13
|
||||||
|
|
||||||
STRING FLD_OUTFILE 50
|
STRING FLD_OUTFILE 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "File di output "
|
PROMPT 2 1 "File di output "
|
||||||
HELP "Nome del file sul quale scaricare"
|
HELP "Nome del file sul quale scaricare"
|
||||||
@ -45,18 +45,21 @@ STRING FLD_FS 5
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 7 "Separatore di campi "
|
PROMPT 2 7 "Separatore di campi "
|
||||||
HELP "Carattere seperatore dei campi"
|
HELP "Carattere seperatore dei campi"
|
||||||
|
FLAGS "P"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_FD 5
|
STRING FLD_FD 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 40 7 "Delimitatore di campi "
|
PROMPT 40 7 "Delimitatore di campi "
|
||||||
HELP "Carattere delimitatore di campi"
|
HELP "Carattere delimitatore di campi"
|
||||||
|
FLAGS "P"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_RS 5
|
STRING FLD_RS 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 9 "Separatore di record "
|
PROMPT 2 9 "Separatore di record "
|
||||||
HELP "Carattere delimitatore di record"
|
HELP "Carattere delimitatore di record"
|
||||||
|
FLAGS "P"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 10 2
|
BUTTON DLG_OK 10 2
|
||||||
|
@ -3,7 +3,7 @@
|
|||||||
|
|
||||||
PAGE "Carico Archivio" -1 -1 70 13
|
PAGE "Carico Archivio" -1 -1 70 13
|
||||||
|
|
||||||
STRING FLD_INFILE 50
|
STRING FLD_INFILE 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "File di input "
|
PROMPT 2 1 "File di input "
|
||||||
HELP "Nome del file dove caricare i dati"
|
HELP "Nome del file dove caricare i dati"
|
||||||
@ -21,18 +21,21 @@ STRING FLD_FS 5
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 5 "Separatore di campi "
|
PROMPT 2 5 "Separatore di campi "
|
||||||
HELP "Carattere separatore dei campi"
|
HELP "Carattere separatore dei campi"
|
||||||
|
FLAGS "P"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_FD 5
|
STRING FLD_FD 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 7 "Delimitatore di campi "
|
PROMPT 2 7 "Delimitatore di campi "
|
||||||
HELP "Carattere delimitatore dei campi"
|
HELP "Carattere delimitatore dei campi"
|
||||||
|
FLAGS "P"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_RS 5
|
STRING FLD_RS 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 9 "Separatore di record "
|
PROMPT 2 9 "Separatore di record "
|
||||||
HELP "Carattere delimitatore dei record"
|
HELP "Carattere delimitatore dei record"
|
||||||
|
FLAGS "P"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 9 2
|
BUTTON DLG_OK 9 2
|
||||||
|
@ -130,17 +130,17 @@ BEGIN
|
|||||||
HELP "Descrizione del campo"
|
HELP "Descrizione del campo"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -13 -1 ""
|
PROMPT -13 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_CANCEL 8 2
|
BUTTON DLG_CANCEL 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -23 -1 ""
|
PROMPT -23 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_DELREC 8 2
|
BUTTON DLG_DELREC 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -33 -1 "Elimina"
|
PROMPT -33 -1 "Elimina"
|
||||||
MESSAGE EXIT,K_DEL
|
MESSAGE EXIT,K_DEL
|
||||||
@ -152,7 +152,7 @@ ENDMASK
|
|||||||
|
|
||||||
PAGE "Chiave" -1 -1 79 9
|
PAGE "Chiave" -1 -1 79 9
|
||||||
|
|
||||||
STRING F_KEXPR 70
|
STRING F_KEXPR 70 60
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 2 "Espress."
|
PROMPT 1 2 "Espress."
|
||||||
HELP "Espressione dell'archivio"
|
HELP "Espressione dell'archivio"
|
||||||
@ -164,17 +164,17 @@ BEGIN
|
|||||||
PROMPT 1 4 "Chiavi duplicate"
|
PROMPT 1 4 "Chiavi duplicate"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -13 -1 ""
|
PROMPT -13 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_CANCEL 8 2
|
BUTTON DLG_CANCEL 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -23 -1 ""
|
PROMPT -23 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_DELREC 8 2
|
BUTTON DLG_DELREC 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -33 -1 "Elimina"
|
PROMPT -33 -1 "Elimina"
|
||||||
MESSAGE EXIT,K_DEL
|
MESSAGE EXIT,K_DEL
|
||||||
|
@ -12,43 +12,43 @@ END
|
|||||||
BOOLEAN F_CONTINUO
|
BOOLEAN F_CONTINUO
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 2 " Continuo"
|
PROMPT 2 2 " Continuo"
|
||||||
MESSAGE TRUE DISABLE,F_ITERAZIONI|RESET,F_ITERAZIONI
|
MESSAGE TRUE DISABLE,F_ITERAZIONI|RESET,F_ITERAZIONI
|
||||||
MESSAGE FALSE ENABLE,F_ITERAZIONI
|
MESSAGE FALSE ENABLE,F_ITERAZIONI
|
||||||
HELP "Tipo di test da svolgere"
|
HELP "Tipo di test da svolgere"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_ITERAZIONI 3
|
NUMBER F_ITERAZIONI 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 4 ""
|
PROMPT 2 4 ""
|
||||||
HELP "Numero di iterazioni del test"
|
HELP "Numero di iterazioni del test"
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT F_LABEL
|
TEXT F_LABEL
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 9 4 "Iterazioni"
|
PROMPT 9 4 "Iterazioni"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_FILES 9 2
|
BUTTON DLG_FILES 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 30 1 "~Files"
|
PROMPT 29 1 "~Files"
|
||||||
MESSAGE EXIT,K_F4
|
MESSAGE EXIT,K_F4
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_REPORT 9 2
|
BUTTON DLG_REPORT 10 2
|
||||||
BEGIN
|
|
||||||
PROMPT 30 3 "~Report"
|
|
||||||
MESSAGE EXIT,K_F5
|
|
||||||
END
|
|
||||||
|
|
||||||
BUTTON DLG_TEST 9 2
|
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 30 5 "~Test"
|
PROMPT 29 3 "~Report"
|
||||||
MESSAGE EXIT,K_ENTER
|
MESSAGE EXIT,K_F5
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_CANCEL 9 2
|
BUTTON DLG_TEST 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 30 7 ""
|
PROMPT 29 5 "~Test"
|
||||||
|
MESSAGE EXIT,K_ENTER
|
||||||
|
END
|
||||||
|
|
||||||
|
BUTTON DLG_CANCEL 10 2
|
||||||
|
BEGIN
|
||||||
|
PROMPT 29 7 ""
|
||||||
END
|
END
|
||||||
ENDMASK
|
ENDMASK
|
||||||
|
|
||||||
|
@ -2,32 +2,32 @@
|
|||||||
#include <tokens.h>
|
#include <tokens.h>
|
||||||
#include "ba1300a.h"
|
#include "ba1300a.h"
|
||||||
|
|
||||||
PAGE "Debugging" -1 -1 42 7
|
PAGE "Debugging" -1 -1 42 8
|
||||||
|
|
||||||
NUMBER F_FILE 3
|
NUMBER F_FILE 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Numero file "
|
PROMPT 2 1 "Numero file "
|
||||||
SHEET "N.@5|Nome@20|EOD@7|EOX@7|Lung. |Descrizione@43"
|
SHEET "N.@5|Nome@20|EOD@7|EOX@7|Lung. |Descrizione@43"
|
||||||
INPUT F_FILE
|
INPUT F_FILE
|
||||||
OUTPUT F_FILE
|
OUTPUT F_FILE
|
||||||
HELP "Numero del file da esaminare"
|
HELP "Numero del file da esaminare"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_SEQUENZA 20
|
STRING F_SEQUENZA 20
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "File Random "
|
PROMPT 2 3 "File Random "
|
||||||
HELP "Nome del file della sequenza"
|
HELP "Nome del file della sequenza"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 9 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 6 ""
|
PROMPT -12 6 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_CANCEL 9 2
|
BUTTON DLG_CANCEL 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 6 ""
|
PROMPT -22 6 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDMASK
|
ENDMASK
|
||||||
|
|
||||||
|
@ -23,12 +23,12 @@ BEGIN
|
|||||||
END
|
END
|
||||||
|
|
||||||
|
|
||||||
BUTTON DLG_OK 9 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_CANCEL 9 2
|
BUTTON DLG_CANCEL 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
@ -1,4 +1,4 @@
|
|||||||
PAGE "POSIZIONAMENTO MODULI" -1 -1 49 6
|
PAGE "POSIZIONAMENTO MODULI" -1 -1 55 6
|
||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
BEGIN
|
BEGIN
|
||||||
|
104
ba/ba2100f.uml
104
ba/ba2100f.uml
@ -3,8 +3,8 @@
|
|||||||
TOOLBAR "" 0 20 0 2
|
TOOLBAR "" 0 20 0 2
|
||||||
|
|
||||||
BUTTON F_OPTIONS 10 2
|
BUTTON F_OPTIONS 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -13 -1 "Opzioni"
|
PROMPT -13 -1 "Opzioni"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 10 2
|
BUTTON DLG_OK 10 2
|
||||||
@ -19,7 +19,7 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "CAMPO DI STAMPA" -1 -1 78 21
|
PAGE "Parametri di stampa" -1 -1 78 21
|
||||||
|
|
||||||
LIST F_CLASS 10
|
LIST F_CLASS 10
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -126,16 +126,16 @@ END
|
|||||||
|
|
||||||
NUMBER F_SPACES 2
|
NUMBER F_SPACES 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 6 "N. spazi davanti al campo "
|
PROMPT 1 6 "N. spazi davanti al campo "
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_FINKL
|
BOOLEAN F_FINKL
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 40 6 "Fincatura prima"
|
PROMPT 40 6 "Fincatura prima"
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_FINKR
|
BOOLEAN F_FINKR
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 63 6 "Fincatura dopo"
|
PROMPT 63 6 "Fincatura dopo"
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -155,7 +155,7 @@ END
|
|||||||
|
|
||||||
LIST F_DFORMAT 16
|
LIST F_DFORMAT 16
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 9 "Tipo data "
|
PROMPT 3 9 "Tipo data "
|
||||||
ITEM "1|Giorno Mese Anno"
|
ITEM "1|Giorno Mese Anno"
|
||||||
ITEM "2|Mese Giorno Anno"
|
ITEM "2|Mese Giorno Anno"
|
||||||
ITEM "3|Anno Mese Giorno"
|
ITEM "3|Anno Mese Giorno"
|
||||||
@ -164,53 +164,53 @@ ITEM "4|Anno"
|
|||||||
ITEM "5|Mese"
|
ITEM "5|Mese"
|
||||||
ITEM "6|Giorno"
|
ITEM "6|Giorno"
|
||||||
GROUP 8
|
GROUP 8
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_DDAY 16
|
LIST F_DDAY 16
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 42 9 "Formato giorno "
|
PROMPT 42 9 "Formato giorno "
|
||||||
ITEM "4|Con zeri(es. 02)"
|
ITEM "4|Con zeri(es. 02)"
|
||||||
ITEM "2|Normale (es. 2)"
|
ITEM "2|Normale (es. 2)"
|
||||||
ITEM "5|In lettere"
|
ITEM "5|In lettere"
|
||||||
ITEM "6|Giorno settimana"
|
ITEM "6|Giorno settimana"
|
||||||
GROUP 8
|
GROUP 8
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_DMONTH 16
|
LIST F_DMONTH 16
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 10 "Formato mese "
|
PROMPT 3 10 "Formato mese "
|
||||||
ITEM "4|Con zeri(es. 02)"
|
ITEM "4|Con zeri(es. 02)"
|
||||||
ITEM "2|Normale (es. 2)"
|
ITEM "2|Normale (es. 2)"
|
||||||
ITEM "5|In lettere"
|
ITEM "5|In lettere"
|
||||||
ITEM "7|Trimestre"
|
ITEM "7|Trimestre"
|
||||||
GROUP 8
|
GROUP 8
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_DYEAR 16
|
LIST F_DYEAR 16
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 42 10 "Formato anno "
|
PROMPT 42 10 "Formato anno "
|
||||||
ITEM "2|Breve (2 cifre)"
|
ITEM "2|Breve (2 cifre)"
|
||||||
ITEM "4|Lungo (4 cifre)"
|
ITEM "4|Lungo (4 cifre)"
|
||||||
GROUP 8
|
GROUP 8
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_DSEP 5
|
LIST F_DSEP 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 11 "Separatore "
|
PROMPT 3 11 "Separatore "
|
||||||
ITEM "-|-"
|
ITEM "-|-"
|
||||||
ITEM "/|/"
|
ITEM "/|/"
|
||||||
ITEM ".|."
|
ITEM ".|."
|
||||||
ITEM ",|,"
|
ITEM ",|,"
|
||||||
ITEM "S|Spazio"
|
ITEM "S|Spazio"
|
||||||
GROUP 8
|
GROUP 8
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_DEXAMPLE 40
|
STRING F_DEXAMPLE 40
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 28 11 "Esempio "
|
PROMPT 28 11 "Esempio "
|
||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
GROUP 8
|
GROUP 8
|
||||||
END
|
END
|
||||||
|
|
||||||
// fine gruppo 8
|
// fine gruppo 8
|
||||||
|
|
||||||
@ -219,29 +219,29 @@ STRING F_FILE1 80 60
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 13 "Archivio "
|
PROMPT 2 13 "Archivio "
|
||||||
HELP "Nome dell'archivio relativo al campo"
|
HELP "Nome dell'archivio relativo al campo"
|
||||||
FLAGS "D"
|
FLAGS "DB"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON F_BUT_FILE1 2 1
|
//BUTTON F_BUT_FILE1 2 1
|
||||||
BEGIN
|
//BEGIN
|
||||||
PROMPT 73 13 "*"
|
//PROMPT 73 13 "*"
|
||||||
PICTURE 109
|
//PICTURE 109
|
||||||
GROUP 7
|
//GROUP 7
|
||||||
END
|
//END
|
||||||
|
|
||||||
STRING F_FIELD1 80 60
|
STRING F_FIELD1 80 60
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 14 "Campo 1 "
|
PROMPT 2 14 "Campo 1 "
|
||||||
HELP "Nome del campo su file"
|
HELP "Nome del campo su file"
|
||||||
FLAGS "D"
|
FLAGS "DB"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON F_BUT_FIELD1 2 1
|
//BUTTON F_BUT_FIELD1 2 1
|
||||||
BEGIN
|
//BEGIN
|
||||||
PROMPT 73 14 "*"
|
// PROMPT 73 14 "*"
|
||||||
PICTURE 109
|
// PICTURE 109
|
||||||
GROUP 7
|
// GROUP 7
|
||||||
END
|
//END
|
||||||
|
|
||||||
STRING F_FIELDREF1 20 16
|
STRING F_FIELDREF1 20 16
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -253,14 +253,14 @@ NUMBER F_FROM1 2
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 15 "Da "
|
PROMPT 2 15 "Da "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
GROUP 7
|
GROUP 7
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_TO1 2
|
NUMBER F_TO1 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 22 15 "A "
|
PROMPT 22 15 "A "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
GROUP 7
|
GROUP 7
|
||||||
END
|
END
|
||||||
|
|
||||||
|
|
||||||
@ -268,29 +268,29 @@ STRING F_FILE2 60
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 16 "Archivio "
|
PROMPT 2 16 "Archivio "
|
||||||
HELP "Nome dell'archivio relativo al campo"
|
HELP "Nome dell'archivio relativo al campo"
|
||||||
FLAGS "D"
|
FLAGS "DB"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON F_BUT_FILE2 2 1
|
//BUTTON F_BUT_FILE2 2 1
|
||||||
BEGIN
|
//BEGIN
|
||||||
PROMPT 73 16 "*"
|
//PROMPT 73 16 "*"
|
||||||
PICTURE 109
|
//PICTURE 109
|
||||||
GROUP 7
|
//GROUP 7
|
||||||
END
|
//END
|
||||||
|
|
||||||
STRING F_FIELD2 60
|
STRING F_FIELD2 60
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 17 "Campo 2 "
|
PROMPT 2 17 "Campo 2 "
|
||||||
HELP "Nome del campo su file"
|
HELP "Nome del campo su file"
|
||||||
FLAGS "D"
|
FLAGS "DB"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON F_BUT_FIELD2 2 1
|
//BUTTON F_BUT_FIELD2 2 1
|
||||||
BEGIN
|
//BEGIN
|
||||||
PROMPT 73 17 "*"
|
//PROMPT 73 17 "*"
|
||||||
PICTURE 109
|
//PICTURE 109
|
||||||
GROUP 7
|
//GROUP 7
|
||||||
END
|
//END
|
||||||
|
|
||||||
STRING F_FIELDREF2 16
|
STRING F_FIELDREF2 16
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -302,24 +302,24 @@ NUMBER F_FROM2 2
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 18 "Da "
|
PROMPT 2 18 "Da "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
GROUP 7
|
GROUP 7
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_TO2 2
|
NUMBER F_TO2 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 22 18 "A "
|
PROMPT 22 18 "A "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
GROUP 7
|
GROUP 7
|
||||||
END
|
END
|
||||||
|
|
||||||
//GROUPBOX DLG_NULL 78 8
|
//GROUPBOX DLG_NULL 78 8
|
||||||
//BEGIN
|
//BEGIN
|
||||||
//PROMPT 1 11 "Campi su file"
|
//PROMPT 1 11 "Campi su file"
|
||||||
//END
|
//END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "SUPERPRASSI" -1 -1 78 20
|
PAGE "Parametri avanzati" -1 -1 78 20
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 3
|
GROUPBOX DLG_NULL 78 3
|
||||||
BEGIN
|
BEGIN
|
||||||
|
@ -30,20 +30,20 @@ END
|
|||||||
|
|
||||||
STRING F_CTP 1
|
STRING F_CTP 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 40 3 "Carattere posizionamento"
|
PROMPT 38 3 "Carattere posizionamento "
|
||||||
HELP "Carattere da utilizzare per il posizionamento del modulo"
|
HELP "Carattere da utilizzare per il posizionamento del modulo"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_FONT 2 16
|
LIST F_FONT 2 16
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 4 "Font "
|
PROMPT 3 4 "Font "
|
||||||
ITEM "Courier New|Courier New"
|
ITEM "Courier New|Courier New"
|
||||||
HELP "Font di stampa su video o stampante"
|
HELP "Font di stampa su video o stampante"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_SIZE 3
|
LIST F_SIZE 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 53 4 "Dimensione "
|
PROMPT 53 4 "Dimensione "
|
||||||
ITEM "12|12"
|
ITEM "12|12"
|
||||||
HELP "Dimensioni del carattere di stampa"
|
HELP "Dimensioni del carattere di stampa"
|
||||||
END
|
END
|
||||||
@ -51,7 +51,7 @@ END
|
|||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 40 5 "Colonne di posizionamento"
|
PROMPT 38 5 "Colonne di posizionamento"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_IPX 3
|
NUMBER F_IPX 3
|
||||||
@ -79,28 +79,28 @@ END
|
|||||||
|
|
||||||
NUMBER F_Y 3
|
NUMBER F_Y 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 40 6 "Spostamento verticale "
|
PROMPT 38 6 "Spostamento verticale "
|
||||||
END
|
END
|
||||||
|
|
||||||
SPREADSHEET F_FIELDS 0 8
|
SPREADSHEET F_FIELDS 0 8
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 0 8 ""
|
PROMPT 0 8 ""
|
||||||
ITEM "ID@3"
|
ITEM "ID@3"
|
||||||
ITEM "Descrizione@40"
|
ITEM "Descrizione@40"
|
||||||
ITEM "Pr"
|
ITEM "Pr"
|
||||||
ITEM "Y@2"
|
ITEM "Y@2"
|
||||||
ITEM "X@3"
|
ITEM "X@3"
|
||||||
ITEM "Lun."
|
ITEM "Larg."
|
||||||
ITEM "Col."
|
ITEM "Col."
|
||||||
ITEM "Intestazione colonna@40"
|
ITEM "Intestazione colonna@40"
|
||||||
ITEM "Spazi"
|
ITEM "Spazi"
|
||||||
ITEM "Finc. sin."
|
ITEM "Finc. sin."
|
||||||
ITEM "Finc. dx."
|
ITEM "Finc. dx."
|
||||||
ITEM "Tipo@10"
|
ITEM "Tipo@10"
|
||||||
ITEM "Esempio formato di stampa@45"
|
ITEM "Esempio formato di stampa@45"
|
||||||
END
|
END
|
||||||
|
|
||||||
|
|
||||||
BUTTON DLG_OK 10 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
@ -116,13 +116,13 @@ ENDPAGE
|
|||||||
ENDMASK
|
ENDMASK
|
||||||
|
|
||||||
|
|
||||||
PAGE "Dettaglio campo" -1 -1 65 16
|
PAGE "Dettaglio campo" -1 -1 65 16
|
||||||
|
|
||||||
NUMBER 101 3
|
NUMBER 101 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 1 "ID "
|
PROMPT 1 1 "ID "
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING 102 80 40
|
STRING 102 80 40
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 2 "Descrizione "
|
PROMPT 1 2 "Descrizione "
|
||||||
@ -137,7 +137,7 @@ END
|
|||||||
|
|
||||||
BOOLEAN 103
|
BOOLEAN 103
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 4 "Non Stampare "
|
PROMPT 1 4 "Non Stampare "
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER 105 3
|
NUMBER 105 3
|
||||||
@ -154,7 +154,7 @@ END
|
|||||||
|
|
||||||
NUMBER 104 2
|
NUMBER 104 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 7 "Y "
|
PROMPT 1 7 "Y "
|
||||||
FLAGS "G"
|
FLAGS "G"
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -162,38 +162,38 @@ NUMBER 107 3
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 8 "Colonna "
|
PROMPT 1 8 "Colonna "
|
||||||
FLAGS "G"
|
FLAGS "G"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER 109 2
|
NUMBER 109 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 9 "Spazi inizio "
|
PROMPT 1 9 "Spazi inizio "
|
||||||
FLAGS "G"
|
FLAGS "G"
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN 110
|
BOOLEAN 110
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 10 "Finc. prima "
|
PROMPT 1 10 "Finc. prima "
|
||||||
FLAGS "G"
|
FLAGS "G"
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN 111
|
BOOLEAN 111
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 26 10 "Finc. dopo "
|
PROMPT 26 10 "Finc. dopo "
|
||||||
FLAGS "G"
|
FLAGS "G"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST 112 10
|
LIST 112 10
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 11 "Tipo "
|
PROMPT 1 11 "Tipo "
|
||||||
ITEM "STRINGA|Testo"
|
ITEM "STRINGA|Testo"
|
||||||
ITEM "NUMERO|Numero"
|
ITEM "NUMERO|Numero"
|
||||||
ITEM "DATA|Data"
|
ITEM "DATA|Data"
|
||||||
ITEM "LISTA|Lista"
|
ITEM "LISTA|Lista"
|
||||||
ITEM "GRUPPO|Gruppo"
|
ITEM "GRUPPO|Gruppo"
|
||||||
ITEM "LINEA|Linea"
|
ITEM "LINEA|Linea"
|
||||||
ITEM "BOX|Box"
|
ITEM "BOX|Box"
|
||||||
ITEM "FIGURA|Figura"
|
ITEM "FIGURA|Figura"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING 113 128 45
|
STRING 113 128 45
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -203,14 +203,14 @@ END
|
|||||||
BUTTON 100 10 2
|
BUTTON 100 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -14 -1 "Dettaglio"
|
PROMPT -14 -1 "Dettaglio"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_DELREC 10 2
|
BUTTON DLG_DELREC 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -24 -1 "~Elimina"
|
PROMPT -24 -1 "~Elimina"
|
||||||
MESSAGE EXIT,K_DEL
|
MESSAGE EXIT,K_DEL
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 10 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -34 -1 ""
|
PROMPT -34 -1 ""
|
||||||
@ -221,6 +221,6 @@ BUTTON DLG_CANCEL 10 2
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -44 -1 ""
|
PROMPT -44 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
ENDMASK
|
ENDMASK
|
||||||
|
@ -38,14 +38,14 @@ STRING F_FILE1 50
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "Archivio "
|
PROMPT 2 3 "Archivio "
|
||||||
HELP "Nome dell'archivio su cui iterare la sottosezione"
|
HELP "Nome dell'archivio su cui iterare la sottosezione"
|
||||||
// FLAGS "D"
|
FLAGS "B"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON F_BUT_FILE1 2 1
|
//BUTTON F_BUT_FILE1 2 1
|
||||||
BEGIN
|
//BEGIN
|
||||||
PROMPT 63 3 "*"
|
// PROMPT 63 3 "*"
|
||||||
PICTURE 109
|
// PICTURE 109
|
||||||
END
|
//END
|
||||||
|
|
||||||
STRING F_FIELDREF1 16
|
STRING F_FIELDREF1 16
|
||||||
BEGIN
|
BEGIN
|
||||||
|
@ -2,7 +2,7 @@
|
|||||||
|
|
||||||
PAGE "Impostazione formato date" -1 -1 55 10
|
PAGE "Impostazione formato date" -1 -1 55 10
|
||||||
|
|
||||||
LIST F_DFORMAT 16
|
LIST F_DFORMAT 18
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 1 "Tipo data "
|
PROMPT 1 1 "Tipo data "
|
||||||
ITEM "1|Giorno Mese Anno"
|
ITEM "1|Giorno Mese Anno"
|
||||||
@ -14,7 +14,7 @@ ITEM "5|Mese"
|
|||||||
ITEM "6|Giorno"
|
ITEM "6|Giorno"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_DDAY 16
|
LIST F_DDAY 18
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 2 "Formato giorno "
|
PROMPT 1 2 "Formato giorno "
|
||||||
ITEM "4|Con zeri(es. 02)"
|
ITEM "4|Con zeri(es. 02)"
|
||||||
@ -23,7 +23,7 @@ ITEM "5|In lettere"
|
|||||||
ITEM "6|Giorno settimana"
|
ITEM "6|Giorno settimana"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_DMONTH 16
|
LIST F_DMONTH 18
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 3 "Formato mese "
|
PROMPT 1 3 "Formato mese "
|
||||||
ITEM "4|Con zeri(es. 02)"
|
ITEM "4|Con zeri(es. 02)"
|
||||||
@ -32,14 +32,14 @@ ITEM "5|In lettere"
|
|||||||
ITEM "7|Trimestre"
|
ITEM "7|Trimestre"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_DYEAR 16
|
LIST F_DYEAR 18
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 4 "Formato anno "
|
PROMPT 1 4 "Formato anno "
|
||||||
ITEM "2|Breve (2 cifre)"
|
ITEM "2|Breve (2 cifre)"
|
||||||
ITEM "4|Lungo (4 cifre)"
|
ITEM "4|Lungo (4 cifre)"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_DSEP 5
|
LIST F_DSEP 8
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 5 "Separatore "
|
PROMPT 1 5 "Separatore "
|
||||||
ITEM "-|-"
|
ITEM "-|-"
|
||||||
|
@ -4,27 +4,27 @@ PAGE "Stampa fogli libro bollato" -1 -1 76 20
|
|||||||
|
|
||||||
NUMBER F_ANNO 4
|
NUMBER F_ANNO 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 3 "Anno Riferimento "
|
PROMPT 3 3 "Anno Riferimento "
|
||||||
HELP "Anno a cui si riferisce il bollato"
|
HELP "Anno a cui si riferisce il bollato"
|
||||||
USE REG
|
USE REG
|
||||||
INPUT CODTAB[1,4] F_ANNO
|
INPUT CODTAB[1,4] F_ANNO
|
||||||
INPUT CODTAB[5,7] F_CODICE
|
INPUT CODTAB[5,7] F_CODICE
|
||||||
DISPLAY "Anno " CODTAB[1,4]
|
DISPLAY "Anno " CODTAB[1,4]
|
||||||
DISPLAY "Codice Registro" CODTAB[5,7]
|
DISPLAY "Codice Registro" CODTAB[5,7]
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
DISPLAY "Tipo" I0
|
DISPLAY "Tipo" I0
|
||||||
OUTPUT F_ANNO CODTAB[1,4]
|
OUTPUT F_ANNO CODTAB[1,4]
|
||||||
OUTPUT F_CODICE CODTAB[5,7]
|
OUTPUT F_CODICE CODTAB[5,7]
|
||||||
OUTPUT F_REGISTRO S0
|
OUTPUT F_REGISTRO S0
|
||||||
FLAGS "Z"
|
FLAGS "Z"
|
||||||
KEY 1
|
KEY 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_CODDITTA 5
|
STRING F_CODDITTA 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 2 "Ditta "
|
PROMPT 3 2 "Ditta "
|
||||||
FLAGS "DFR"
|
FLAGS "DFR"
|
||||||
KEY 1
|
KEY 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_CODICE 3
|
STRING F_CODICE 3
|
||||||
@ -54,14 +54,14 @@ BEGIN
|
|||||||
END
|
END
|
||||||
|
|
||||||
STRING F_RAGSOC 60 50
|
STRING F_RAGSOC 60 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 7 "Ragione sociale "
|
PROMPT 3 7 "Ragione sociale "
|
||||||
HELP "Ragione sociale dell'intestatario del registro"
|
HELP "Ragione sociale dell'intestatario del registro"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_INDIRIZZO 35
|
STRING F_INDIRIZZO 35
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 8 "Indirizzo "
|
PROMPT 3 8 "Indirizzo "
|
||||||
HELP "Indirizzo dell'intestatario del registro"
|
HELP "Indirizzo dell'intestatario del registro"
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -95,7 +95,7 @@ BEGIN
|
|||||||
HELP "Provincia dell'intestatario del registro"
|
HELP "Provincia dell'intestatario del registro"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_STATO 18
|
LIST F_STATO 20
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 10 "Stato "
|
PROMPT 3 10 "Stato "
|
||||||
FIELD LF_ANAG->STATOPAIV
|
FIELD LF_ANAG->STATOPAIV
|
||||||
|
@ -6,7 +6,7 @@ TOOLBAR "" 0 20 0 2
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Tabella libro unico" -1 -1 78 18
|
PAGE "Tabella libro unico pag. 1" -1 -1 78 18
|
||||||
|
|
||||||
NUMBER F_ANNO 4
|
NUMBER F_ANNO 4
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -74,7 +74,7 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "" -1 -1 78 14
|
PAGE "Pag. 2" -1 -1 78 14
|
||||||
|
|
||||||
LIST F_TIPOA 10
|
LIST F_TIPOA 10
|
||||||
BEGIN
|
BEGIN
|
||||||
|
@ -4,7 +4,7 @@ TOOLBAR "" 0 20 0 2
|
|||||||
#include <toolbar.h>
|
#include <toolbar.h>
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Tabella Comuni 1/2" -1 -1 77 18
|
PAGE "Pag. 1" -1 -1 77 18
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 75 4
|
GROUPBOX DLG_NULL 75 4
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -243,7 +243,7 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Tabella Comuni 2/2" -1 -1 77 18
|
PAGE "Pag. 2" -1 -1 77 18
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 75 4
|
GROUPBOX DLG_NULL 75 4
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -370,7 +370,7 @@ END
|
|||||||
|
|
||||||
LIST FLD_CM2_TERRMON 18
|
LIST FLD_CM2_TERRMON 18
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 34 11 "Territorio montano "
|
PROMPT 34 11 "Territorio montano "
|
||||||
HELP "Codice identificativo di comune residente in territorio montano"
|
HELP "Codice identificativo di comune residente in territorio montano"
|
||||||
FIELD LF_COMUNI->TERRMON
|
FIELD LF_COMUNI->TERRMON
|
||||||
ITEMS " |Non montano"
|
ITEMS " |Non montano"
|
||||||
|
@ -3,13 +3,13 @@
|
|||||||
TOOLBAR "" 0 19 0 3
|
TOOLBAR "" 0 19 0 3
|
||||||
|
|
||||||
|
|
||||||
BUTTON DLG_CHGTIP 21 1
|
BUTTON DLG_CHGTIP 25 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -13 -3 "Persone Giuridiche"
|
PROMPT -13 -3 "Persone Giuridiche"
|
||||||
MESSAGE K_F10
|
MESSAGE K_F10
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_DITTE 8 1
|
BUTTON DLG_DITTE 10 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -36 -3 "Ditte"
|
PROMPT -36 -3 "Ditte"
|
||||||
MESSAGE K_F5
|
MESSAGE K_F5
|
||||||
@ -105,7 +105,7 @@ BEGIN
|
|||||||
PROMPT 13 5 "Partita IVA "
|
PROMPT 13 5 "Partita IVA "
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST FLD_AF1_STATOPAIV 18
|
LIST FLD_AF1_STATOPAIV 20
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 14 6 "Stato "
|
PROMPT 14 6 "Stato "
|
||||||
FIELD LF_ANAG->STATOPAIV
|
FIELD LF_ANAG->STATOPAIV
|
||||||
@ -872,7 +872,7 @@ BEGIN
|
|||||||
PROMPT 36 5 "Eventi di natura eccezionale "
|
PROMPT 36 5 "Eventi di natura eccezionale "
|
||||||
HELP "Codice degli eventi di natura eccezionale"
|
HELP "Codice degli eventi di natura eccezionale"
|
||||||
FIELD LF_ANAG->EVECC
|
FIELD LF_ANAG->EVECC
|
||||||
SHEET "Codice|Descrizione@70"
|
SHEET "Codice|Descrizione@50"
|
||||||
INPUT LST_AF4_EVECC
|
INPUT LST_AF4_EVECC
|
||||||
OUTPUT LST_AF4_EVECC
|
OUTPUT LST_AF4_EVECC
|
||||||
ITEM " |Nessuno"
|
ITEM " |Nessuno"
|
||||||
|
@ -2,13 +2,13 @@
|
|||||||
|
|
||||||
TOOLBAR "" 0 19 0 3
|
TOOLBAR "" 0 19 0 3
|
||||||
|
|
||||||
BUTTON DLG_CHGTIP 21 1
|
BUTTON DLG_CHGTIP 25 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -13 -3 "Persone Fisiche"
|
PROMPT -13 -3 "Persone Fisiche"
|
||||||
MESSAGE K_F10
|
MESSAGE K_F10
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_DITTE 8 1
|
BUTTON DLG_DITTE 10 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -36 -3 "Ditte"
|
PROMPT -36 -3 "Ditte"
|
||||||
MESSAGE K_F5
|
MESSAGE K_F5
|
||||||
@ -78,7 +78,7 @@ BEGIN
|
|||||||
PROMPT 0 4 "Partita IVA "
|
PROMPT 0 4 "Partita IVA "
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST FLD_AG1_STATOPAIV 18
|
LIST FLD_AG1_STATOPAIV 20
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 5 "Stato "
|
PROMPT 2 5 "Stato "
|
||||||
FIELD LF_ANAG->STATOPAIV
|
FIELD LF_ANAG->STATOPAIV
|
||||||
@ -256,7 +256,7 @@ BEGIN
|
|||||||
OUTPUT FLD_AG2_COMRES_COMUNI_DENCOM DENCOM
|
OUTPUT FLD_AG2_COMRES_COMUNI_DENCOM DENCOM
|
||||||
OUTPUT FLD_AG2_COMRES_COMUNI_PROVCOM PROVCOM
|
OUTPUT FLD_AG2_COMRES_COMUNI_PROVCOM PROVCOM
|
||||||
OUTPUT FLD_AG2_CAPRES CAPCOM
|
OUTPUT FLD_AG2_CAPRES CAPCOM
|
||||||
HELP "Codice del comune sede della persoan giuridica"
|
HELP "Codice del comune sede della persona giuridica"
|
||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
WARNING "Comune assente"
|
WARNING "Comune assente"
|
||||||
ADD RUN ba4 -0
|
ADD RUN ba4 -0
|
||||||
@ -985,7 +985,7 @@ BEGIN
|
|||||||
PROMPT 37 4 "Eventi di natura eccezionale "
|
PROMPT 37 4 "Eventi di natura eccezionale "
|
||||||
FIELD LF_ANAG->EVECC
|
FIELD LF_ANAG->EVECC
|
||||||
HELP "Codice degli eventi naturali eccezionali accaduti alla ditta"
|
HELP "Codice degli eventi naturali eccezionali accaduti alla ditta"
|
||||||
SHEET "Codice|Descrizione@70"
|
SHEET "Codice|Descrizione@50"
|
||||||
INPUT LST_AG5_EVECC
|
INPUT LST_AG5_EVECC
|
||||||
OUTPUT LST_AG5_EVECC
|
OUTPUT LST_AG5_EVECC
|
||||||
ITEM " |Nessuno"
|
ITEM " |Nessuno"
|
||||||
|
@ -2,25 +2,25 @@
|
|||||||
|
|
||||||
TOOLBAR "" 0 19 0 3
|
TOOLBAR "" 0 19 0 3
|
||||||
|
|
||||||
BUTTON DLG_ATT 9 1
|
BUTTON DLG_ATT 10 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -16 -3 "Attivita'"
|
PROMPT -16 -3 "Attivita'"
|
||||||
MESSAGE K_F6
|
MESSAGE K_F6
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_ULC 9 1
|
BUTTON DLG_ULC 10 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -26 -3 "U.Locali"
|
PROMPT -26 -3 "U.Locali"
|
||||||
MESSAGE K_F5
|
MESSAGE K_F5
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_SOC 9 1
|
BUTTON DLG_SOC 10 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -36 -3 "Soci"
|
PROMPT -36 -3 "Soci"
|
||||||
MESSAGE K_F7
|
MESSAGE K_F7
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_REG 9 1
|
BUTTON DLG_REG 10 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -46 -3 "Registri"
|
PROMPT -46 -3 "Registri"
|
||||||
MESSAGE K_F8
|
MESSAGE K_F8
|
||||||
@ -29,7 +29,13 @@ END
|
|||||||
#include <toolbar.h>
|
#include <toolbar.h>
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Ditte 1/4" -1 -1 77 18
|
PAGE "Pag. 1" -1 -1 77 18
|
||||||
|
|
||||||
|
GROUPBOX DLG_NULL 76 4
|
||||||
|
BEGIN
|
||||||
|
PROMPT 0 0 ""
|
||||||
|
FLAGS "R"
|
||||||
|
END
|
||||||
|
|
||||||
NUMBER FLD_GD1_CODDITTA 5
|
NUMBER FLD_GD1_CODDITTA 5
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -62,7 +68,7 @@ BEGIN
|
|||||||
INPUT CODANAGR FLD_GD1_CODANAGR SELECT
|
INPUT CODANAGR FLD_GD1_CODANAGR SELECT
|
||||||
INPUT CODDITTA FLD_GD1_CODDITTAH
|
INPUT CODDITTA FLD_GD1_CODDITTAH
|
||||||
COPY DISPLAY FLD_GD1_CODDITTA
|
COPY DISPLAY FLD_GD1_CODDITTA
|
||||||
COPY OUTPUT FLD_GD1_CODDITTA
|
COPY OUTPUT FLD_GD1_CODDITTA
|
||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
MESSAGE COPY,1@|COPY,FLD_GD1_CODDITTA
|
MESSAGE COPY,1@|COPY,FLD_GD1_CODDITTA
|
||||||
END
|
END
|
||||||
@ -100,12 +106,6 @@ BEGIN
|
|||||||
FLAGS "HG"
|
FLAGS "HG"
|
||||||
END
|
END
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 4
|
|
||||||
BEGIN
|
|
||||||
PROMPT 0 0 ""
|
|
||||||
FLAGS "R"
|
|
||||||
END
|
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 4
|
GROUPBOX DLG_NULL 76 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 0 4 "Anagrafica"
|
PROMPT 0 4 "Anagrafica"
|
||||||
@ -225,7 +225,7 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Ditte 2/4" -1 -1 77 18
|
PAGE "Pag. 2" -1 -1 77 18
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 4
|
GROUPBOX DLG_NULL 76 4
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -277,7 +277,7 @@ END
|
|||||||
|
|
||||||
STRING FLD_GD1_NISCRAA 10
|
STRING FLD_GD1_NISCRAA 10
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 10 "Isc.Albo/CAF N."
|
PROMPT 1 10 "Isc.Albo/CAF N. "
|
||||||
FIELD LF_NDITTE->NISCRAA
|
FIELD LF_NDITTE->NISCRAA
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
HELP "Numero di iscrizione all'albo"
|
HELP "Numero di iscrizione all'albo"
|
||||||
@ -367,7 +367,7 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Ditte 3/4" -1 -1 77 18
|
PAGE "Pag. 3" -1 -1 77 18
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 4
|
GROUPBOX DLG_NULL 76 4
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -389,7 +389,7 @@ BEGIN
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST LST_GD2_DATLAV 20
|
LIST LST_GD2_DATLAV 22
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 4 "Datore lavoro "
|
PROMPT 1 4 "Datore lavoro "
|
||||||
FIELD LF_NDITTE->DATLAV
|
FIELD LF_NDITTE->DATLAV
|
||||||
@ -556,7 +556,7 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Ditte 4/4" -1 -1 77 18
|
PAGE "Pag. 4" -1 -1 77 18
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 4
|
GROUPBOX DLG_NULL 76 4
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -654,7 +654,7 @@ BEGIN
|
|||||||
HELP "Indicare se i ricavi sono superiore al 20%"
|
HELP "Indicare se i ricavi sono superiore al 20%"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST FLD_GD3_CARRAPP 21
|
LIST FLD_GD3_CARRAPP 23
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 8 "Carica "
|
PROMPT 1 8 "Carica "
|
||||||
FIELD LF_NDITTE->CARRAPP
|
FIELD LF_NDITTE->CARRAPP
|
||||||
|
@ -4,12 +4,12 @@ TOOLBAR "" 0 20 0 2
|
|||||||
#include <toolbar.h>
|
#include <toolbar.h>
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Unita' locali 1/2" -1 -1 77 18
|
PAGE "Pag. 1" -1 -1 77 18
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 6
|
GROUPBOX DLG_NULL 76 6
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 0 0 "Unita' locale"
|
PROMPT 0 0 "Unita' locale"
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER FLD_UL1_CODDITTA 5
|
NUMBER FLD_UL1_CODDITTA 5
|
||||||
@ -92,7 +92,7 @@ BEGIN
|
|||||||
FIELD LF_UNLOC->COMULC
|
FIELD LF_UNLOC->COMULC
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
USE LF_COMUNI KEY 1
|
USE LF_COMUNI KEY 1
|
||||||
INPUT STATO ""
|
INPUT STATO ""
|
||||||
INPUT COM FLD_UL1_COMULC
|
INPUT COM FLD_UL1_COMULC
|
||||||
#include <comdcod.h>
|
#include <comdcod.h>
|
||||||
OUTPUT FLD_UL1_COMULC COM
|
OUTPUT FLD_UL1_COMULC COM
|
||||||
@ -103,7 +103,7 @@ BEGIN
|
|||||||
MESSAGE COPY,7@
|
MESSAGE COPY,7@
|
||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
WARNING "Comune assente"
|
WARNING "Comune assente"
|
||||||
ADD RUN ba4 -0
|
ADD RUN ba4 -0
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_UL1_COMULC_COMUNI_PROVCOM 2
|
STRING FLD_UL1_COMULC_COMUNI_PROVCOM 2
|
||||||
@ -124,17 +124,17 @@ END
|
|||||||
|
|
||||||
STRING FLD_UL1_COMULC_COMUNI_DENCOM 50
|
STRING FLD_UL1_COMULC_COMUNI_DENCOM 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 4 "Nome "
|
PROMPT 1 4 "Nome "
|
||||||
HELP "Nome del comune dell'unita' locale"
|
HELP "Nome del comune dell'unita' locale"
|
||||||
USE LF_COMUNI KEY 2 SELECT STATO=""
|
USE LF_COMUNI KEY 2 SELECT STATO=""
|
||||||
INPUT DENCOM FLD_UL1_COMULC_COMUNI_DENCOM
|
INPUT DENCOM FLD_UL1_COMULC_COMUNI_DENCOM
|
||||||
#include <comdden.h>
|
#include <comdden.h>
|
||||||
OUTPUT FLD_UL1_COMULC COM
|
OUTPUT FLD_UL1_COMULC COM
|
||||||
OUTPUT FLD_UL1_COMULC_COMUNI_DENCOM DENCOM
|
OUTPUT FLD_UL1_COMULC_COMUNI_DENCOM DENCOM
|
||||||
OUTPUT FLD_UL1_COMULC_COMUNI_PROVCOM PROVCOM
|
OUTPUT FLD_UL1_COMULC_COMUNI_PROVCOM PROVCOM
|
||||||
OUTPUT FLD_UL1_CAPULC CAPCOM
|
OUTPUT FLD_UL1_CAPULC CAPCOM
|
||||||
MESSAGE COPY,10@
|
MESSAGE COPY,10@
|
||||||
ADD RUN ba4 -0
|
ADD RUN ba4 -0
|
||||||
END
|
END
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 6
|
GROUPBOX DLG_NULL 76 6
|
||||||
@ -147,7 +147,7 @@ BEGIN
|
|||||||
PROMPT 1 7 "Numero "
|
PROMPT 1 7 "Numero "
|
||||||
FIELD LF_UNLOC->NUMCCIAA
|
FIELD LF_UNLOC->NUMCCIAA
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
HELP "Numero autorizzazione alla camera di commercio"
|
HELP "Numero autorizzazione alla camera di commercio"
|
||||||
END
|
END
|
||||||
|
|
||||||
DATE FLD_UL1_DATAICCIAA
|
DATE FLD_UL1_DATAICCIAA
|
||||||
@ -167,46 +167,46 @@ END
|
|||||||
|
|
||||||
DATE FLD_UL1_DATAVCCIAA
|
DATE FLD_UL1_DATAVCCIAA
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 40 8 "Data ultima variazione "
|
PROMPT 40 8 "Data ultima variazione "
|
||||||
FIELD LF_UNLOC->DATAVCCIAA
|
FIELD LF_UNLOC->DATAVCCIAA
|
||||||
HELP "Data dell'ultima variazione alla camera di commercio"
|
HELP "Data dell'ultima variazione alla camera di commercio"
|
||||||
WARNING "Data non corretta"
|
WARNING "Data non corretta"
|
||||||
VALIDATE DATE_CMP_FUNC >= FLD_UL1_DATAICCIAA
|
VALIDATE DATE_CMP_FUNC >= FLD_UL1_DATAICCIAA
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_UL1_COMCCIAA 4
|
STRING FLD_UL1_COMCCIAA 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 9 "Comune "
|
PROMPT 1 9 "Comune "
|
||||||
FIELD LF_UNLOC->COMCCIAA
|
FIELD LF_UNLOC->COMCCIAA
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
GROUP 1
|
GROUP 1
|
||||||
COPY USE FLD_UL1_COMULC
|
COPY USE FLD_UL1_COMULC
|
||||||
INPUT STATO ""
|
INPUT STATO ""
|
||||||
INPUT COM FLD_UL1_COMCCIAA
|
INPUT COM FLD_UL1_COMCCIAA
|
||||||
COPY DISPLAY FLD_UL1_COMULC
|
COPY DISPLAY FLD_UL1_COMULC
|
||||||
OUTPUT FLD_UL1_COMCCIAA COM
|
OUTPUT FLD_UL1_COMCCIAA COM
|
||||||
OUTPUT FLD_UL1_COMCCIAA_COMUNI_DENCOM DENCOM
|
OUTPUT FLD_UL1_COMCCIAA_COMUNI_DENCOM DENCOM
|
||||||
HELP "Codice del comune della camera di commercio"
|
HELP "Codice del comune della camera di commercio"
|
||||||
CHECKTYPE NORMAL
|
CHECKTYPE NORMAL
|
||||||
WARNING "Comune assente"
|
WARNING "Comune assente"
|
||||||
VALIDATE EMPTYCOPY_FUNC FLD_UL1_COMULC
|
VALIDATE EMPTYCOPY_FUNC FLD_UL1_COMULC
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_UL1_COMCCIAA_COMUNI_DENCOM 50
|
STRING FLD_UL1_COMCCIAA_COMUNI_DENCOM 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 10 "Nome "
|
PROMPT 1 10 "Nome "
|
||||||
HELP "Nome del comune delle camera di commercio"
|
HELP "Nome del comune delle camera di commercio"
|
||||||
COPY USE FLD_UL1_COMULC_COMUNI_DENCOM
|
COPY USE FLD_UL1_COMULC_COMUNI_DENCOM
|
||||||
INPUT DENCOM FLD_UL1_COMCCIAA_COMUNI_DENCOM
|
INPUT DENCOM FLD_UL1_COMCCIAA_COMUNI_DENCOM
|
||||||
COPY DISPLAY FLD_UL1_COMULC_COMUNI_DENCOM
|
COPY DISPLAY FLD_UL1_COMULC_COMUNI_DENCOM
|
||||||
OUTPUT FLD_UL1_COMCCIAA COM
|
OUTPUT FLD_UL1_COMCCIAA COM
|
||||||
OUTPUT FLD_UL1_COMCCIAA_COMUNI_DENCOM DENCOM
|
OUTPUT FLD_UL1_COMCCIAA_COMUNI_DENCOM DENCOM
|
||||||
ADD RUN ba4 -0
|
ADD RUN ba4 -0
|
||||||
END
|
END
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 4
|
GROUPBOX DLG_NULL 76 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 0 12 "Autorizzazioni"
|
PROMPT 0 12 "Autorizzazioni"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_UL1_NUMREC 7
|
STRING FLD_UL1_NUMREC 7
|
||||||
@ -219,8 +219,8 @@ END
|
|||||||
|
|
||||||
STRING FLD_UL1_AUTCOM 5
|
STRING FLD_UL1_AUTCOM 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 50 13 "N. comunale "
|
PROMPT 50 13 "N. comunale "
|
||||||
FIELD LF_UNLOC->AUTCOM
|
FIELD LF_UNLOC->AUTCOM
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
HELP "Numero dell'autorizzazione comunale all'esercizio"
|
HELP "Numero dell'autorizzazione comunale all'esercizio"
|
||||||
END
|
END
|
||||||
@ -242,12 +242,12 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Unita' locali 2/2" -1 -1 77 18
|
PAGE "Pag. 2" -1 -1 77 18
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 6
|
GROUPBOX DLG_NULL 76 6
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 0 0 "Unita' locale"
|
PROMPT 0 0 "Unita' locale"
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER DLG_NULL 5
|
NUMBER DLG_NULL 5
|
||||||
@ -287,7 +287,7 @@ END
|
|||||||
|
|
||||||
STRING DLG_NULL 4
|
STRING DLG_NULL 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 3 "Comune "
|
PROMPT 1 3 "Comune "
|
||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
GROUP 7
|
GROUP 7
|
||||||
END
|
END
|
||||||
@ -383,7 +383,7 @@ END
|
|||||||
|
|
||||||
STRING FLD_UL2_CAPTRIB 5
|
STRING FLD_UL2_CAPTRIB 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 57 11 "CAP "
|
PROMPT 57 11 "CAP "
|
||||||
FIELD LF_UNLOC->CAPTRIB
|
FIELD LF_UNLOC->CAPTRIB
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
HELP "CAP del comune del tribunale"
|
HELP "CAP del comune del tribunale"
|
||||||
|
@ -4,7 +4,13 @@ TOOLBAR "" 0 20 0 2
|
|||||||
#include <toolbar.h>
|
#include <toolbar.h>
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Attivita' 1/2" -1 -1 77 20
|
PAGE "Pag. 1" -1 -1 77 20
|
||||||
|
|
||||||
|
GROUPBOX DLG_NULL 76 6
|
||||||
|
BEGIN
|
||||||
|
PROMPT 0 0 ""
|
||||||
|
FLAGS "R"
|
||||||
|
END
|
||||||
|
|
||||||
STRING FLD_AT1_CODDITTA 5
|
STRING FLD_AT1_CODDITTA 5
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -107,12 +113,6 @@ BEGIN
|
|||||||
HELP "Nome dell'attivita'"
|
HELP "Nome dell'attivita'"
|
||||||
END
|
END
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 0 0 ""
|
|
||||||
FLAGS "R"
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER FLD_AT1_OLDCODATT 4
|
NUMBER FLD_AT1_OLDCODATT 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 6 "Vecchio codice "
|
PROMPT 1 6 "Vecchio codice "
|
||||||
@ -293,7 +293,13 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Attivita' 2/2" -1 -1 77 20
|
PAGE "Pag. 2" -1 -1 77 20
|
||||||
|
|
||||||
|
GROUPBOX DLG_NULL 76 6
|
||||||
|
BEGIN
|
||||||
|
PROMPT 0 0 ""
|
||||||
|
FLAGS "R"
|
||||||
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 5
|
STRING DLG_NULL 5
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -330,12 +336,6 @@ BEGIN
|
|||||||
GROUP 4
|
GROUP 4
|
||||||
END
|
END
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 0 0 ""
|
|
||||||
FLAGS "R"
|
|
||||||
END
|
|
||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 11 "Indirizzo (Solo se diverso)"
|
PROMPT 1 11 "Indirizzo (Solo se diverso)"
|
||||||
@ -346,7 +346,7 @@ BEGIN
|
|||||||
PROMPT 0 6 "Tenuta Registri Contabili"
|
PROMPT 0 6 "Tenuta Registri Contabili"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST LST_AT2_TIPOADS 9
|
LIST LST_AT2_TIPOADS 10
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 7 "Depositario : Tipo "
|
PROMPT 1 7 "Depositario : Tipo "
|
||||||
FIELD LF_ATTIV->TIPOADS
|
FIELD LF_ATTIV->TIPOADS
|
||||||
|
@ -4,14 +4,14 @@ TOOLBAR "" 0 20 0 2
|
|||||||
#include <toolbar.h>
|
#include <toolbar.h>
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Soci 1/2" -1 -1 77 20
|
PAGE "Pag.1" -1 -1 77 20
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 7
|
GROUPBOX DLG_NULL 76 7
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 0 0 ""
|
PROMPT 0 0 ""
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER FLD_SC1_CODDITTA 5
|
NUMBER FLD_SC1_CODDITTA 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 1 "Ditta "
|
PROMPT 1 1 "Ditta "
|
||||||
@ -70,7 +70,7 @@ END
|
|||||||
|
|
||||||
NUMBER FLD_SC1_CODANAGRSOH 5
|
NUMBER FLD_SC1_CODANAGRSOH 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 30 4 "Codice "
|
PROMPT 31 4 "Codice "
|
||||||
FIELD LF_SOCI->CODANAGRSO
|
FIELD LF_SOCI->CODANAGRSO
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
KEY 1
|
KEY 1
|
||||||
@ -98,7 +98,7 @@ END
|
|||||||
|
|
||||||
NUMBER FLD_SC1_CODANAGRSO 5
|
NUMBER FLD_SC1_CODANAGRSO 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 30 4 "Codice "
|
PROMPT 31 4 "Codice "
|
||||||
FIELD LF_SOCI->CODANAGRSO
|
FIELD LF_SOCI->CODANAGRSO
|
||||||
FLAGS "RG"
|
FLAGS "RG"
|
||||||
KEY 1
|
KEY 1
|
||||||
@ -121,7 +121,7 @@ STRING FLD_SC1_CODANAGR_ANAGR_RAGSOC 50
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 7 5 ": Nome "
|
PROMPT 7 5 ": Nome "
|
||||||
HELP "Nome dell'anagrafica del socio"
|
HELP "Nome dell'anagrafica del socio"
|
||||||
KEY 1
|
KEY 2
|
||||||
USE LF_ANAG KEY 2
|
USE LF_ANAG KEY 2
|
||||||
FLAGS "GP"
|
FLAGS "GP"
|
||||||
INPUT TIPOA LST_SC1_TIPOASOC
|
INPUT TIPOA LST_SC1_TIPOASOC
|
||||||
@ -179,7 +179,7 @@ END
|
|||||||
|
|
||||||
NUMBER FLD_SC1_PERCQUAZ 7 3
|
NUMBER FLD_SC1_PERCQUAZ 7 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 23 10 "%Proprieta' "
|
PROMPT 26 10 "%Proprieta' "
|
||||||
FIELD LF_SOCI->PERCQUAZ
|
FIELD LF_SOCI->PERCQUAZ
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
HELP "Percentuale delle azioni possedute dal socio"
|
HELP "Percentuale delle azioni possedute dal socio"
|
||||||
@ -189,7 +189,7 @@ END
|
|||||||
|
|
||||||
NUMBER FLD_SC1_PERCAZREDD 7 3
|
NUMBER FLD_SC1_PERCAZREDD 7 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 45 10 "%Reddito da quota az."
|
PROMPT 50 10 "%Reddito "
|
||||||
FIELD LF_SOCI->PERCAZREDD
|
FIELD LF_SOCI->PERCAZREDD
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
HELP "Reddito derivante da quote aziendali"
|
HELP "Reddito derivante da quote aziendali"
|
||||||
@ -199,7 +199,7 @@ END
|
|||||||
|
|
||||||
NUMBER FLD_SC1_PERCAZPERD 7 3
|
NUMBER FLD_SC1_PERCAZPERD 7 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 45 11 "%Perdita da quota az."
|
PROMPT 50 11 "%Perdita "
|
||||||
FIELD LF_SOCI->PERCAZPERD
|
FIELD LF_SOCI->PERCAZPERD
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
HELP "Perdita derivante da quote aziendali"
|
HELP "Perdita derivante da quote aziendali"
|
||||||
@ -209,7 +209,7 @@ END
|
|||||||
|
|
||||||
LIST LST_SC1_RICQUAL 28
|
LIST LST_SC1_RICQUAL 28
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 13 "R.qualifica "
|
PROMPT 1 13 "R.qualifica "
|
||||||
FIELD LF_SOCI->RICQUAL
|
FIELD LF_SOCI->RICQUAL
|
||||||
HELP "Qualifica del socio"
|
HELP "Qualifica del socio"
|
||||||
ITEM " |Nessuna"
|
ITEM " |Nessuna"
|
||||||
@ -221,7 +221,7 @@ END
|
|||||||
|
|
||||||
NUMBER FLD_SC1_EMOLUMENTO 15
|
NUMBER FLD_SC1_EMOLUMENTO 15
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 47 13 "Emolumento "
|
PROMPT 47 13 "Emolumento "
|
||||||
FIELD LF_SOCI->EMOLUMENTO
|
FIELD LF_SOCI->EMOLUMENTO
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
@ -230,7 +230,7 @@ END
|
|||||||
|
|
||||||
LIST LST_SC1_PROP 1 24
|
LIST LST_SC1_PROP 1 24
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 14 "Titoli proprieta' "
|
PROMPT 1 14 "Titoli proprieta' "
|
||||||
FIELD LF_SOCI->TITPROP
|
FIELD LF_SOCI->TITPROP
|
||||||
ITEM "1|Intestatario"
|
ITEM "1|Intestatario"
|
||||||
ITEM "2|Riportatore"
|
ITEM "2|Riportatore"
|
||||||
@ -244,7 +244,7 @@ END
|
|||||||
|
|
||||||
LIST LST_SC1_TIPOAZ 1 16
|
LIST LST_SC1_TIPOAZ 1 16
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 45 14 "Tipo azioni "
|
PROMPT 47 14 "Tipo azioni "
|
||||||
FIELD LF_SOCI->TIPOAZ
|
FIELD LF_SOCI->TIPOAZ
|
||||||
ITEM "O|Ordinarie"
|
ITEM "O|Ordinarie"
|
||||||
ITEM "P|Privilegiate"
|
ITEM "P|Privilegiate"
|
||||||
@ -252,6 +252,11 @@ BEGIN
|
|||||||
HELP "Tipo di azioni posseduta dal socio"
|
HELP "Tipo di azioni posseduta dal socio"
|
||||||
END
|
END
|
||||||
|
|
||||||
|
GROUPBOX DLG_NULL 76 3
|
||||||
|
BEGIN
|
||||||
|
PROMPT 0 15 "Ultimo aggiornamento"
|
||||||
|
END
|
||||||
|
|
||||||
DATE FLD_SC1_DATAGG
|
DATE FLD_SC1_DATAGG
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 16 "Data "
|
PROMPT 1 16 "Data "
|
||||||
@ -259,11 +264,6 @@ BEGIN
|
|||||||
FLAGS "DA"
|
FLAGS "DA"
|
||||||
END
|
END
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 3
|
|
||||||
BEGIN
|
|
||||||
PROMPT 0 15 "Ultimo aggiornamento"
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING F_UTENTE 10
|
STRING F_UTENTE 10
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 45 16 "Utente "
|
PROMPT 45 16 "Utente "
|
||||||
@ -272,7 +272,7 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Soci 2/2" -1 -1 77 20
|
PAGE "Pag. 2" -1 -1 77 20
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 76 7
|
GROUPBOX DLG_NULL 76 7
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -294,7 +294,7 @@ BEGIN
|
|||||||
GROUP 3
|
GROUP 3
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST DLG_NULL 9
|
LIST DLG_NULL 12
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 4 "Socio : Tipo "
|
PROMPT 1 4 "Socio : Tipo "
|
||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
@ -314,14 +314,14 @@ END
|
|||||||
|
|
||||||
NUMBER DLG_NULL 5
|
NUMBER DLG_NULL 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 30 4 "Codice "
|
PROMPT 31 4 "Codice "
|
||||||
FLAGS "RD"
|
FLAGS "RD"
|
||||||
GROUP 5
|
GROUP 5
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 50
|
STRING DLG_NULL 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 7 5 ": Nome "
|
PROMPT 9 5 "Nome "
|
||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
GROUP 6
|
GROUP 6
|
||||||
END
|
END
|
||||||
@ -388,9 +388,14 @@ BEGIN
|
|||||||
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=12)}
|
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=12)}
|
||||||
END
|
END
|
||||||
|
|
||||||
|
TEXT DLG_NULL
|
||||||
|
BEGIN
|
||||||
|
PROMPT 1 12 "Codice del dichiarante nel caso in cui il socio sia codichiarante"
|
||||||
|
END
|
||||||
|
|
||||||
NUMBER FLD_SC2_CODANAGCON 5
|
NUMBER FLD_SC2_CODANAGCON 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 12 "Coniuge: Codice "
|
PROMPT 10 14 "Codice "
|
||||||
FIELD LF_SOCI->CODANAGCON
|
FIELD LF_SOCI->CODANAGCON
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
GROUP 1
|
GROUP 1
|
||||||
@ -409,7 +414,7 @@ END
|
|||||||
|
|
||||||
STRING FLD_SC2_CODANAGCON_ANAFIS_RAGSOC 50
|
STRING FLD_SC2_CODANAGCON_ANAFIS_RAGSOC 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 8 13 ": Nome "
|
PROMPT 10 15 "Nome "
|
||||||
HELP "Nome del coniuge del socio"
|
HELP "Nome del coniuge del socio"
|
||||||
USE LF_ANAG KEY 2
|
USE LF_ANAG KEY 2
|
||||||
INPUT TIPOA "F"
|
INPUT TIPOA "F"
|
||||||
@ -423,7 +428,7 @@ END
|
|||||||
|
|
||||||
STRING FLD_SC2_NOTE 60
|
STRING FLD_SC2_NOTE 60
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 15 "Note "
|
PROMPT 1 17 "Note "
|
||||||
FIELD LF_SOCI->NOTE
|
FIELD LF_SOCI->NOTE
|
||||||
HELP "Eventuali note riferite al socio"
|
HELP "Eventuali note riferite al socio"
|
||||||
END
|
END
|
||||||
|
@ -3,110 +3,110 @@ PAGE "Impostazione Etichette" -1 -1 57 15
|
|||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 39 1 "Riga"
|
PROMPT 39 1 "Riga"
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 47 1 "Colonna"
|
PROMPT 47 1 "Colonna"
|
||||||
END
|
END
|
||||||
|
|
||||||
RADIOBUTTON RDB_BA6B_INDIR 23
|
RADIOBUTTON RDB_BA6B_INDIR 23
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 1 "Indirizzo"
|
PROMPT 4 1 "Indirizzo"
|
||||||
ITEM "1|Residenza"
|
ITEM "1|Residenza"
|
||||||
ITEM "2|Domicilio fiscale"
|
ITEM "2|Domicilio fiscale"
|
||||||
ITEM "3|Corrispondenza"
|
ITEM "3|Corrispondenza"
|
||||||
HELP "Indicare l'indirizzo da includere nelle etichette"
|
HELP "Indicare l'indirizzo da includere nelle etichette"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER FLD_BA6B_INDROW 4
|
NUMBER FLD_BA6B_INDROW 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 39 2 ""
|
PROMPT 39 2 ""
|
||||||
HELP "N. di riga dove posizionare l'indirizzo"
|
HELP "N. di riga dove posizionare l'indirizzo"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER FLD_BA6B_INDCOL 4
|
NUMBER FLD_BA6B_INDCOL 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 47 2 ""
|
PROMPT 47 2 ""
|
||||||
HELP "N. di colonna dove posizionare l'indirizzo"
|
HELP "N. di colonna dove posizionare l'indirizzo"
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN CHK_BA6B_PIVA
|
BOOLEAN CHK_BA6B_PIVA
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 7 "Partita IVA/ Codice fiscale"
|
PROMPT 4 7 "Partita IVA/ Codice fiscale"
|
||||||
MESSAGE FALSE DISABLE,FLD_BA6B_PIVROW|DISABLE,FLD_BA6B_PIVCOL
|
MESSAGE FALSE DISABLE,FLD_BA6B_PIVROW|DISABLE,FLD_BA6B_PIVCOL
|
||||||
MESSAGE TRUE ENABLE,FLD_BA6B_PIVROW|ENABLE,FLD_BA6B_PIVCOL
|
MESSAGE TRUE ENABLE,FLD_BA6B_PIVROW|ENABLE,FLD_BA6B_PIVCOL
|
||||||
HELP "Indicare se stampare la Partita IVA/Codice fiscale"
|
HELP "Indicare se stampare la Partita IVA/Codice fiscale"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER FLD_BA6B_PIVROW 4
|
NUMBER FLD_BA6B_PIVROW 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 39 7 ""
|
PROMPT 39 7 ""
|
||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
HELP "N. di riga dove posizionare la partita IVA"
|
HELP "N. di riga dove posizionare la partita IVA"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER FLD_BA6B_PIVCOL 4
|
NUMBER FLD_BA6B_PIVCOL 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 47 7 ""
|
PROMPT 47 7 ""
|
||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
HELP "N. di colonna dove posizionare la partita IVA"
|
HELP "N. di colonna dove posizionare la partita IVA"
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN CHK_BA6B_CODICE
|
BOOLEAN CHK_BA6B_CODICE
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 8 "Includi codice anagrafico"
|
PROMPT 4 8 "Includi codice anagrafico"
|
||||||
MESSAGE FALSE DISABLE,FLD_BA6B_CODROW|DISABLE,FLD_BA6B_CODCOL
|
MESSAGE FALSE DISABLE,FLD_BA6B_CODROW|DISABLE,FLD_BA6B_CODCOL
|
||||||
MESSAGE TRUE ENABLE,FLD_BA6B_CODROW|ENABLE,FLD_BA6B_CODCOL
|
MESSAGE TRUE ENABLE,FLD_BA6B_CODROW|ENABLE,FLD_BA6B_CODCOL
|
||||||
HELP "Indicare se stampare il codice anagrafico"
|
HELP "Indicare se stampare il codice anagrafico"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER FLD_BA6B_CODROW 4
|
NUMBER FLD_BA6B_CODROW 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 39 8 ""
|
PROMPT 39 8 ""
|
||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
HELP "N. di riga dove posizionare il codice"
|
HELP "N. di riga dove posizionare il codice"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER FLD_BA6B_CODCOL 4
|
NUMBER FLD_BA6B_CODCOL 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 47 8 ""
|
PROMPT 47 8 ""
|
||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
HELP "N. di colonna dove posizionare il codice"
|
HELP "N. di colonna dove posizionare il codice"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER FLD_BA6B_TOTROW 4
|
NUMBER FLD_BA6B_TOTROW 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 10 "Numero totale di righe e colonne "
|
PROMPT 4 10 "Numero totale di righe e colonne "
|
||||||
HELP "Totale righe (altezza dell'etichetta)"
|
HELP "Totale righe (altezza dell'etichetta)"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER FLD_BA6B_TOTCOL 4
|
NUMBER FLD_BA6B_TOTCOL 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 47 10 ""
|
PROMPT 47 10 ""
|
||||||
HELP "Totale colonne (larghezza dell'etichetta)"
|
HELP "Totale colonne (larghezza dell'etichetta)"
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN CHK_BA6B_SAVE
|
BOOLEAN CHK_BA6B_SAVE
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 11 "Salva impostazioni"
|
PROMPT 4 11 "Salva impostazioni"
|
||||||
HELP "Indicare se ritorvare le impostazioni successivamente"
|
HELP "Indicare se ritorvare le impostazioni successivamente"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 9 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -13 -1 "Conferma"
|
PROMPT -13 -1 "Conferma"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_CANCEL 9 2
|
BUTTON DLG_CANCEL 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -23 -1 "Annulla"
|
PROMPT -23 -1 "Annulla"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON BUT_BA6B_RESET 9 2
|
BUTTON BUT_BA6B_RESET 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -33 -1 "~Reset"
|
PROMPT -33 -1 "~Reset"
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#include "ba6200.h"
|
#include "ba6200.h"
|
||||||
|
|
||||||
PAGE "" -1 -1 65 16
|
PAGE "" -1 -1 67 16
|
||||||
|
|
||||||
RADIOBUTTON F_SCELTA 25
|
RADIOBUTTON F_SCELTA 25
|
||||||
BEGIN
|
BEGIN
|
||||||
|
@ -28,12 +28,12 @@ OUTPUT F_FINE1 CODTAB
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
@ -28,12 +28,12 @@ OUTPUT F_FINE1 CODTAB
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
@ -29,12 +29,12 @@ BEGIN
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
@ -28,12 +28,12 @@ OUTPUT F_FINE1 CODTAB
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
@ -4,9 +4,9 @@ PAGE "Stampa banche" -1 -1 56 8
|
|||||||
|
|
||||||
STRING F_INIZIO1 5
|
STRING F_INIZIO1 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "DA codice (ABI) "
|
PROMPT 2 1 "DA codice (ABI) "
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
HELP "Inserire il codice d'inizio "
|
HELP "Inserire il codice d'inizio "
|
||||||
FIELD LF_TABCOM->CODTAB[1,5]
|
FIELD LF_TABCOM->CODTAB[1,5]
|
||||||
USE %BAN
|
USE %BAN
|
||||||
INPUT CODTAB[1,5] F_INIZIO1
|
INPUT CODTAB[1,5] F_INIZIO1
|
||||||
@ -17,54 +17,54 @@ BEGIN
|
|||||||
DISPLAY "Dipendenza@35" S1
|
DISPLAY "Dipendenza@35" S1
|
||||||
OUTPUT F_INIZIO1 CODTAB[1,5]
|
OUTPUT F_INIZIO1 CODTAB[1,5]
|
||||||
OUTPUT F_INIZIO2 CODTAB[6,10]
|
OUTPUT F_INIZIO2 CODTAB[6,10]
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_INIZIO2 5
|
STRING F_INIZIO2 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 28 1 "DA codice (CAB) "
|
PROMPT 28 1 "DA codice (CAB) "
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
HELP "Inserire il codice d'inizio "
|
HELP "Inserire il codice d'inizio "
|
||||||
FIELD LF_TABCOM->CODTAB[6,10]
|
FIELD LF_TABCOM->CODTAB[6,10]
|
||||||
COPY ALL F_INIZIO1
|
COPY ALL F_INIZIO1
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
|
|
||||||
STRING F_FINE1 5
|
STRING F_FINE1 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice (ABI) "
|
PROMPT 2 3 "A codice (ABI) "
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
HELP "Inserire il codice di fine "
|
HELP "Inserire il codice di fine "
|
||||||
FIELD LF_TABCOM->CODTAB[1,5]
|
FIELD LF_TABCOM->CODTAB[1,5]
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB[1,5] F_FINE1
|
INPUT CODTAB[1,5] F_FINE1
|
||||||
INPUT CODTAB[6,10] F_FINE2
|
INPUT CODTAB[6,10] F_FINE2
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB[1,5]
|
OUTPUT F_FINE1 CODTAB[1,5]
|
||||||
OUTPUT F_FINE2 CODTAB[6,10]
|
OUTPUT F_FINE2 CODTAB[6,10]
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
|
|
||||||
STRING F_FINE2 5
|
STRING F_FINE2 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 28 3 "A codice (CAB) "
|
PROMPT 28 3 "A codice (CAB) "
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
HELP "Inserire il codice di fine "
|
HELP "Inserire il codice di fine "
|
||||||
FIELD LF_TABCOM->CODTAB[6,10]
|
FIELD LF_TABCOM->CODTAB[6,10]
|
||||||
COPY ALL F_FINE1
|
COPY ALL F_FINE1
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -15,17 +15,18 @@ BEGIN
|
|||||||
DISPLAY "Data valuta" D0
|
DISPLAY "Data valuta" D0
|
||||||
DISPLAY "Descrizione@50" -200->S0
|
DISPLAY "Descrizione@50" -200->S0
|
||||||
OUTPUT F_INIZIO1 CODTAB[1,3]
|
OUTPUT F_INIZIO1 CODTAB[1,3]
|
||||||
OUTPUT F_INIZIO2 CODTAB[4,11]
|
OUTPUT F_INIZIO2 CODTAB[4,14]
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
DATE F_INIZIO2
|
DATE F_INIZIO2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 28 1 "Da data "
|
PROMPT 28 1 "Da data "
|
||||||
HELP "Inserire la data iniziale"
|
HELP "Inserire la data iniziale"
|
||||||
FIELD LF_TABCOM->CODTAB[4,11]
|
FIELD LF_TABCOM->CODTAB[4,11]
|
||||||
COPY ALL F_INIZIO1
|
COPY ALL F_INIZIO1
|
||||||
GROUP 1
|
FLAGS "R"
|
||||||
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
@ -47,21 +48,22 @@ END
|
|||||||
|
|
||||||
DATE F_FINE2
|
DATE F_FINE2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 28 3 "A data "
|
PROMPT 28 3 "A data "
|
||||||
HELP "Inserire la data finale "
|
HELP "Inserire la data finale "
|
||||||
FIELD LF_TABCOM->CODTAB[4,11]
|
FIELD LF_TABCOM->CODTAB[4,11]
|
||||||
COPY ALL F_FINE1
|
FLAGS "R"
|
||||||
GROUP 2
|
COPY ALL F_FINE1
|
||||||
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa Categorie contabili" -1 -1 50 8
|
PAGE "Stampa Categorie contabili" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %CCO
|
USE %CCO
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa Categorie finanziarie" -1 -1 50 8
|
PAGE "Stampa Categorie finanziarie" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %CFI
|
USE %CFI
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -76,14 +76,14 @@ BEGIN
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -29,14 +29,14 @@ BEGIN
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -4,39 +4,39 @@ PAGE "Stampa cariche sociali" -1 -1 50 8
|
|||||||
|
|
||||||
STRING F_INIZIO1 2
|
STRING F_INIZIO1 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %CRS
|
USE %CRS
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Carica@25" S0
|
DISPLAY "Carica@25" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 2
|
STRING F_FINE1 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -6,7 +6,7 @@ BEGIN
|
|||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD CODTAB
|
||||||
USE %CTR
|
USE %CTR
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
@ -20,7 +20,7 @@ BEGIN
|
|||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
@ -28,12 +28,12 @@ OUTPUT F_FINE1 CODTAB
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
@ -3,42 +3,42 @@
|
|||||||
PAGE "Stampa Categorie Vendita" -1 -1 50 8
|
PAGE "Stampa Categorie Vendita" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD CODTAB
|
||||||
USE %CVE
|
USE %CVE
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
DISPLAY "Provvigione" R0
|
DISPLAY "Provvigione" R0
|
||||||
DISPLAY "Gruppo" I1
|
DISPLAY "Gruppo" I1
|
||||||
DISPLAY "Conto" I2
|
DISPLAY "Conto" I2
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -19,22 +19,22 @@ STRING F_FINE1 5
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 3 "A codice "
|
PROMPT 4 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
FIELD CODTAB
|
FIELD CODTAB
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -10,50 +10,40 @@ END
|
|||||||
|
|
||||||
NUMBER F_INIZIO1 4
|
NUMBER F_INIZIO1 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "Da anno "
|
PROMPT 2 3 "Da anno "
|
||||||
HELP "Anno esercizio con cui iniziare la stampa"
|
HELP "Anno esercizio con cui iniziare la stampa"
|
||||||
FIELD LF_TAB->CODTAB
|
FIELD LF_TAB->CODTAB
|
||||||
FLAGS "ZR"
|
FLAGS "ZR"
|
||||||
USE ESC KEY 1
|
USE ESC KEY 1
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Anno esercizio" CODTAB
|
DISPLAY "Anno esercizio" CODTAB
|
||||||
DISPLAY "Data inizio esercizio" D0
|
DISPLAY "Data inizio esercizio" D0
|
||||||
DISPLAY "Data fine esercizio" D1
|
DISPLAY "Data fine esercizio" D1
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_FINE1 4
|
NUMBER F_FINE1 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 25 3 "a anno "
|
PROMPT 25 3 "a anno "
|
||||||
HELP "Anno esercizio con cui finire la stampa"
|
HELP "Anno esercizio con cui finire la stampa"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
FLAGS "ZR"
|
FLAGS "ZR"
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -2 ""
|
PROMPT -12 -2 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -2 ""
|
PROMPT -22 -2 ""
|
||||||
END
|
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT -12 -2 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT -22 -2 ""
|
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -27,14 +27,14 @@ BEGIN
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -4,41 +4,41 @@ PAGE "Stampa codici IVA" -1 -1 50 8
|
|||||||
|
|
||||||
STRING F_INIZIO1 4
|
STRING F_INIZIO1 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Inserire il codice da cui iniziare la stampa. Se vuoto significa dall'inizio"
|
HELP "Inserire il codice da cui iniziare la stampa. Se vuoto significa dall'inizio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %IVA
|
USE %IVA
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
VALIDATE ZEROFILL_FUNC 2
|
VALIDATE ZEROFILL_FUNC 2
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 4
|
STRING F_FINE1 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Inserire il codice di fine. Se vuoto significa fino all'ultimo"
|
HELP "Inserire il codice di fine. Se vuoto significa fino all'ultimo"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
VALIDATE ZEROFILL_FUNC 2
|
VALIDATE ZEROFILL_FUNC 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa Legali" -1 -1 50 8
|
PAGE "Stampa Legali" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %LEG
|
USE %LEG
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa listini" -1 -1 50 8
|
PAGE "Stampa listini" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %LIS
|
USE %LIS
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -27,14 +27,14 @@ BEGIN
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa Modalita' di spedizione" -1 -1 50 8
|
PAGE "Stampa Modalita' di spedizione" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %MSP
|
USE %MSP
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa Note documento" -1 -1 50 8
|
PAGE "Stampa Note documento" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %NDO
|
USE %NDO
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -3,41 +3,41 @@
|
|||||||
PAGE "Stampa Codici note" -1 -1 50 8
|
PAGE "Stampa Codici note" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %NOT
|
USE %NOT
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Destinazione@30" S0
|
DISPLAY "Destinazione@30" S0
|
||||||
DISPLAY "Blocca imm." B0
|
DISPLAY "Blocca imm." B0
|
||||||
DISPLAY "Documento" B1
|
DISPLAY "Documento" B1
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -56,14 +56,14 @@ BEGIN
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa Modalita' di consegna" -1 -1 50 8
|
PAGE "Stampa Modalita' di consegna" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %POR
|
USE %POR
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -1,4 +1,4 @@
|
|||||||
#include "ba3200.h"
|
#include "ba3200.h"
|
||||||
|
|
||||||
PAGE "Stampa registri" -1 -1 74 8
|
PAGE "Stampa registri" -1 -1 74 8
|
||||||
|
|
||||||
@ -32,31 +32,12 @@ NUMBER F_INIZIO2 4
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 4 "Stampa i registri dell'anno "
|
PROMPT 1 4 "Stampa i registri dell'anno "
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
// FLAGS "A"
|
|
||||||
FIELD CODTAB[1,4]
|
FIELD CODTAB[1,4]
|
||||||
HELP "Stampa i registri dell'anno indicato. Vuoto = tutti i registri"
|
HELP "Stampa i registri dell'anno indicato. Vuoto = tutti i registri"
|
||||||
MESSAGE COPY, F_FINE2
|
MESSAGE COPY, F_FINE2
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
/*
|
|
||||||
STRING F_INIZIO1 3
|
|
||||||
BEGIN
|
|
||||||
PROMPT 19 4 "Da registro "
|
|
||||||
FLAGS "U"
|
|
||||||
USE REG
|
|
||||||
INPUT CODTAB[1,4] F_INIZIO2
|
|
||||||
INPUT CODTAB[5,7] F_INIZIO1
|
|
||||||
DISPLAY "Codice" CODTAB[5,7]
|
|
||||||
DISPLAY "Anno" CODTAB[1,4]
|
|
||||||
DISPLAY "Descrizione @50" S0
|
|
||||||
OUTPUT F_INIZIO1 CODTAB[5,7]
|
|
||||||
// OUTPUT F_INIZIO2 CODTAB[1,4]
|
|
||||||
FIELD CODTAB[5,7]
|
|
||||||
GROUP 1
|
|
||||||
END
|
|
||||||
|
|
||||||
**************/
|
|
||||||
|
|
||||||
NUMBER F_FINE2 4
|
NUMBER F_FINE2 4
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -65,23 +46,6 @@ BEGIN
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
/**********
|
|
||||||
STRING F_FINE1 3
|
|
||||||
BEGIN
|
|
||||||
PROMPT 44 4 "A registro "
|
|
||||||
FLAGS "U"
|
|
||||||
USE REG
|
|
||||||
INPUT CODTAB[1,4] F_FINE2
|
|
||||||
INPUT CODTAB[5,7] F_FINE1
|
|
||||||
DISPLAY "Codice" CODTAB[5,7]
|
|
||||||
DISPLAY "Anno" CODTAB[1,4]
|
|
||||||
DISPLAY "Descrizione @50" S0
|
|
||||||
OUTPUT F_FINE1 CODTAB[5,7]
|
|
||||||
// OUTPUT F_FINE2 CODTAB[1,4]
|
|
||||||
FIELD CODTAB[5,7]
|
|
||||||
GROUP 2
|
|
||||||
END
|
|
||||||
*****************/
|
|
||||||
|
|
||||||
BUTTON DLG_PRINT 10 2
|
BUTTON DLG_PRINT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa Spese da addebitare" -1 -1 50 8
|
PAGE "Stampa Spese da addebitare" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %SAD
|
USE %SAD
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@20" S0
|
DISPLAY "Descrizione@20" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa sconti clienti" -1 -1 50 8
|
PAGE "Stampa sconti clienti" -1 -1 50 8
|
||||||
STRING F_INIZIO1 2
|
STRING F_INIZIO1 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archvio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archvio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %SCC
|
USE %SCC
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 2
|
STRING F_FINE1 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -4,39 +4,39 @@ PAGE "Stampa stati" -1 -1 50 8
|
|||||||
|
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %STA
|
USE %STA
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Stato@50" S0
|
DISPLAY "Stato@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -4,37 +4,37 @@ PAGE "Stampa codici statistici" -1 -1 50 8
|
|||||||
|
|
||||||
STRING F_INIZIO1 7
|
STRING F_INIZIO1 7
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %STT
|
USE %STT
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@40" S0
|
DISPLAY "Descrizione@40" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 7
|
STRING F_FINE1 7
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -4,71 +4,71 @@ PAGE "Stampa Tabella Gestione Subagenti" -1 -1 58 8
|
|||||||
|
|
||||||
STRING F_INIZIO1 2
|
STRING F_INIZIO1 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da cod. agente "
|
PROMPT 2 1 "Da cod. agente "
|
||||||
HELP "Inserire il codice d'inizio "
|
HELP "Inserire il codice d'inizio "
|
||||||
FIELD LF_TABCOM->CODTAB[1,2]
|
FIELD LF_TABCOM->CODTAB[1,2]
|
||||||
USE %AGE
|
USE %AGE
|
||||||
INPUT CODTAB[1,2] F_INIZIO1
|
INPUT CODTAB[1,2] F_INIZIO1
|
||||||
DISPLAY "Codice Agente" CODTAB[1,2]
|
DISPLAY "Codice Agente" CODTAB[1,2]
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB[1,2]
|
OUTPUT F_INIZIO1 CODTAB[1,2]
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_INIZIO2 2
|
STRING F_INIZIO2 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 28 1 "Da cod. subagente "
|
PROMPT 28 1 "Da cod. subagente "
|
||||||
HELP "Inserire il codice d'inizio "
|
HELP "Inserire il codice d'inizio "
|
||||||
FIELD LF_TABCOM->CODTAB[3,4]
|
FIELD LF_TABCOM->CODTAB[3,4]
|
||||||
USE %SUA
|
USE %SUA
|
||||||
INPUT CODTAB[1,2] F_INIZIO1
|
INPUT CODTAB[1,2] F_INIZIO1
|
||||||
INPUT CODTAB[3,4] F_INIZIO2
|
INPUT CODTAB[3,4] F_INIZIO2
|
||||||
DISPLAY "Codice Agente" CODTAB[1,2]
|
DISPLAY "Codice Agente" CODTAB[1,2]
|
||||||
DISPLAY "Codice SubAgente" CODTAB[3,4]
|
DISPLAY "Codice SubAgente" CODTAB[3,4]
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB[1,2]
|
OUTPUT F_INIZIO1 CODTAB[1,2]
|
||||||
OUTPUT F_INIZIO2 CODTAB[3,4]
|
OUTPUT F_INIZIO2 CODTAB[3,4]
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
|
|
||||||
STRING F_FINE1 2
|
STRING F_FINE1 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice agente "
|
PROMPT 2 3 "A codice agente "
|
||||||
HELP "Inserire il codice di fine "
|
HELP "Inserire il codice di fine "
|
||||||
FIELD LF_TABCOM->CODTAB[1,2]
|
FIELD LF_TABCOM->CODTAB[1,2]
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB[1,2] F_FINE1
|
INPUT CODTAB[1,2] F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB[1,2]
|
OUTPUT F_FINE1 CODTAB[1,2]
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
|
|
||||||
STRING F_FINE2 2
|
STRING F_FINE2 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 28 3 "A codice subagente "
|
PROMPT 28 3 "A codice subagente "
|
||||||
HELP "Inserire il codice di fine "
|
HELP "Inserire il codice di fine "
|
||||||
FIELD LF_TABCOM->CODTAB[3,4]
|
FIELD LF_TABCOM->CODTAB[3,4]
|
||||||
USE %SUA
|
USE %SUA
|
||||||
INPUT CODTAB[1,2] F_FINE1
|
INPUT CODTAB[1,2] F_FINE1
|
||||||
INPUT CODTAB[3,4] F_FINE2
|
INPUT CODTAB[3,4] F_FINE2
|
||||||
DISPLAY "Codice Agente" CODTAB[1,2]
|
DISPLAY "Codice Agente" CODTAB[1,2]
|
||||||
DISPLAY "Codice SubAgente" CODTAB[3,4]
|
DISPLAY "Codice SubAgente" CODTAB[3,4]
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_FINE1 CODTAB[1,2]
|
OUTPUT F_FINE1 CODTAB[1,2]
|
||||||
OUTPUT F_FINE2 CODTAB[3,4]
|
OUTPUT F_FINE2 CODTAB[3,4]
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa Titoli onorifici" -1 -1 50 8
|
PAGE "Stampa Titoli onorifici" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %TIT
|
USE %TIT
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -4,37 +4,37 @@ PAGE "Stampa tipi documenti" -1 -1 50 8
|
|||||||
|
|
||||||
STRING F_INIZIO1 2
|
STRING F_INIZIO1 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 1 "Tipo documento "
|
PROMPT 4 1 "Tipo documento "
|
||||||
USE %TPD
|
USE %TPD
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Tipo" CODTAB
|
DISPLAY "Tipo" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 2
|
STRING F_FINE1 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 3 "Tipo documento "
|
PROMPT 4 3 "Tipo documento "
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -4,39 +4,39 @@ PAGE "Stampa uffici concessione" -1 -1 50 8
|
|||||||
|
|
||||||
NUMBER F_INIZIO1 3
|
NUMBER F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 1 "Da codice "
|
PROMPT 3 1 "Da codice "
|
||||||
HELP "Codice da cui iniziare a stampare. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare a stampare. Vuoto = inizio archivio"
|
||||||
USE %UCC
|
USE %UCC
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Ufficio@30" S0
|
DISPLAY "Ufficio@30" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_FINE1 3
|
NUMBER F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 3 "A codice "
|
PROMPT 3 3 "A codice "
|
||||||
HELP "Codice a cui terminare la stampa. Vuoto = fine archivio"
|
HELP "Codice a cui terminare la stampa. Vuoto = fine archivio"
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -29,12 +29,12 @@ BEGIN
|
|||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
@ -4,39 +4,39 @@ PAGE "Stampa uffici esattoria" -1 -1 50 8
|
|||||||
|
|
||||||
NUMBER F_INIZIO1 3
|
NUMBER F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 1 "Da codice "
|
PROMPT 3 1 "Da codice "
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
USE %UES
|
USE %UES
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@25" S0
|
DISPLAY "Descrizione@25" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_FINE1 3
|
NUMBER F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 3 "A codice "
|
PROMPT 3 3 "A codice "
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -4,39 +4,39 @@ PAGE "Stampa Uffici Imposte Dirette" -1 -1 50 8
|
|||||||
|
|
||||||
NUMBER F_INIZIO1 3
|
NUMBER F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 1 "Da codice "
|
PROMPT 3 1 "Da codice "
|
||||||
HELP "Codice da cui iniziare a stampare. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare a stampare. Vuoto = inizio archivio"
|
||||||
USE %UID
|
USE %UID
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@40" S0
|
DISPLAY "Descrizione@40" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_FINE1 3
|
NUMBER F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 3 "A codice "
|
PROMPT 3 3 "A codice "
|
||||||
HELP "Codice a cui terminare la stampa. Vuoto = fine archivio"
|
HELP "Codice a cui terminare la stampa. Vuoto = fine archivio"
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -4,37 +4,37 @@ PAGE "Stampa Uffici IVA" -1 -1 50 8
|
|||||||
|
|
||||||
NUMBER F_INIZIO1 3
|
NUMBER F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 1 "Da codice "
|
PROMPT 3 1 "Da codice "
|
||||||
USE %UIV
|
USE %UIV
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@40" S0
|
DISPLAY "Descrizione@40" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_FINE1 3
|
NUMBER F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 3 "A codice "
|
PROMPT 3 3 "A codice "
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -29,12 +29,12 @@ BEGIN
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa valute" -1 -1 50 8
|
PAGE "Stampa valute" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %VAL
|
USE %VAL
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Valuta@25" S0
|
DISPLAY "Valuta@25" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -52,14 +52,14 @@ BEGIN
|
|||||||
COPY OUTPUT F_FINE1
|
COPY OUTPUT F_FINE1
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -2 ""
|
PROMPT -12 -2 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -2 ""
|
PROMPT -22 -2 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -30,12 +30,12 @@ OUTPUT F_FINE1 CODTAB
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa Zone" -1 -1 50 8
|
PAGE "Stampa Zone" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice "
|
PROMPT 2 1 "Da codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE %ZON
|
USE %ZON
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice "
|
PROMPT 2 3 "A codice "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Codice di fine. Vuoto = fine archivio"
|
HELP "Codice di fine. Vuoto = fine archivio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 8 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 8 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -8,7 +8,7 @@ ENDPAGE
|
|||||||
|
|
||||||
PAGE "Tabella Aspetto dei Beni" -1 -1 78 8
|
PAGE "Tabella Aspetto dei Beni" -1 -1 78 8
|
||||||
|
|
||||||
STRING F_CODICE 3
|
STRING F_CODICE 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 2 "Codice "
|
PROMPT 4 2 "Codice "
|
||||||
FIELD CODTAB
|
FIELD CODTAB
|
||||||
|
@ -45,8 +45,8 @@ BEGIN
|
|||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON BUT_CHECK 10 1
|
BUTTON BUT_CHECK 10 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 40 5 "Controllo"
|
PROMPT 40 5 "Controllo"
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -70,7 +70,7 @@ BEGIN
|
|||||||
END
|
END
|
||||||
|
|
||||||
DATE F_DATASCARICO
|
DATE F_DATASCARICO
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 11 "Data di scarico "
|
PROMPT 4 11 "Data di scarico "
|
||||||
HELP "Data in cui e' stato effettuato l'ultimo scarico su dischetto"
|
HELP "Data in cui e' stato effettuato l'ultimo scarico su dischetto"
|
||||||
FIELD LF_TAB->D2
|
FIELD LF_TAB->D2
|
||||||
|
@ -67,7 +67,7 @@ BEGIN
|
|||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_MESE 2 12
|
LIST F_MESE 2 10
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 40 2 "Mese registrazione "
|
PROMPT 40 2 "Mese registrazione "
|
||||||
FIELD MESEREG
|
FIELD MESEREG
|
||||||
@ -143,7 +143,7 @@ BEGIN
|
|||||||
USE REG KEY 2
|
USE REG KEY 2
|
||||||
INPUT S0 F_DESCREG
|
INPUT S0 F_DESCREG
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
DISPLAY "Codice registro" CODLIB
|
DISPLAY "Codice registro" CODTAB
|
||||||
COPY OUTPUT F_CODREG
|
COPY OUTPUT F_CODREG
|
||||||
CHECKTYPE NORMAL
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
@ -48,7 +48,7 @@ BEGIN
|
|||||||
WARNING "Manca la descrizione"
|
WARNING "Manca la descrizione"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST LST_TABIVA_S1 2 22
|
LIST LST_TABIVA_S1 2 20
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 3 "Tipo codice "
|
PROMPT 3 3 "Tipo codice "
|
||||||
FIELD S1
|
FIELD S1
|
||||||
@ -115,7 +115,7 @@ BEGIN
|
|||||||
PROMPT 44 5 "Indicatori mod. 101/102"
|
PROMPT 44 5 "Indicatori mod. 101/102"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST FLD_TABIVA_S7 1 26
|
LIST FLD_TABIVA_S7 1 24
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 6 "Clienti "
|
PROMPT 4 6 "Clienti "
|
||||||
FIELD S7
|
FIELD S7
|
||||||
@ -125,7 +125,7 @@ BEGIN
|
|||||||
ITEM "3|Non imponibili"
|
ITEM "3|Non imponibili"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST FLD_TABIVA_S8 1 26
|
LIST FLD_TABIVA_S8 1 24
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 7 "Fornitori "
|
PROMPT 4 7 "Fornitori "
|
||||||
FIELD S8
|
FIELD S8
|
||||||
@ -150,7 +150,7 @@ BEGIN
|
|||||||
HELP "Indicare se il codice deve comparire nel modello 102"
|
HELP "Indicare se il codice deve comparire nel modello 102"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST FLD_TABIVA_I3 3 6
|
LIST FLD_TABIVA_I3 3 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 10 "Riga vendite IVA11 per op.esenti e non imp. "
|
PROMPT 3 10 "Riga vendite IVA11 per op.esenti e non imp. "
|
||||||
FIELD I3
|
FIELD I3
|
||||||
@ -161,7 +161,7 @@ BEGIN
|
|||||||
ITEM "3|B3"
|
ITEM "3|B3"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST FLD_TABIVA_I4 3 6
|
LIST FLD_TABIVA_I4 3 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 11 "Riga acquisti IVA11 per op.esenti e non imp. "
|
PROMPT 3 11 "Riga acquisti IVA11 per op.esenti e non imp. "
|
||||||
FIELD I4
|
FIELD I4
|
||||||
@ -170,7 +170,7 @@ BEGIN
|
|||||||
ITEM "14|B14"
|
ITEM "14|B14"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST LST_TABIVA_S3 1 33
|
LIST LST_TABIVA_S3 1 31
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 12 "Gestione plafond "
|
PROMPT 3 12 "Gestione plafond "
|
||||||
FIELD S3
|
FIELD S3
|
||||||
@ -181,7 +181,7 @@ BEGIN
|
|||||||
ITEM "3|Oper. relative art.9"
|
ITEM "3|Oper. relative art.9"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST LST_TABIVA_S4 1 45
|
LIST LST_TABIVA_S4 1 43
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 13 "Regime agricolo "
|
PROMPT 3 13 "Regime agricolo "
|
||||||
FIELD S4
|
FIELD S4
|
||||||
@ -192,7 +192,7 @@ BEGIN
|
|||||||
ITEM "3|Acquisti ad uso promiscuo"
|
ITEM "3|Acquisti ad uso promiscuo"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST LST_TABIVA_S5 1 33
|
LIST LST_TABIVA_S5 1 31
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 3 14 "Ag. viaggio/turismo "
|
PROMPT 3 14 "Ag. viaggio/turismo "
|
||||||
FIELD S5
|
FIELD S5
|
||||||
|
@ -8,48 +8,48 @@ PAGE "Vecchi codici attivita'" -1 -1 78 7
|
|||||||
|
|
||||||
STRING FLD_TABOIS_CODTAB 4
|
STRING FLD_TABOIS_CODTAB 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Codice "
|
PROMPT 2 1 "Codice "
|
||||||
FIELD %OIS->CODTAB[1,4]
|
FIELD %OIS->CODTAB[1,4]
|
||||||
HELP "Codice del vecchio codice attivit…"
|
HELP "Codice del vecchio codice attivita'"
|
||||||
USE %OIS
|
USE %OIS
|
||||||
INPUT CODTAB[1,4] FLD_TABOIS_CODTAB
|
INPUT CODTAB[1,4] FLD_TABOIS_CODTAB
|
||||||
INPUT CODTAB[5,] FLD_TABOIS_ADD
|
INPUT CODTAB[5,] FLD_TABOIS_ADD
|
||||||
DISPLAY "Codice" CODTAB[1,4]
|
DISPLAY "Codice" CODTAB[1,4]
|
||||||
DISPLAY "Subcodice" CODTAB[5,]
|
DISPLAY "Subcodice" CODTAB[5,]
|
||||||
DISPLAY "Descrizione@40" S0
|
DISPLAY "Descrizione@40" S0
|
||||||
OUTPUT FLD_TABOIS_CODTAB CODTAB[1,4]
|
OUTPUT FLD_TABOIS_CODTAB CODTAB[1,4]
|
||||||
OUTPUT FLD_TABOIS_ADD CODTAB[5,]
|
OUTPUT FLD_TABOIS_ADD CODTAB[5,]
|
||||||
OUTPUT FLD_TABOIS_S0 S0
|
OUTPUT FLD_TABOIS_S0 S0
|
||||||
KEY 1
|
KEY 1
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_TABOIS_ADD 1
|
STRING FLD_TABOIS_ADD 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 22 1 "Subcodice "
|
PROMPT 22 1 "Subcodice "
|
||||||
HELP "Subcodice del vecchio codice attivit…"
|
HELP "Subcodice del vecchio codice attivita'"
|
||||||
FIELD %OIS->CODTAB[5,]
|
FIELD %OIS->CODTAB[5,]
|
||||||
COPY ALL FLD_TABOIS_CODTAB
|
COPY ALL FLD_TABOIS_CODTAB
|
||||||
KEY 1
|
KEY 1
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
VALIDATE AUTOEXIT_FUNC 1 FLD_TABOIS_CODTAB
|
VALIDATE AUTOEXIT_FUNC 1 FLD_TABOIS_CODTAB
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING FLD_TABOIS_S0 40
|
STRING FLD_TABOIS_S0 40
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "Descrizione "
|
PROMPT 2 3 "Descrizione "
|
||||||
FIELD %OIS->S0
|
FIELD %OIS->S0
|
||||||
HELP "Descrizione del vecchio codice attivit… "
|
HELP "Descrizione del vecchio codice attivita' "
|
||||||
USE %OIS KEY 2
|
USE %OIS KEY 2
|
||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
INPUT S0 FLD_TABOIS_S0
|
INPUT S0 FLD_TABOIS_S0
|
||||||
DISPLAY "Descrizione@40" S0
|
DISPLAY "Descrizione@40" S0
|
||||||
DISPLAY "Codice" CODTAB[1,4]
|
DISPLAY "Codice" CODTAB[1,4]
|
||||||
DISPLAY "Subcodice" CODTAB[5,]
|
DISPLAY "Subcodice" CODTAB[5,]
|
||||||
OUTPUT FLD_TABOIS_CODTAB CODTAB[1,4]
|
OUTPUT FLD_TABOIS_CODTAB CODTAB[1,4]
|
||||||
OUTPUT FLD_TABOIS_ADD CODTAB[5,]
|
OUTPUT FLD_TABOIS_ADD CODTAB[5,]
|
||||||
OUTPUT FLD_TABOIS_S0 S0
|
OUTPUT FLD_TABOIS_S0 S0
|
||||||
KEY 2
|
KEY 2
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -9,16 +9,16 @@ PAGE "" -1 -1 78 16
|
|||||||
|
|
||||||
NUMBER F_CODDITTA 5
|
NUMBER F_CODDITTA 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 1 "Ditta "
|
PROMPT 4 1 "Ditta "
|
||||||
FLAGS "FRD"
|
FLAGS "FRD"
|
||||||
USE LF_NDITTE KEY 1
|
USE LF_NDITTE KEY 1
|
||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
INPUT CODDITTA F_CODDITTA
|
INPUT CODDITTA F_CODDITTA
|
||||||
DISPLAY "Codice" CODDITTA
|
DISPLAY "Codice" CODDITTA
|
||||||
DISPLAY "Ragione sociale@50" RAGSOC
|
DISPLAY "Ragione sociale@50" RAGSOC
|
||||||
OUTPUT F_CODDITTA CODDITTA
|
OUTPUT F_CODDITTA CODDITTA
|
||||||
OUTPUT F_RAGSOC RAGSOC
|
OUTPUT F_RAGSOC RAGSOC
|
||||||
KEY 1
|
KEY 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_RAGSOC 50
|
STRING F_RAGSOC 50
|
||||||
@ -81,13 +81,13 @@ BEGIN
|
|||||||
FLAGS "UZ"
|
FLAGS "UZ"
|
||||||
USE REG
|
USE REG
|
||||||
CHECKTYPE NORMAL
|
CHECKTYPE NORMAL
|
||||||
INPUT CODTAB[1,4] F_REGISTRO
|
INPUT CODTAB[1,4] F_ANNO
|
||||||
INPUT CODTAB[5,7] F_ANNO
|
INPUT CODTAB[5,7] F_REGISTRO
|
||||||
DISPLAY "Codice registro" CODTAB[1,3]
|
DISPLAY "Codice registro" CODTAB[5,7]
|
||||||
DISPLAY "Anno" CODTAB[4,7]
|
DISPLAY "Anno" CODTAB[1,4]
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_REGISTRO CODTAB[1,4]
|
OUTPUT F_ANNO CODTAB[1,4]
|
||||||
OUTPUT F_ANNO CODTAB[5,7]
|
OUTPUT F_REGISTRO CODTAB[5,7]
|
||||||
WARNING "Codice registro assente"
|
WARNING "Codice registro assente"
|
||||||
KEY 1
|
KEY 1
|
||||||
END
|
END
|
||||||
@ -107,7 +107,7 @@ BEGIN
|
|||||||
PROMPT 4 8 "Tipo Costo/Ricavo "
|
PROMPT 4 8 "Tipo Costo/Ricavo "
|
||||||
HELP "Tipo di conto costo o ricavo"
|
HELP "Tipo di conto costo o ricavo"
|
||||||
FIELD LF_TAB->CODTAB[15,15]
|
FIELD LF_TAB->CODTAB[15,15]
|
||||||
COPY ALL F_ANNO
|
COPY ALL F_ANNO
|
||||||
KEY 1
|
KEY 1
|
||||||
END
|
END
|
||||||
|
|
||||||
|
@ -17,7 +17,7 @@ END
|
|||||||
STRING F_CODICE 3
|
STRING F_CODICE 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 2 "Codice "
|
PROMPT 4 2 "Codice "
|
||||||
HELP "Codice della modalit… di consegna"
|
HELP "Codice della modalita' di consegna"
|
||||||
FIELD CODTAB
|
FIELD CODTAB
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
KEY 1
|
KEY 1
|
||||||
@ -33,7 +33,7 @@ END
|
|||||||
STRING F_DESCR 50
|
STRING F_DESCR 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 4 "Descrizione "
|
PROMPT 4 4 "Descrizione "
|
||||||
HELP "Descrizione della modalit… di consegna"
|
HELP "Descrizione della modalita' di consegna"
|
||||||
FIELD LF_TABCOM->S0
|
FIELD LF_TABCOM->S0
|
||||||
KEY 2
|
KEY 2
|
||||||
USE %POR KEY 2
|
USE %POR KEY 2
|
||||||
|
@ -7,7 +7,7 @@ TOOLBAR "" 0 20 0 2
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Registri" -1 -1 78 18
|
PAGE "Pag.1" -1 -1 78 18
|
||||||
|
|
||||||
NUMBER F_CODDITTA 5
|
NUMBER F_CODDITTA 5
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -101,7 +101,7 @@ BEGIN
|
|||||||
HELP "Codice del libro sociale a cui fa riferimento il registro"
|
HELP "Codice del libro sociale a cui fa riferimento il registro"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_TIPO 1 30
|
LIST F_TIPO 1 28
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 30 5 "Tipo "
|
PROMPT 30 5 "Tipo "
|
||||||
HELP "Tipo di registro"
|
HELP "Tipo di registro"
|
||||||
@ -242,7 +242,7 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Registri pag.2" -1 -1 78 18
|
PAGE "Pag.2" -1 -1 78 18
|
||||||
|
|
||||||
NUMBER DLG_NULL 5
|
NUMBER DLG_NULL 5
|
||||||
BEGIN
|
BEGIN
|
||||||
|
@ -60,7 +60,7 @@ BEGIN
|
|||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_AGGCAUSALI 6
|
LIST F_AGGCAUSALI 7
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 6 "Aggiornamento causali gia' presenti "
|
PROMPT 1 6 "Aggiornamento causali gia' presenti "
|
||||||
FIELD %TRA->S0
|
FIELD %TRA->S0
|
||||||
@ -69,7 +69,7 @@ BEGIN
|
|||||||
ITEMS "T|Tutto"
|
ITEMS "T|Tutto"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_AGGCLIFO 6
|
LIST F_AGGCLIFO 7
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 7 "Aggiornamento Clienti/Fornitori gia' presenti "
|
PROMPT 1 7 "Aggiornamento Clienti/Fornitori gia' presenti "
|
||||||
FIELD %TRA->S1
|
FIELD %TRA->S1
|
||||||
@ -78,7 +78,7 @@ BEGIN
|
|||||||
ITEMS "T|Tutto"
|
ITEMS "T|Tutto"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_AGGPCON 6
|
LIST F_AGGPCON 7
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 8 "Aggiornamento voci Piano dei Conti gia' presenti "
|
PROMPT 1 8 "Aggiornamento voci Piano dei Conti gia' presenti "
|
||||||
FIELD %TRA->S2
|
FIELD %TRA->S2
|
||||||
@ -87,7 +87,7 @@ BEGIN
|
|||||||
ITEMS "T|Tutto"
|
ITEMS "T|Tutto"
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_AGGIVD 6
|
LIST F_AGGIVD 7
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 9 "Aggiornamento classi Piano dei Conti "
|
PROMPT 1 9 "Aggiornamento classi Piano dei Conti "
|
||||||
FIELD %TRA->S3
|
FIELD %TRA->S3
|
||||||
|
@ -6,7 +6,7 @@ TOOLBAR "" 0 20 0 2
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Versamenti ed interessi IVA" -1 -1 78 16
|
PAGE "Interessi IVA" -1 -1 78 16
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 4
|
GROUPBOX DLG_NULL 78 4
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -164,7 +164,7 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "" -1 -1 78 16
|
PAGE "Versamenti IVA" -1 -1 78 16
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 4
|
GROUPBOX DLG_NULL 78 4
|
||||||
BEGIN
|
BEGIN
|
||||||
|
@ -65,7 +65,7 @@ END
|
|||||||
|
|
||||||
NUMBER F_PAGDA 5
|
NUMBER F_PAGDA 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 4 11 "Dalla pagina "
|
PROMPT 4 11 "Dalla pagina "
|
||||||
WARNING "E' necessario specificare un numero di pagina iniziale"
|
WARNING "E' necessario specificare un numero di pagina iniziale"
|
||||||
FIELD I1
|
FIELD I1
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
@ -74,7 +74,7 @@ END
|
|||||||
|
|
||||||
NUMBER F_PAGA 5
|
NUMBER F_PAGA 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 30 11 "Alla pagina "
|
PROMPT 32 11 "Alla pagina "
|
||||||
FIELD I2
|
FIELD I2
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
|
Loading…
x
Reference in New Issue
Block a user