Maschere di Andrea

git-svn-id: svn://10.65.10.50/trunk@545 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1994-11-07 13:48:44 +00:00
parent 8da83e1638
commit d87826888b
7 changed files with 141 additions and 126 deletions

View File

@ -1,6 +1,7 @@
#include <applicat.h> #include <applicat.h>
#include <execp.h> #include <execp.h>
#include <mask.h> #include <mask.h>
#include <prefix.h>
#include <progind.h> #include <progind.h>
#include <utility.h> #include <utility.h>
#include <urldefid.h> #include <urldefid.h>
@ -355,6 +356,7 @@ bool TMenu_application::menu(MENU_TAG)
if (module == "cg" && !_ditta_asked) if (module == "cg" && !_ditta_asked)
_ditta_asked = ok = set_firm(); _ditta_asked = ok = set_firm();
if (ok) a.run(); if (ok) a.run();
prefhndl->set("DEF"); // Aggiorna prefix se hanno cambiato ditta
} }
} }
} }

View File

@ -13,25 +13,25 @@ END
STRING FLD_NOME 43 STRING FLD_NOME 43
BEGIN BEGIN
PROMPT 2 2 "Nome " PROMPT 2 2 "Nome "
HELP "Inserire il nome" HELP "Nome del file"
END END
STRING FLD_DESC 43 STRING FLD_DESC 43
BEGIN BEGIN
PROMPT 2 3 "Descrizione " PROMPT 2 3 "Descrizione "
HELP "Inserire la descrizione" HELP "Descrizione assegnata al file"
END END
STRING FLD_FORMULA 43 STRING FLD_FORMULA 43
BEGIN BEGIN
PROMPT 2 4 "Formula " PROMPT 2 4 "Formula "
HELP "Inserire la formula" HELP "Formula per il calcolo su file"
END END
NUMBER FLD_EOD 7 NUMBER FLD_EOD 7
BEGIN BEGIN
PROMPT 2 5 "Record usati " PROMPT 2 5 "Record usati "
HELP "Inserire EOD" HELP "Numero di record utilizzati"
WARNING "Numero di record errato" WARNING "Numero di record errato"
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=#FLD_EOX)} NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=#FLD_EOX)}
FLAGS "R" FLAGS "R"
@ -40,6 +40,7 @@ END
BOOLEAN FLD_EXTEND BOOLEAN FLD_EXTEND
BEGIN BEGIN
PROMPT 2 6 "Cambia dimensione" PROMPT 2 6 "Cambia dimensione"
HELP "Indicare se si desidera cambiare la dimensione del file"
MESSAGE FALSE DISABLE,FLD_EOX|UNDO,FLD_EOX MESSAGE FALSE DISABLE,FLD_EOX|UNDO,FLD_EOX
MESSAGE TRUE ENABLE,FLD_EOX MESSAGE TRUE ENABLE,FLD_EOX
END END
@ -47,7 +48,7 @@ END
NUMBER FLD_EOX 7 NUMBER FLD_EOX 7
BEGIN BEGIN
PROMPT 30 6 "Dimensione " PROMPT 30 6 "Dimensione "
HELP "Inserire EOD" HELP "Dimensione da assegnare al file"
WARNING "Dimensione non corretta" WARNING "Dimensione non corretta"
NUM_EXPR {#THIS_FIELD>=#FLD_EOD} NUM_EXPR {#THIS_FIELD>=#FLD_EOD}
FLAGS "RD" FLAGS "RD"
@ -56,7 +57,7 @@ END
NUMBER FLD_FLAG 7 NUMBER FLD_FLAG 7
BEGIN BEGIN
PROMPT 2 7 "Flags " PROMPT 2 7 "Flags "
HELP "Inserire Flags" HELP "Flags del file"
FLAGS "R" FLAGS "R"
END END
@ -108,4 +109,3 @@ END
ENDPAGE ENDPAGE
ENDMASK ENDMASK

View File

@ -6,12 +6,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 "Inserire il nome del file di output" HELP "Nome del file sul quale scaricare"
END END
BOOLEAN FLD_WITHKEY BOOLEAN FLD_WITHKEY
BEGIN BEGIN
PROMPT 2 3 "Scarica con indice" PROMPT 2 3 "Scarica con indice"
HELP "Indicare se lo scarico avviene con l'ordinamento dell'indice"
MESSAGE FALSE CLEAR,FLD_KEYNO|ENABLE,FLD_WITHDEL MESSAGE FALSE CLEAR,FLD_KEYNO|ENABLE,FLD_WITHDEL
MESSAGE TRUE ENABLE,FLD_KEYNO|"1",FLD_KEYNO|CLEAR,FLD_WITHDEL MESSAGE TRUE ENABLE,FLD_KEYNO|"1",FLD_KEYNO|CLEAR,FLD_WITHDEL
END END
@ -20,18 +21,20 @@ NUMBER FLD_KEYNO 1
BEGIN BEGIN
PROMPT 25 3 "Indice n.ro " PROMPT 25 3 "Indice n.ro "
FLAGS "RD" FLAGS "RD"
HELP "Inserire il numero di indice" HELP "Numero di indice da seguire nello scarico"
END END
BOOLEAN FLD_WITHDEL BOOLEAN FLD_WITHDEL
BEGIN BEGIN
PROMPT 40 3 "Anche i record cancellati" PROMPT 40 3 "Anche i record cancellati"
HELP "Indicare se scaricare anche i record cancellati"
FLAGS "D" FLAGS "D"
END END
BOOLEAN FLD_FIXLEN BOOLEAN FLD_FIXLEN
BEGIN BEGIN
PROMPT 2 5 "Lunghezza fissa" PROMPT 2 5 "Lunghezza fissa"
HELP "Indicare se utilizzare la lunghezza fissa nello scarico dei campi"
MESSAGE FALSE ENABLE,FLD_FS|ENABLE,FLD_FD|ENABLE,FLD_RS MESSAGE FALSE ENABLE,FLD_FS|ENABLE,FLD_FD|ENABLE,FLD_RS
MESSAGE FALSE "\0x7c",FLD_FS|"\0",FLD_FD|"\n",FLD_RS MESSAGE FALSE "\0x7c",FLD_FS|"\0",FLD_FD|"\n",FLD_RS
MESSAGE TRUE DISABLE,FLD_FS|DISABLE,FLD_FD|DISABLE,FLD_RS MESSAGE TRUE DISABLE,FLD_FS|DISABLE,FLD_FD|DISABLE,FLD_RS
@ -41,16 +44,19 @@ END
STRING FLD_FS 5 STRING FLD_FS 5
BEGIN BEGIN
PROMPT 2 7 "Separatore di campi " PROMPT 2 7 "Separatore di campi "
HELP "Carattere seperatore dei campi"
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"
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"
END END
BUTTON DLG_OK 9 2 BUTTON DLG_OK 9 2

View File

@ -6,12 +6,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 "Inserire il nome del file di input" HELP "Nome del file dove caricare i dati"
END END
BOOLEAN FLD_FIXLEN BOOLEAN FLD_FIXLEN
BEGIN BEGIN
PROMPT 2 3 "Lunghezza fissa" PROMPT 2 3 "Lunghezza fissa"
HELP "Indicare se i record hanno lunghezza fissa"
MESSAGE FALSE ENABLE,FLD_FS|ENABLE,FLD_FD|ENABLE,FLD_RS|"\0x7c",FLD_FS|"\0",FLD_FD|"\n",FLD_RS MESSAGE FALSE ENABLE,FLD_FS|ENABLE,FLD_FD|ENABLE,FLD_RS|"\0x7c",FLD_FS|"\0",FLD_FD|"\n",FLD_RS
MESSAGE TRUE DISABLE,FLD_FS|DISABLE,FLD_FD|DISABLE,FLD_RS|"\0",FLD_FS|"\0",FLD_FD|"\n",FLD_RS MESSAGE TRUE DISABLE,FLD_FS|DISABLE,FLD_FD|DISABLE,FLD_RS|"\0",FLD_FS|"\0",FLD_FD|"\n",FLD_RS
END END
@ -19,16 +20,19 @@ END
STRING FLD_FS 5 STRING FLD_FS 5
BEGIN BEGIN
PROMPT 2 5 "Separatore di campi " PROMPT 2 5 "Separatore di campi "
HELP "Carattere separatore dei campi"
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"
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"
END END
BUTTON DLG_OK 9 2 BUTTON DLG_OK 9 2

View File

@ -81,13 +81,13 @@ STRING F_NOMEF 10
BEGIN BEGIN
PROMPT 2 2 "Nome " PROMPT 2 2 "Nome "
FLAGS "U" FLAGS "U"
HELP "Inserire il nome" HELP "Nome del campo"
END END
LIST FLD_TIPO 20 LIST FLD_TIPO 20
BEGIN BEGIN
PROMPT 2 3 "Tipo " PROMPT 2 3 "Tipo "
HELP "Inserire il tipo" HELP "Tipo del campo"
ITEM "1|Alfanumerico" ITEM "1|Alfanumerico"
MESSAGE ENABLE,FLD_LEN|DISABLE,FLD_DEC|"0",FLD_DEC MESSAGE ENABLE,FLD_LEN|DISABLE,FLD_DEC|"0",FLD_DEC
ITEM "2|Intero" ITEM "2|Intero"
@ -114,7 +114,7 @@ NUMBER FLD_LEN 3
BEGIN BEGIN
PROMPT 2 4 "Lunghezza " PROMPT 2 4 "Lunghezza "
FLAGS "R" FLAGS "R"
HELP "Inserire la lunghezza" HELP "Lunghezza del campo"
WARNING "Numero lunghezza campo errata" WARNING "Numero lunghezza campo errata"
END END
@ -122,7 +122,7 @@ NUMBER FLD_DEC 2
BEGIN BEGIN
PROMPT 2 5 "Decimali " PROMPT 2 5 "Decimali "
FLAGS "R" FLAGS "R"
HELP "Inserire i decimali" HELP "Decimali del campo"
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD+2<=#FLD_LEN)} NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD+2<=#FLD_LEN)}
WARNING "Numero di decimali errato" WARNING "Numero di decimali errato"
END END
@ -151,6 +151,7 @@ PAGE "Chiave" -1 -1 77 9
STRING F_KEXPR 60 STRING F_KEXPR 60
BEGIN BEGIN
PROMPT 1 2 "Espressione " PROMPT 1 2 "Espressione "
HELP "Espressione dell'archivio"
FLAGS "U" FLAGS "U"
END END

View File

@ -40,12 +40,14 @@ PAGE "Chiave" -1 -1 77 9
STRING F_KEXPR 60 STRING F_KEXPR 60
BEGIN BEGIN
PROMPT 1 2 "Espressione " PROMPT 1 2 "Espressione "
HELP "Espressione dell'archivio"
FLAGS "U" FLAGS "U"
END END
BOOLEAN F_KDUP BOOLEAN F_KDUP
BEGIN BEGIN
PROMPT 1 4 "Chiavi duplicate" PROMPT 1 4 "Chiavi duplicate"
HELP "Indicare se vi sono delle chiavi duplicate"
END END
BUTTON DLG_OK 8 2 BUTTON DLG_OK 8 2

View File

@ -7,7 +7,7 @@ STRING F_NOMEF 50
BEGIN BEGIN
PROMPT 2 1 "File " PROMPT 2 1 "File "
FLAGS "" FLAGS ""
HELP "Inserire il nome del file di esportazione/importazione" HELP "Nome del file di esportazione/importazione dei tracciati record"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END