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

Patch level :2.2 nopatch

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
aggiunta ricerca nelle tabelle
trasformate le tabelle in tabelle studio


git-svn-id: svn://10.65.10.50/trunk@12561 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2004-12-22 15:49:02 +00:00
parent 4eb40ef3bb
commit d0c192e8d6
4 changed files with 63 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
ca/ca0600a.uml
View File

@ -230,7 +230,7 @@ STRING F_CMS_CODTIPCM 5
BEGIN
PROMPT 2 8 "Tipologia di commessa "
FIELD CODTIPCM
USE TPC
USE %TPC
INPUT CODTAB F_CMS_CODTIPCM
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
@ -242,7 +242,7 @@ END
STRING F_CMS_DESTIPCM 50 42
BEGIN
PROMPT 32 8 ""
USE TPC KEY 2
USE %TPC KEY 2
INPUT S0 F_CMS_DESTIPCM
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
@ -253,7 +253,7 @@ STRING F_CMS_CODTIPOL 5
BEGIN
PROMPT 2 9 "Tipologia di lavoro "
FIELD CODTIPO
USE TPL
USE %TPL
INPUT CODTAB F_CMS_CODTIPOL
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
@ -265,7 +265,7 @@ END
STRING F_CMS_DESTIPOL 50 42
BEGIN
PROMPT 32 9 ""
USE TPL KEY 2
USE %TPL KEY 2
INPUT S0 F_CMS_DESTIPOL
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
@ -276,7 +276,7 @@ STRING F_CMS_CODRESP 10
BEGIN
PROMPT 2 10 "Responsabile "
FIELD CODRESP
USE RSP
USE %RSP
INPUT CODTAB F_CMS_CODRESP
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
@ -288,7 +288,7 @@ END
STRING F_CMS_DESRESP 50 42
BEGIN
PROMPT 32 10 ""
USE RSP KEY 2
USE %RSP KEY 2
INPUT S0 F_CMS_DESRESP
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB

19
ca/catbrsp.uml
View File

@ -9,11 +9,30 @@ PAGE "Responsabili" -1 -1 64 6
STRING F_RSP_CODICE 10
BEGIN
PROMPT 2 2 "Codice "
USE %RSP
FIELD CODTAB
FLAGS "UZ"
KEY 1
INPUT CODTAB F_RSP_CODICE
DISPLAY "Codice@10" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_RSP_CODICE CODTAB
OUTPUT F_RSP_DESCR S0
CHECKTYPE REQUIRED
END
STRING F_RSP_DESCR 50
BEGIN
PROMPT 2 3 "Descrizione "
USE %RSP
FIELD S0
KEY 2
INPUT S0 F_RSP_DESCR
DISPLAY "Descrizione@50" S0
DISPLAY "Codice@10" CODTAB
COPY OUTPUT F_RSP_CODICE
CHECKTYPE NORMAL
WARNING "Manca la descrizione"
END
ENDPAGE

19
ca/catbtpc.uml
View File

@ -9,11 +9,30 @@ PAGE "Tipo Commessa" -1 -1 64 6
STRING F_TPC_CODICE 5
BEGIN
PROMPT 2 2 "Codice "
USE %TPC
FIELD CODTAB
FLAGS "UZ"
KEY 1
INPUT CODTAB F_TPC_CODICE
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_TPC_CODICE CODTAB
OUTPUT F_TPC_DESCR S0
CHECKTYPE REQUIRED
END
STRING F_TPC_DESCR 50
BEGIN
PROMPT 2 3 "Descrizione "
USE %TPC
FIELD S0
KEY 2
INPUT S0 F_TPC_DESCR
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT F_TPC_CODICE
CHECKTYPE NORMAL
WARNING "Manca la descrizione"
END
ENDPAGE

19
ca/catbtpl.uml
View File

@ -9,11 +9,30 @@ PAGE "Tipo Lavoro" -1 -1 64 6
STRING F_TPL_CODICE 5
BEGIN
PROMPT 2 2 "Codice "
USE %TPL
FIELD CODTAB
FLAGS "UZ"
KEY 1
INPUT CODTAB F_TPL_CODICE
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_TPL_CODICE CODTAB
OUTPUT F_TPL_DESCR S0
CHECKTYPE REQUIRED
END
STRING F_TPL_DESCR 50
BEGIN
PROMPT 2 3 "Descrizione "
USE %TPL
FIELD S0
KEY 2
INPUT S0 F_TPL_DESCR
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT F_TPL_CODICE
CHECKTYPE NORMAL
WARNING "Manca la descrizione"
END
ENDPAGE