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

Modificate ricerche della maschera di selezione form

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1494 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-06-22 14:44:25 +00:00
parent b28b209af4
commit a333ab9f04
1 changed files with 33 additions and 35 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

68
ba/ba2100b.uml
View File

@ -4,60 +4,58 @@ PAGE "Scelta profilo" -1 -1 67 6
STRING F_BASE 8 STRING F_BASE 8
BEGIN BEGIN
PROMPT 2 1 "Profilo base " PROMPT 2 1 "Profilo base "
HELP "Specificare il nome del profilo di base utilizzato" FIELD TIPOPROF
CHECKTYPE REQUIRED HELP "Specificare il nome del profilo di base utilizzato"
USE LF_FORM SELECT CODPROF==""
INPUT TIPOPROF F_BASE
DISPLAY "Profilo base" TIPOPROF
DISPLAY "Descrizione@50" DESC
OUTPUT F_BASE TIPOPROF
OUTPUT F_DESC DESC
VALIDATE NOTEMPTY_FUNC
END END
NUMBER F_CODE 5 NUMBER F_CODE 5
BEGIN BEGIN
PROMPT 2 2 "Codice profilo " PROMPT 2 2 "Codice profilo "
FLAGS "Z" FLAGS "Z"
HELP "Codice del profilo utente" FIELD CODPROF
USE LF_FORM HELP "Codice del profilo utente"
// CHECKTYPE REQUIRED USE LF_FORM
INPUT TIPOPROF F_BASE INPUT TIPOPROF F_BASE
INPUT CODPROF F_CODE INPUT CODPROF F_CODE
FIELD CODPROF DISPLAY "Profilo base" TIPOPROF
DISPLAY "Profilo base" TIPOPROF DISPLAY "Codice" CODPROF
DISPLAY "Codice" CODPROF DISPLAY "Descrizione@50" DESC
DISPLAY "Descrizione@50" DESC OUTPUT F_BASE TIPOPROF
OUTPUT F_BASE TIPOPROF OUTPUT F_CODE CODPROF
OUTPUT F_CODE CODPROF OUTPUT F_DESC DESC
OUTPUT F_DESC DESC
END END
STRING F_DESC 40 STRING F_DESC 40
BEGIN BEGIN
PROMPT 2 3 "Descrizione " PROMPT 2 3 "Descrizione "
HELP "Descrizione profilo utente" HELP "Descrizione profilo utente"
COPY USE F_CODE COPY ALL F_CODE
INPUT TIPOPROF F_BASE FIELD DESC
INPUT CODPROF F_CODE
FIELD DESC
DISPLAY "Profilo base" TIPOPROF
DISPLAY "Codice" CODPROF
DISPLAY "Descrizione@50" DESC
OUTPUT F_BASE TIPOPROF
OUTPUT F_CODE CODPROF
OUTPUT F_DESC DESC
END END
BUTTON DLG_OK 10 2 BUTTON DLG_OK 10 2
BEGIN BEGIN
PROMPT -13 -1 "" PROMPT -13 -1 ""
END END
BUTTON DLG_DELREC 10 2 BUTTON DLG_DELREC 10 2
BEGIN BEGIN
PROMPT -23 -1 "" PROMPT -23 -1 ""
MESSAGE EXIT,K_DEL MESSAGE EXIT,K_DEL
END END
BUTTON DLG_CANCEL 10 2 BUTTON DLG_CANCEL 10 2
BEGIN BEGIN
PROMPT -33 -1 "" PROMPT -33 -1 ""
END END
ENDPAGE ENDPAGE