Sistemate maschere libro unico e relativi indici
git-svn-id: svn://10.65.10.50/trunk@874 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy
parent
a6fe95afb8
commit
365f52efa8
@ -9,6 +9,7 @@ MENU TASK_MENUBAR
|
||||
884 bitmap DISCARDABLE f:\p.due\bmp\menubmp\ba01.bmp
|
||||
885 bitmap DISCARDABLE f:\p.due\bmp\menubmp\ba02.bmp
|
||||
886 bitmap DISCARDABLE f:\p.due\bmp\menubmp\ba03.bmp
|
||||
887 bitmap DISCARDABLE f:\p.due\bmp\menubmp\ba04.bmp
|
||||
$$$
|
||||
#endif
|
||||
|
||||
|
||||
@ -4,7 +4,7 @@
|
||||
|
||||
#include "ba2.h"
|
||||
|
||||
#define usage "Error - usage : %s -{0|2}"
|
||||
#define usage "Error - usage : %s -[0,1,2]"
|
||||
|
||||
int main(int argc, char** argv)
|
||||
{
|
||||
@ -15,6 +15,8 @@ int main(int argc, char** argv)
|
||||
{
|
||||
case 0:
|
||||
rt = ba2100(argc, argv); break;
|
||||
case 1:
|
||||
rt = ba2200(argc, argv); break;
|
||||
case 2:
|
||||
rt = ba2300(argc, argv) ; break;
|
||||
default:
|
||||
|
||||
1
ba/ba2.h
1
ba/ba2.h
@ -2,6 +2,7 @@
|
||||
#define __BA2_H
|
||||
|
||||
int ba2100(int argc, char* argv[]);
|
||||
int ba2200(int argc, char* argv[]);
|
||||
int ba2300(int argc, char* argv[]);
|
||||
|
||||
#endif // __BA2_H
|
||||
|
||||
24
ba/ba2.url
24
ba/ba2.url
@ -44,27 +44,17 @@ MENU BAR_ITEM(4)
|
||||
ITEM MENU_ITEM(44) "~Ultimo"
|
||||
|
||||
|
||||
MENUBAR TASK_MENUBAR + 1
|
||||
|
||||
MENU TASK_MENUBAR + 1
|
||||
|
||||
MENUBAR TASK_MENUBAR + 2
|
||||
|
||||
MENU TASK_MENUBAR + 2
|
||||
|
||||
MENUBAR TASK_MENUBAR + 3
|
||||
|
||||
MENU TASK_MENUBAR + 3
|
||||
SUBMENU MENU_FILE_ALT "~File"
|
||||
|
||||
MENUBAR TASK_MENUBAR + 4
|
||||
|
||||
MENU TASK_MENUBAR + 4
|
||||
SUBMENU MENU_FILE_ALT "~File"
|
||||
MENUBAR MENU_BAR(1)
|
||||
|
||||
MENU TASK_MENUBAR+1
|
||||
SUBMENU MENU_FILE "~File"
|
||||
|
||||
|
||||
MENUBAR MENU_BAR(2)
|
||||
|
||||
MENU MENU_BAR(2)
|
||||
SUBMENU MENU_FILE "~File"
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
@ -26,7 +26,7 @@ END
|
||||
|
||||
STRING F_CODLIB 3
|
||||
BEGIN
|
||||
PROMPT 31 1 "Codice libro "
|
||||
PROMPT 28 1 "Libro "
|
||||
FLAGS "UZ"
|
||||
FIELD CODTAB[5,7]
|
||||
COPY ALL F_ANNO
|
||||
@ -36,7 +36,7 @@ END
|
||||
|
||||
NUMBER F_INDEX 7
|
||||
BEGIN
|
||||
PROMPT 54 1 "Indice "
|
||||
PROMPT 42 1 "Num. registrazione "
|
||||
FLAGS "Z"
|
||||
FIELD CODTAB[8,14]
|
||||
USE %INL
|
||||
@ -61,22 +61,26 @@ LIST F_MESE 2 10
|
||||
BEGIN
|
||||
PROMPT 42 2 "Mese registrazione "
|
||||
FIELD I1
|
||||
ITEMS " |Nessuno"
|
||||
FLAGS "M"
|
||||
END
|
||||
|
||||
STRING F_PINI_LU 5 5
|
||||
NUMBER F_PINI_LU 5 5
|
||||
BEGIN
|
||||
PROMPT 1 3 "Numero iniziale pagina registro unico "
|
||||
PROMPT 1 3 "Numero pagina iniziale registro unico "
|
||||
FIELD I2
|
||||
FLAGS "R"
|
||||
FLAGS "UR"
|
||||
MESSAGE DIRTY,F_PFIN_LU
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
NUMBER F_PFIN_LU 5
|
||||
BEGIN
|
||||
PROMPT 1 4 "Numero finale pagina registro unico "
|
||||
PROMPT 1 4 "Numero pagina finale registro unico "
|
||||
FIELD I3
|
||||
FLAGS "R"
|
||||
FLAGS "UR"
|
||||
NUM_EXPR {#THIS_FIELD>=#F_PINI_LU}
|
||||
CHECKTYPE REQUIRED
|
||||
WARNING "Inserire un numero di pagina superiore a quella iniziale"
|
||||
END
|
||||
|
||||
NUMBER F_DITTA 5
|
||||
@ -90,7 +94,8 @@ BEGIN
|
||||
DISPLAY "Ragione sociale@50" RAGSOC
|
||||
OUTPUT F_DITTA CODDITTA
|
||||
OUTPUT F_RAGSOC RAGSOC
|
||||
CHECKTYPE NORMAL
|
||||
CHECKTYPE REQUIRED
|
||||
WARNING "E' necessario specificare un codice ditta valido"
|
||||
END
|
||||
|
||||
STRING F_RAGSOC 50
|
||||
@ -101,7 +106,7 @@ BEGIN
|
||||
DISPLAY "Ragione sociale@50" RAGSOC
|
||||
DISPLAY "Codice ditta" CODDITTA
|
||||
COPY OUTPUT F_DITTA
|
||||
CHECKTYPE NORMAL
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING F_CODREG 3
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
// campi maschera batb%ivd.msk
|
||||
// campi maschera batbivd.msk
|
||||
|
||||
#define F_SEZ 101
|
||||
#define F_LETT 102
|
||||
|
||||
@ -19,4 +19,5 @@
|
||||
#define F_MODULO 119
|
||||
#define F_STAMPA 120
|
||||
#define F_DESCRLBU 121
|
||||
#define F_CODANAGR 122
|
||||
|
||||
|
||||
@ -60,7 +60,7 @@ END
|
||||
|
||||
NUMBER F_ULT_PAG 5
|
||||
BEGIN
|
||||
PROMPT 45 3 "Ultima pagina "
|
||||
PROMPT 55 3 "Ultima pagina "
|
||||
FIELD I1
|
||||
END
|
||||
|
||||
@ -72,18 +72,33 @@ BEGIN
|
||||
ITEM "G|Giuridica"
|
||||
END
|
||||
|
||||
NUMBER F_CODANAGR 5
|
||||
BEGIN
|
||||
PROMPT 55 4 "Codice "
|
||||
FIELD I4
|
||||
USE LF_ANAG
|
||||
INPUT TIPOA F_TIPOA SELECT
|
||||
INPUT CODANAGR F_CODANAGR
|
||||
DISPLAY "Tipo" TIPOA
|
||||
DISPLAY "Codice" CODANAGR
|
||||
DISPLAY "Ragione sociale@50" RAGSOC
|
||||
OUTPUT F_TIPOA TIPOA
|
||||
OUTPUT F_CODANAGR CODANAGR
|
||||
OUTPUT F_TIPOANAGR RAGSOC
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING F_TIPOANAGR 50
|
||||
BEGIN
|
||||
PROMPT 3 5 "Tipo anagrafico "
|
||||
FIELD S1
|
||||
USE LF_ANAG KEY 2
|
||||
INPUT TIPOA F_TIPOA
|
||||
INPUT TIPOA F_TIPOA SELECT
|
||||
INPUT RAGSOC F_TIPOANAGR
|
||||
DISPLAY "Tipo" TIPOA
|
||||
DISPLAY "Ragione sociale@50" RAGSOC
|
||||
OUTPUT F_TIPOA TIPOA
|
||||
OUTPUT F_TIPOANAGR RAGSOC
|
||||
CHECKTYPE NORMAL
|
||||
DISPLAY "Codice" CODANAGR
|
||||
COPY OUTPUT F_CODANAGR
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
NUMBER F_CODTABLIB 2
|
||||
@ -97,13 +112,18 @@ BEGIN
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODTABLIB CODTAB
|
||||
OUTPUT F_DESCR S0
|
||||
CHECKTYPE NORMAL
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING F_DESCR 50
|
||||
BEGIN
|
||||
PROMPT 3 7 "Descrizione "
|
||||
FLAGS "D"
|
||||
USE %ITL KEY 2
|
||||
INPUT S0 F_DESCR
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_CODTABLIB
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING F_CONSPRESSO 40
|
||||
|
||||
@ -30,7 +30,8 @@ END
|
||||
STRING F_INTESTA 50
|
||||
BEGIN
|
||||
PROMPT 4 3 "Intestatario "
|
||||
HELP "Inserire l' intestatario del codice di vidimazione"
|
||||
HELP "Inserire l'intestatario del codice di vidimazione"
|
||||
WARNING "E' necessario specificare l'intestatario"
|
||||
FIELD VID->S0
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
@ -40,12 +41,14 @@ BEGIN
|
||||
PROMPT 4 5 "Data vidimazione "
|
||||
FIELD VID->D0
|
||||
FLAGS "A"
|
||||
WARNING "E' necessario specificare la data di vidimazione"
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING F_UFFVID 50
|
||||
BEGIN
|
||||
PROMPT 4 7 "Ufficio vidimazione "
|
||||
WARNING "E' necessario specificare il nome dell'ufficio"
|
||||
FIELD VID->S1
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
@ -53,6 +56,7 @@ END
|
||||
NUMBER F_NUMFOGLI 5
|
||||
BEGIN
|
||||
PROMPT 4 9 "Numero fogli libro "
|
||||
WARNING "E' necessario specificare il numero dei fogli"
|
||||
FIELD VID->I0
|
||||
FLAGS "R"
|
||||
CHECKTYPE REQUIRED
|
||||
@ -61,6 +65,7 @@ END
|
||||
NUMBER F_PAGDA 5
|
||||
BEGIN
|
||||
PROMPT 4 11 "Dalla pagina "
|
||||
WARNING "E' necessario specificare un numero di pagina iniziale"
|
||||
FIELD VID->I1
|
||||
FLAGS "R"
|
||||
CHECKTYPE REQUIRED
|
||||
@ -72,6 +77,7 @@ BEGIN
|
||||
FIELD VID->I2
|
||||
FLAGS "R"
|
||||
CHECKTYPE REQUIRED
|
||||
WARNING "Specificare un numero di pagina superiore a quella iniziale"
|
||||
NUM_EXPR {(#THIS_FIELD>=#F_PAGDA)}
|
||||
END
|
||||
|
||||
|
||||
@ -72,7 +72,7 @@
|
||||
6|Lingue|ba3 -1 %lng
|
||||
7|Tabelle ditta|2|7
|
||||
7|Parametri ditta|cg5 -1
|
||||
7|Registri|ba3 -0 reg
|
||||
7|Registri IVA|ba3 -0 reg
|
||||
7|Piano dei conti|cg0 -0
|
||||
7|Causali|cg0 -4
|
||||
7|Clienti/Fornitori|cg0 -1
|
||||
@ -131,7 +131,7 @@
|
||||
14|Tabella indici libro unico|ba3 -0 %inl
|
||||
14|Tabella vidimazioni|ba3 -0 %vid
|
||||
14|Stampa indici libro unico|ba3 -5
|
||||
15|Manutenzione|1
|
||||
15|Manutenzione|4
|
||||
15|Archivi|ba1
|
||||
15|Utenti|ba1 -3
|
||||
15|Attivazione|ba1 -4
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user