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

Corretta formattazione

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1718 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1995-08-21 16:02:55 +00:00
parent caa9881850
commit 0f8bdbb890
3 changed files with 102 additions and 102 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ba/ba2100a.h
View File

@ -1,4 +1,4 @@
#define FLD_FROM 101
#define FLD_TO 102
#define FLD_SUBJ 103
#define FLD_FROM 101
#define FLD_TO 102
#define FLD_SUBJ 103
#define FLD_BODY 104

74
ba/ba2100a.uml
View File

@ -1,37 +1,37 @@
#include "ba2100a.h"
PAGE "Invio messaggi" -1 -1 72 9
STRING FLD_FROM 10
BEGIN
PROMPT 1 2 "From "
END
STRING FLD_TO 10
BEGIN
PROMPT 1 3 "To "
END
STRING FLD_SUBJ 10
BEGIN
PROMPT 1 4 "Subject "
END
STRING FLD_BODY 60
BEGIN
PROMPT 1 5 "Body "
END
BUTTON DLG_OK 9 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_CANCEL 9 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK
#include "ba2100a.h"
PAGE "Invio messaggi" -1 -1 72 9
STRING FLD_FROM 10
BEGIN
PROMPT 1 2 "From "
END
STRING FLD_TO 10
BEGIN
PROMPT 1 3 "To "
END
STRING FLD_SUBJ 10
BEGIN
PROMPT 1 4 "Subject "
END
STRING FLD_BODY 60
BEGIN
PROMPT 1 5 "Body "
END
BUTTON DLG_OK 9 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_CANCEL 9 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK

124
ba/ba2100b.uml
View File

@ -1,62 +1,62 @@
#include "ba2100.h"
PAGE "Scelta profilo" -1 -1 75 6
STRING F_BASE 8
BEGIN
PROMPT 2 1 "Profilo base "
FIELD TIPOPROF
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
CHECKTYPE REQUIRED
END
NUMBER F_CODE 5
BEGIN
PROMPT 2 2 "Codice profilo "
FLAGS "Z"
FIELD CODPROF
HELP "Codice del profilo utente"
USE LF_FORM
INPUT TIPOPROF F_BASE
INPUT CODPROF F_CODE
DISPLAY "Profilo base" TIPOPROF
DISPLAY "Codice" CODPROF
DISPLAY "Descrizione@50" DESC
OUTPUT F_BASE TIPOPROF
OUTPUT F_CODE CODPROF
OUTPUT F_DESC DESC
END
STRING F_DESC 50
BEGIN
PROMPT 2 3 "Descrizione "
HELP "Descrizione profilo utente"
COPY ALL F_CODE
FIELD DESC
END
BUTTON DLG_OK 10 2
BEGIN
PROMPT -13 -1 ""
END
BUTTON DLG_DELREC 10 2
BEGIN
PROMPT -23 -1 ""
MESSAGE EXIT,K_DEL
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -33 -1 ""
END
ENDPAGE
ENDMASK
#include "ba2100.h"
PAGE "Scelta profilo" -1 -1 75 6
STRING F_BASE 8
BEGIN
PROMPT 2 1 "Profilo base "
FIELD TIPOPROF
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
CHECKTYPE REQUIRED
END
NUMBER F_CODE 5
BEGIN
PROMPT 2 2 "Codice profilo "
FLAGS "Z"
FIELD CODPROF
HELP "Codice del profilo utente"
USE LF_FORM
INPUT TIPOPROF F_BASE
INPUT CODPROF F_CODE
DISPLAY "Profilo base" TIPOPROF
DISPLAY "Codice" CODPROF
DISPLAY "Descrizione@50" DESC
OUTPUT F_BASE TIPOPROF
OUTPUT F_CODE CODPROF
OUTPUT F_DESC DESC
END
STRING F_DESC 50
BEGIN
PROMPT 2 3 "Descrizione "
HELP "Descrizione profilo utente"
COPY ALL F_CODE
FIELD DESC
END
BUTTON DLG_OK 10 2
BEGIN
PROMPT -13 -1 ""
END
BUTTON DLG_DELREC 10 2
BEGIN
PROMPT -23 -1 ""
MESSAGE EXIT,K_DEL
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -33 -1 ""
END
ENDPAGE
ENDMASK