root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Corrette maschere

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@867 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-01-16 15:02:49 +00:00
parent c7a7073462
commit a1486179c9
10 changed files with 59 additions and 61 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ba/ba0.cpp
View File

@ -55,7 +55,7 @@ void TPicture_mask::set_picture(short id)
_id = id;
#if XVT_OS == XVT_OS_WIN
if (_picture) picture_free(_picture);
_picture = xvt_picture_load(id, TRUE);
_picture = xvt_picture_load(id, id == BA0_PICTURE);
#endif
}
}

8
ba/ba0.url
View File

@ -5,10 +5,10 @@ MENU TASK_MENUBAR
#if XVT_OS == XVT_OS_WIN
#transparent $$$
883 bitmap DISCARDABLE f:\p.due\bmp\ba00.bmp
884 bitmap DISCARDABLE f:\p.due\bmp\ba01.bmp
885 bitmap DISCARDABLE f:\p.due\bmp\ba02.bmp
886 bitmap DISCARDABLE f:\p.due\bmp\ba03.bmp
883 bitmap DISCARDABLE f:\p.due\bmp\menubmp\ba00.bmp
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
$$$
#endif

6
ba/ba2.url
View File

@ -47,26 +47,20 @@ MENU BAR_ITEM(4)
MENUBAR TASK_MENUBAR + 1
MENU TASK_MENUBAR + 1
SUBMENU MENU_FILE_ALT "~File"
SUBMENU MENU_EDIT "~Stampanti"
MENUBAR TASK_MENUBAR + 2
MENU TASK_MENUBAR + 2
SUBMENU MENU_FILE_ALT "~File"
SUBMENU MENU_EDIT "~Stampanti"
MENUBAR TASK_MENUBAR + 3
MENU TASK_MENUBAR + 3
SUBMENU MENU_FILE_ALT "~File"
SUBMENU MENU_EDIT "~Stampanti"
MENUBAR TASK_MENUBAR + 4
MENU TASK_MENUBAR + 4
SUBMENU MENU_FILE_ALT "~File"
SUBMENU MENU_EDIT "~Stampanti"

6
ba/ba4500a.uml
View File

@ -211,7 +211,7 @@ END
BOOLEAN CHK_AT1_MEDCONV
BEGIN
PROMPT 1 11 "Medici convenzionati ??"
PROMPT 1 11 "Medici convenzionati"
FIELD LF_ATTIV->MEDCONV
HELP "Indicare se esistono medici convenzionati nell'attivita'"
END
@ -232,7 +232,7 @@ END
BOOLEAN CHK_AT1_ATTSCORTER
BEGIN
PROMPT 44 12 "Senza Corr.Terr.??"
PROMPT 44 12 "Senza Corr.Terr."
FIELD LF_ATTIV->ATTSCORTER
HELP "Indicare se si tratta di attivita' senza correttivo territoriale"
END
@ -260,7 +260,7 @@ END
BOOLEAN CHK_AT1_ESLUOGHID
BEGIN
PROMPT 44 14 "Pi£ luoghi"
PROMPT 44 14 "Piu' luoghi"
FIELD LF_ATTIV->ESLUOGHID
HELP "Indicare se l'attivita' si svolge su piu' luoghi"
END

2
ba/batbcpg.rpt
View File

@ -9,7 +9,7 @@ Tabella dei codici di pagamento
1|@113g%s|Rate Differenziate
[Rows]
1|CODTAB|@2g@16n
1|CODTAB|@2g@16,ls
1|S0|@20g@50,ls
1|I0|@72g@4n
1|CODTAB[11,12]|@78g@15,ls

70
ba/batbdel.uml
View File

