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

View File

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

View File

@ -1,68 +1,74 @@
#include <defmask.h>
#include "ba1100a.h"
PAGE "Scarico Archivio" -1 -1 70 13
STRING FLD_OUTFILE 50
BEGIN
PROMPT 2 1 "File di output "
HELP "Inserire il nome del file di output"
END
BOOLEAN FLD_WITHKEY
BEGIN
PROMPT 2 3 "Scarica con indice"
MESSAGE FALSE CLEAR,FLD_KEYNO|ENABLE,FLD_WITHDEL
MESSAGE TRUE ENABLE,FLD_KEYNO|"1",FLD_KEYNO|CLEAR,FLD_WITHDEL
END
NUMBER FLD_KEYNO 1
BEGIN
PROMPT 25 3 "Indice n.ro "
FLAGS "RD"
HELP "Inserire il numero di indice"
END
BOOLEAN FLD_WITHDEL
BEGIN
PROMPT 40 3 "Anche i record cancellati"
FLAGS "D"
END
BOOLEAN FLD_FIXLEN
BEGIN
PROMPT 2 5 "Lunghezza fissa"
MESSAGE FALSE ENABLE,FLD_FS|ENABLE,FLD_FD|ENABLE,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 "\0",FLD_FS|"\0",FLD_FD|"\n",FLD_RS
END
STRING FLD_FS 5
BEGIN
PROMPT 2 7 "Separatore di campi "
END
STRING FLD_FD 5
BEGIN
PROMPT 40 7 "Delimitatore di campi "
END
STRING FLD_RS 5
BEGIN
PROMPT 2 9 "Separatore di record "
END
BUTTON DLG_OK 9 2
BEGIN
PROMPT -14 -1 ""
END
BUTTON DLG_CANCEL 9 2
BEGIN
PROMPT -24 -1 ""
END
ENDPAGE
ENDMASK
#include <defmask.h>
#include "ba1100a.h"
PAGE "Scarico Archivio" -1 -1 70 13
STRING FLD_OUTFILE 50
BEGIN
PROMPT 2 1 "File di output "
HELP "Nome del file sul quale scaricare"
END
BOOLEAN FLD_WITHKEY
BEGIN
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 TRUE ENABLE,FLD_KEYNO|"1",FLD_KEYNO|CLEAR,FLD_WITHDEL
END
NUMBER FLD_KEYNO 1
BEGIN
PROMPT 25 3 "Indice n.ro "
FLAGS "RD"
HELP "Numero di indice da seguire nello scarico"
END
BOOLEAN FLD_WITHDEL
BEGIN
PROMPT 40 3 "Anche i record cancellati"
HELP "Indicare se scaricare anche i record cancellati"
FLAGS "D"
END
BOOLEAN FLD_FIXLEN
BEGIN
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 "\0x7c",FLD_FS|"\0",FLD_FD|"\n",FLD_RS
MESSAGE TRUE DISABLE,FLD_FS|DISABLE,FLD_FD|DISABLE,FLD_RS
MESSAGE TRUE "\0",FLD_FS|"\0",FLD_FD|"\n",FLD_RS
END
STRING FLD_FS 5
BEGIN
PROMPT 2 7 "Separatore di campi "
HELP "Carattere seperatore dei campi"
END
STRING FLD_FD 5
BEGIN
PROMPT 40 7 "Delimitatore di campi "
HELP "Carattere delimitatore di campi"
END
STRING FLD_RS 5
BEGIN
PROMPT 2 9 "Separatore di record "
HELP "Carattere delimitatore di record"
END
BUTTON DLG_OK 9 2
BEGIN
PROMPT -14 -1 ""
END
BUTTON DLG_CANCEL 9 2
BEGIN
PROMPT -24 -1 ""
END
ENDPAGE
ENDMASK

View File

@ -1,46 +1,50 @@
#include <defmask.h>
#include "ba1100a.h"
PAGE "Carico Archivio" -1 -1 70 13
STRING FLD_INFILE 50
BEGIN
PROMPT 2 1 "File di input "
HELP "Inserire il nome del file di input"
END
BOOLEAN FLD_FIXLEN
BEGIN
PROMPT 2 3 "Lunghezza fissa"
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
END
STRING FLD_FS 5
BEGIN
PROMPT 2 5 "Separatore di campi "
END
STRING FLD_FD 5
BEGIN
PROMPT 2 7 "Delimitatore di campi "
END
STRING FLD_RS 5
BEGIN
PROMPT 2 9 "Separatore di record "
END
BUTTON DLG_OK 9 2
BEGIN
PROMPT -14 -1 ""
END
BUTTON DLG_CANCEL 9 2
BEGIN
PROMPT -24 -1 ""
END
ENDPAGE
ENDMASK
#include <defmask.h>
#include "ba1100a.h"
PAGE "Carico Archivio" -1 -1 70 13
STRING FLD_INFILE 50
BEGIN
PROMPT 2 1 "File di input "
HELP "Nome del file dove caricare i dati"
END
BOOLEAN FLD_FIXLEN
BEGIN
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 TRUE DISABLE,FLD_FS|DISABLE,FLD_FD|DISABLE,FLD_RS|"\0",FLD_FS|"\0",FLD_FD|"\n",FLD_RS
END
STRING FLD_FS 5
BEGIN
PROMPT 2 5 "Separatore di campi "
HELP "Carattere separatore dei campi"
END
STRING FLD_FD 5
BEGIN
PROMPT 2 7 "Delimitatore di campi "
HELP "Carattere delimitatore dei campi"
END
STRING FLD_RS 5
BEGIN
PROMPT 2 9 "Separatore di record "
HELP "Carattere delimitatore dei record"
END
BUTTON DLG_OK 9 2
BEGIN
PROMPT -14 -1 ""
END
BUTTON DLG_CANCEL 9 2
BEGIN
PROMPT -24 -1 ""
END
ENDPAGE
ENDMASK

View File

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

View File

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

View File

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