Maschere di Andrea
git-svn-id: svn://10.65.10.50/trunk@545 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
8da83e1638
commit
d87826888b
@ -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
|
||||
}
|
||||
}
|
||||
}
|
||||
|
@ -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
|
||||
|
||||
|
142
ba/ba1100b.uml
142
ba/ba1100b.uml
@ -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
|
||||
|
@ -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
|
||||
|
@ -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
|
||||
|
||||
|
@ -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
|
||||
|
@ -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
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user