Lavoro al 29/08/96
git-svn-id: svn://10.65.10.50/trunk@3466 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex
parent
e8fc532e13
commit
b6c5b7cc6b
5
ve/batbfrd.h
Executable file
5
ve/batbfrd.h
Executable file
@ -0,0 +1,5 @@
|
||||
#define F_CODTAB 101
|
||||
#define F_DES 102
|
||||
#define F_PICTURE 103
|
||||
#define F_TIPO 104
|
||||
#define F_FORMULA 105
|
||||
68
ve/batbfrd.uml
Executable file
68
ve/batbfrd.uml
Executable file
@ -0,0 +1,68 @@
|
||||
#include "batbfrd.h"
|
||||
|
||||
TOOLBAR "" 0 20 60 2
|
||||
|
||||
#include "toolbar.h"
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tabella formule documenti" -1 -1 60 14
|
||||
|
||||
GROUPBOX DLG_NULL 75 7
|
||||
BEGIN
|
||||
PROMPT 1 0 ""
|
||||
FLAG "R"
|
||||
END
|
||||
|
||||
STRING F_CODTAB 10
|
||||
BEGIN
|
||||
PROMPT 2 2 "Identificatore "
|
||||
FIELD CODTAB
|
||||
USE %FRD
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_CODTAB
|
||||
DISPLAY "Codice@10" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODTAB CODTAB
|
||||
OUTPUT F_DES S0
|
||||
KEY 1
|
||||
FLAG "UZ"
|
||||
END
|
||||
|
||||
STRING F_DES 50
|
||||
BEGIN
|
||||
PROMPT 2 4 "Descrizione "
|
||||
FIELD S0
|
||||
USE %FRD KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_DES
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice@10" CODTAB
|
||||
COPY OUTPUT F_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
STRING F_PICTURE 20
|
||||
BEGIN
|
||||
PROMPT 2 7 "Picture di pres. "
|
||||
FIELD S3
|
||||
END
|
||||
|
||||
BOOLEAN F_TIPO
|
||||
BEGIN
|
||||
PROMPT 2 9 "Formula numerica"
|
||||
FIELD B0
|
||||
END
|
||||
|
||||
STRING F_FORMULA 70 50
|
||||
BEGIN
|
||||
PROMPT 2 11 "Formula "
|
||||
FIELD S1
|
||||
CHECKTYPE REQUIRED
|
||||
WARNING "La formula e' obbligatoria"
|
||||
FLAG "U"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
|
||||
68
ve/batbfrr.uml
Executable file
68
ve/batbfrr.uml
Executable file
@ -0,0 +1,68 @@
|
||||
#include "batbfrd.h"
|
||||
|
||||
TOOLBAR "" 0 20 60 2
|
||||
|
||||
#include "toolbar.h"
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tabella formule righe documenti" -1 -1 60 14
|
||||
|
||||
GROUPBOX DLG_NULL 75 7
|
||||
BEGIN
|
||||
PROMPT 1 0 ""
|
||||
FLAG "R"
|
||||
END
|
||||
|
||||
STRING F_CODTAB 10
|
||||
BEGIN
|
||||
PROMPT 2 2 "Identificatore "
|
||||
FIELD CODTAB
|
||||
USE %FRR
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_CODTAB
|
||||
DISPLAY "Codice@10" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODTAB CODTAB
|
||||
OUTPUT F_DES S0
|
||||
KEY 1
|
||||
FLAG "UZ"
|
||||
END
|
||||
|
||||
STRING F_DES 50
|
||||
BEGIN
|
||||
PROMPT 2 4 "Descrizione "
|
||||
FIELD S0
|
||||
USE %FRR KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_DES
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice@10" CODTAB
|
||||
COPY OUTPUT F_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
STRING F_PICTURE 20
|
||||
BEGIN
|
||||
PROMPT 2 7 "Picture di pres. "
|
||||
FIELD S3
|
||||
END
|
||||
|
||||
BOOLEAN F_TIPO
|
||||
BEGIN
|
||||
PROMPT 2 9 "Formula numerica"
|
||||
FIELD B0
|
||||
END
|
||||
|
||||
STRING F_FORMULA 70 50
|
||||
BEGIN
|
||||
PROMPT 2 11 "Formula "
|
||||
FIELD S1
|
||||
CHECKTYPE REQUIRED
|
||||
WARNING "La formula e' obbligatoria"
|
||||
FLAG "U"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
|
||||
29
ve/verig.uml
29
ve/verig.uml
@ -44,7 +44,7 @@ BEGIN
|
||||
USE %TRI
|
||||
IN CODTAB FR_TIPORIGA
|
||||
OU FR_DESTIPORIGA S0
|
||||
CHECKTYPE NORMAL
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "DG"
|
||||
END
|
||||
|
||||
@ -73,10 +73,10 @@ ENDIF
|
||||
OUTPUT FR_CODMAG CODTAB[1,3]
|
||||
OUTPUT FR_DESMAG S0
|
||||
IFDEF(CH_CODMAG)
|
||||
CHECKTYPE CH_CODMAG
|
||||
CHECKTYPE CH_CODMAG
|
||||
ELSE
|
||||
CHECKTYPE NORMAL
|
||||
ENDIF
|
||||
ENDIF
|
||||
WARNING "Magazzino assente"
|
||||
FLAGS "U"
|
||||
IFDEF(FL_CODMAG)
|
||||
@ -251,13 +251,25 @@ IFDEF(X_DESCR)
|
||||
PROMPT X_DESCR Y_DESCR PR_DESCR
|
||||
ELSEIF
|
||||
PROMPT 2 7 "Descrizione "
|
||||
ENDIF
|
||||
END
|
||||
ENDIF
|
||||
|
||||
IFDEF(F_DESCRART)
|
||||
ZOOM FR_DESCRART 50
|
||||
BEGIN
|
||||
IFDEF(X_DESCRART)
|
||||
PROMPT X_DESCRART Y_DESCRART PR_DESCRART
|
||||
ELSEIF
|
||||
PROMPT 2 7 "Descrizione "
|
||||
ENDIF
|
||||
USE LF_ANAMAG KEY 2
|
||||
INPUT DESCR FR_DESCR
|
||||
INPUT DESCR FR_DESCRART
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
DISPLAY "Codice@20" CODART
|
||||
OUTPUT FR_DESCR DESCR
|
||||
OUTPUT FR_DESCRART DESCR
|
||||
ADD RUN ve2 -3
|
||||
FIELD DUMMY
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -274,6 +286,7 @@ ENDIF
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice spesa" CODTAB
|
||||
COPY OUTPUT FR_CODSPV
|
||||
FIELD DUMMY
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -290,6 +303,7 @@ ENDIF
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice spesa" CODTAB
|
||||
COPY OUTPUT FR_CODSPQ
|
||||
FIELD DUMMY
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -306,6 +320,7 @@ ENDIF
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice spesa" CODTAB
|
||||
COPY OUTPUT FR_CODSPP
|
||||
FIELD DUMMY
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -372,6 +387,7 @@ IFDEF(X_PERCSP)
|
||||
ELSEIF
|
||||
PROMPT 22 9 "%Spesa "
|
||||
ENDIF
|
||||
FIELD DUMMY
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -383,6 +399,7 @@ IFDEF(X_PREZZO)
|
||||
ELSEIF
|
||||
PROMPT 42 9 "Prezzo "
|
||||
ENDIF
|
||||
FIELD DUMMY
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -394,6 +411,7 @@ IFDEF(X_VALORE)
|
||||
ELSEIF
|
||||
PROMPT 42 9 "Valore "
|
||||
ENDIF
|
||||
FIELD DUMMY
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -529,6 +547,7 @@ IFDEF(CH_CODIVA)
|
||||
ELSEIF
|
||||
CHECKTYPE NORMAL
|
||||
ENDIF
|
||||
FIELD DUMMY
|
||||
END
|
||||
ENDIF
|
||||
|
||||
|
||||
@ -16,14 +16,14 @@ DEFINE_FIELD(DESMAG)
|
||||
DEFINE_FIELD(CODDEP)
|
||||
DEFINE_FIELD(DESDEP)
|
||||
DEFINE_FIELD(CODART)
|
||||
DEFINE_FIELD(DESCR)
|
||||
DEFINE_FIELD(DESCRART)
|
||||
DEFINE_FIELD(UMQTA)
|
||||
DEFINE_FIELD(QTA)
|
||||
DEFINE_FIELD(PREZZO)
|
||||
DEFINE_FIELD(SCONTO)
|
||||
DEFINE_FIELD(PERCPROV)
|
||||
DEFINE_FIELD(CODIVA)
|
||||
DEFINE_FIELD(DESIVA)
|
||||
DEFINE_FIELD(DESIVA)
|
||||
|
||||
#include "verig.uml"
|
||||
|
||||
|
||||
14
ve/verig05.uml
Executable file
14
ve/verig05.uml
Executable file
@ -0,0 +1,14 @@
|
||||
#include "verigdef.h"
|
||||
|
||||
#define FULL_SCREEN
|
||||
// else
|
||||
// #define MASK_WIDTH 60
|
||||
// #define MASK_HEIGHT 14
|
||||
//
|
||||
#define MASK_TITLE1 "Descrizione"
|
||||
|
||||
|
||||
DEFINE_FIELD(DESCR)
|
||||
|
||||
#include "verig.uml"
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user