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

Patch level : 10.0 1228

Browse Source 
Files correlati     : tc9.exe
Ricompilazione Demo : [ ]
Commento            :

Corrette tabelle nell'invio a Sispac


git-svn-id: svn://10.65.10.50/trunk@18296 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2009-02-19 00:06:32 +00:00
parent 4e2c3c6a10
commit 6883f6a531
3 changed files with 19 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
tc/tc9400.cpp
View File

@ -14,6 +14,7 @@ protected:
virtual bool user_create(); virtual bool user_create();
virtual void init_query_mode(TMask& m); virtual void init_query_mode(TMask& m);
virtual void init_query_insert_mode(TMask& m); virtual void init_query_insert_mode(TMask& m);
virtual void init_modify_mode(TMask& m);
public: public:
@ -45,6 +46,13 @@ void TSispac_multirel_app::init_query_insert_mode(TMask& m)
m.hide(-1); m.hide(-1);
m.show(-2); m.show(-2);
} }
void TSispac_multirel_app::init_modify_mode(TMask& m)
{
TMultirel_application::init_modify_mode(m);
m.show(-1);
m.hide(-2);
m.enable(-3);
}
bool TSispac_multirel_app::user_create() bool TSispac_multirel_app::user_create()
{ {

12
tc/tcsccau.uml
View File

@ -10,7 +10,7 @@ PAGE "Causali" -1 -1 78 15
GROUPBOX DLG_NULL 78 3 GROUPBOX DLG_NULL 78 3
BEGIN BEGIN
PROMPT 1 1 "Causale Teamsystem" PROMPT 1 1 "Causale Campo"
END END
LIST F_COD 5 LIST F_COD 5
@ -28,6 +28,7 @@ BEGIN
USE LF_MULTIREL USE LF_MULTIREL
INPUT COD F_COD SELECT INPUT COD F_COD SELECT
INPUT FIRST F_CODTAB INPUT FIRST F_CODTAB
INPUT SECOND F_COD_CAMPO
DISPLAY "Codice" FIRST DISPLAY "Codice" FIRST
DISPLAY "Descrizione@60" DATA DISPLAY "Descrizione@60" DATA
DISPLAY "Codice causale Sispac" SECOND DISPLAY "Codice causale Sispac" SECOND
@ -35,7 +36,7 @@ BEGIN
OUTPUT F_CODTAB1 FIRST OUTPUT F_CODTAB1 FIRST
OUTPUT F_DESC DATA OUTPUT F_DESC DATA
OUTPUT F_COD_CAMPO SECOND OUTPUT F_COD_CAMPO SECOND
CHECKTYPE REQUIRED // CHECKTYPE REQUIRED
FIELD FIRST FIELD FIRST
FLAGS "U" FLAGS "U"
GROUP 1 GROUP 1
@ -82,11 +83,12 @@ END
NUMBER F_COD_CAMPO 5 NUMBER F_COD_CAMPO 5
BEGIN BEGIN
PROMPT 2 4 "Causale collegata " PROMPT 2 4 "Causale Sispac "
FIELD SECOND FIELD SECOND
FLAGS "Z" FLAGS "Z"
USE LF_CAUSALI KEY 1
CHECKTYPE NORMAL GROUP 3
CHECKTYPE NORMAL
END END
ENDPAGE ENDPAGE

6
tc/tcsciva.uml
View File

@ -37,7 +37,7 @@ BEGIN
OUTPUT F_CODTAB1 FIRST OUTPUT F_CODTAB1 FIRST
OUTPUT F_DESC DATA OUTPUT F_DESC DATA
OUTPUT F_COD_CAMPO SECOND OUTPUT F_COD_CAMPO SECOND
CHECKTYPE REQUIRED // CHECKTYPE REQUIRED
FIELD FIRST FIELD FIRST
FLAGS "Z" FLAGS "Z"
KEY 1 KEY 1
@ -54,7 +54,7 @@ BEGIN
OUTPUT F_CODTAB CODTAB OUTPUT F_CODTAB CODTAB
OUTPUT F_CODTAB1 CODTAB OUTPUT F_CODTAB1 CODTAB
OUTPUT F_DESC S0 OUTPUT F_DESC S0
CHECKTYPE REQUIRED // CHECKTYPE REQUIRED
FIELD FIRST FIELD FIRST
KEY 1 KEY 1
FLAGS "U" FLAGS "U"
@ -80,6 +80,8 @@ STRING F_COD_CAMPO 3
BEGIN BEGIN
PROMPT 2 4 "Codice IVA Sispac " PROMPT 2 4 "Codice IVA Sispac "
CHECKTYPE NORMAL CHECKTYPE NORMAL
KEY 1
GROUP 3
FIELD SECOND FIELD SECOND
FLAG "Z" FLAG "Z"
END END