@ -39,9 +39,44 @@ BEGIN
WARNING "Ditta assente"
END
LIST F_TIPO 20
BEGIN
PROMPT 4 3 "Tipo "
FIELD CODTAB[12,12]
KEY 1
HELP "Tipo di versamento"
ITEM "1|normale"
MESSAGE ENABLE,F_MESE
ITEM "2|annuale"
MESSAGE "13",F_MESE|DISABLE,F_MESE
ITEM "3|art. 74"
MESSAGE ENABLE,F_MESE
ITEM "4|cessazione attivita'"
MESSAGE ENABLE,F_MESE
ITEM "5|integrativa"
MESSAGE ENABLE,F_MESE
ITEM "7|acconti IVA"
MESSAGE "12",F_MESE|DISABLE,F_MESE
END
LIST F_MESE 10
BEGIN
PROMPT 4 4 "Mese "
FIELD CODTAB[10,11]
FLAGS "MA"
KEY 1
COPY ALL F_ANNO
HELP "Mese di versamento"
ITEM "13|Annuale"
MESSAGE "2",F_TIPO
VALIDATE MTCHECK_FUNC
END
NUMBER F_ANNO 4
BEGIN
PROMPT 4 3 "Anno "
PROMPT 4 5 "Anno "
FIELD CODTAB[6,9]
CHECKTYPE REQUIRED
FLAGS "RA"
@ -62,40 +97,9 @@ BEGIN
OUTPUT F_MESE CODTAB[10,11]
OUTPUT F_TIPO CODTAB[12,12]
HELP "Anno di versamento"
VALIDATE AUTOEXIT_FUNC 2 F_CODDITTA F_ANNO
END
LIST F_MESE 10
BEGIN
PROMPT 4 4 "Mese "
FIELD CODTAB[10,11]
FLAGS "MA"
KEY 1
COPY ALL F_ANNO
HELP "Mese di versamento"
ITEM "13|Annuale"
MESSAGE "2",F_TIPO
VALIDATE MTCHECK_FUNC
END
LIST F_TIPO 20
BEGIN
PROMPT 4 5 "Tipo "
FIELD CODTAB[12,12]
KEY 1
HELP "Tipo di versamento"
ITEM "1|normale"
MESSAGE ENABLE,F_MESE
ITEM "2|annuale"
MESSAGE "13",F_MESE|DISABLE,F_MESE
ITEM "3|art. 74"
MESSAGE ENABLE,F_MESE
ITEM "4|cessazione attivita'"
MESSAGE ENABLE,F_MESE
ITEM "5|integrativa"
MESSAGE ENABLE,F_MESE
ITEM "7|acconti IVA"
MESSAGE "12",F_MESE|DISABLE,F_MESE
END
DATE F_DATA
BEGIN

8
ba/batbinl.uml
View File

@ -27,11 +27,10 @@ END
STRING F_CODLIB 3
BEGIN
PROMPT 31 1 "Codice libro "
FLAGS "U"
FLAGS "UZ"
FIELD CODTAB[5,7]
COPY ALL F_ANNO
CHECKTYPE REQUIRED
VALIDATE ZEROFILL_FUNC 3
KEY 1
END
@ -109,13 +108,14 @@ STRING F_CODREG 3
BEGIN
PROMPT 1 8 "Codice registro "
FIELD S0
USE REG SELECT CODTAB[1,4]=#F_ANNO
USE REG
FLAGS "UZ"
INPUT CODTAB[1,4] F_ANNO
INPUT CODTAB[1,4] F_ANNOREG
INPUT CODTAB[5,7] F_CODREG
DISPLAY "Anno" CODTAB[1,4]
DISPLAY "Codice" CODTAB[5,7]
DISPLAY "Descrizione@50" S0
OUTPUT F_ANNOREG CODTAB[1,4]
OUTPUT F_CODREG CODTAB[5,7]
OUTPUT F_DESCREG S0
CHECKTYPE NORMAL

5
ba/batblbu.uml
View File

@ -29,11 +29,10 @@ END
STRING F_CODLIB 3
BEGIN
PROMPT 45 1 "Codice "
FLAGS "U"
FLAGS "UZ"
FIELD CODTAB[5,7]
COPY ALL F_ANNO
CHECKTYPE REQUIRED
VALIDATE ZEROFILL_FUNC 3
KEY 1
END
@ -51,7 +50,7 @@ BEGIN
KEY 2
END
LIST F_ULT_MESE_STAMP 2 10
LIST F_ULT_MESE_STAMP 2 12
BEGIN
PROMPT 3 3 "Ultimo mese stampa "
FIELD I0

2
ba/batbval.uml
View File

@ -12,7 +12,7 @@ STRING FLD_TABVAL_CODTAB 3
BEGIN
PROMPT 3 1 "Codice "
FIELD LF_TABCOM->CODTAB
FLAGS "U"
FLAGS "UZ"
KEY 1
USE %VAL
INPUT CODTAB FLD_TABVAL_CODTAB

11
ba/prassi.mnu
View File

@ -88,12 +88,12 @@
9|Prima nota|2|7
9|Prima nota|cg2 -0
9|Elimina movimenti provvisori|cg2 -1
9|Ricalcolo saldi|cg4 -0
9|IVA|10|5
9|Lista movimenti|cg3 -0
9|Mastrini|cg3 -1
9|Riepiloghi|cg3 -4
9|Stampa Mastrini|cg3 -1
9|Stampa Riepiloghi|cg3 -4
9|Visualizzazione saldi|cg5 -2
9|Ricalcolo saldi|cg4 -0
9|Bilancio|cg1 -4
9|Bilancio IV direttiva CEE|cg1 -5
9|Giornale|cg3 -3
@ -126,8 +126,9 @@
13|Stampa tabelle ditta|8|7
13|Prima nota|9|7
13|Servizio|16|7
14|Gestione libro unico|7
14|Tabella libro unico|ba3 -4
14|Gestione libro unico|2|7
14|Tabella libro unico|ba3 -0 %lbu
14|Tabella indici libro unico|ba3 -0 %inl
14|Tabella vidimazioni|ba3 -0 %vid
14|Stampa indici libro unico|ba3 -5
15|Manutenzione|1