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

Patch level :2.0 454

Browse Source 
Files correlati     :cetbcim.msk
Ricompilazione Demo : [ ]
Commento            :
IMPL79
Tabella impianti:decodificare nella maschera di gestione della tabella impianti i dati della
localizzazione selezionata


git-svn-id: svn://10.65.10.50/trunk@11013 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2003-04-15 11:32:54 +00:00
parent bcd84ae53c
commit c567b87d45
2 changed files with 21 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ce/cetbcim.h
View File

@ -3,4 +3,5 @@
#define F_CODIMP 101
#define F_DESCRIMP 102
#define F_COD_LOC_IMP 103
#define F_DES_LOC_IMP 104
#define F_CODDITTA 111

22
ce/cetbcim.uml
View File

@ -8,7 +8,7 @@ ENDPAGE
PAGE "Impianti della ditta" -1 -1 60 6
GROUPBOX DLG_NULL 75 7
GROUPBOX DLG_NULL 78 8
BEGIN
PROMPT 1 0 ""
FLAGS "R"
@ -56,6 +56,24 @@ BEGIN
FIELD S1
USE LOC //tabella localizzazioni ditte
INPUT CODTAB F_COD_LOC_IMP
DISPLAY "Codice localizzazione@50" CODTAB
DISPLAY "Codice@10" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_COD_LOC_IMP CODTAB
OUTPUT F_DES_LOC_IMP S0
CHECKTYPE NORMAL
END
STRING F_DES_LOC_IMP 50
BEGIN
PROMPT 2 6 "Descrizione "
USE LOC KEY 2
INPUT S0 F_DES_LOC_IMP
DISPLAY "Descrizione@50" S0
DISPLAY "Codice@10" CODTAB
COPY OUTPUT F_COD_LOC_IMP
CHECKTYPE NORMAL
END
ENDPAGE
ENDMASK