Patch level :10.0

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :Nuove Tabelle Lavanderia


git-svn-id: svn://10.65.10.50/trunk@16953 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
lvietri 2008-07-28 09:42:21 +00:00
parent 76b3ccebcc
commit 7a9de4e1f5
6 changed files with 255 additions and 0 deletions

3
lv/lvtbaut.h Executable file
View File

@ -0,0 +1,3 @@
#define F_COD 101
#define F_COD_AUTISTA 102
#define F_DES_AUTISTA 103

58
lv/lvtbaut.uml Executable file
View File

@ -0,0 +1,58 @@
#include "lvtbaut.h"
TOOLBAR "" 0 0 0 2
#include "Relapbar.h"
ENDPAGE
PAGE "Tabella Autisti" 0 2 0 0
GROUPBOX DLG_NULL 80 9
BEGIN
PROMPT 1 1 "@b Autisti"
END
LIST F_COD 3
BEGIN
PROMPT 2 2 "Codice"
ITEM "AUT|AUT"
FLAGS "H"
KEY 1
END
STRING F_COD_AUTISTA 2
BEGIN
PROMPT 2 5 "Codice Autista "
HELP "Inserire codice autista"
FLAGS "BU"
KEY 1
FIELD CODTAB
USE AUT
INPUT CODTAB F_COD_AUTISTA
DISPLAY "Codice Autista" CODTAB
DISPLAY "Descrizione Autista@35" S0
OUTPUT F_COD_AUTISTA CODTAB
OUTPUT F_DES_AUTISTA S0
CHECKTYPE REQUIRED
END
STRING F_DES_AUTISTA 35
BEGIN
PROMPT 2 7 "Descrizione Autista"
FLAGS "B"
FIELD S0
KEY 2
USE AUT
INPUT S0 F_DES_AUTISTA
DISPLAY "Codice Autista" CODTAB
DISPLAY "Descrizione Autista@35" S0
OUTPUT F_COD_AUTISTA CODTAB
OUTPUT F_DES_AUTISTA S0
CHECKTYPE REQUIRED
END
ENDPAGE
ENDMASK

7
lv/lvtbfrq.h Executable file
View File

@ -0,0 +1,7 @@
#define F_COD 101
#define F_COD_FRQ 102
#define F_DES_FRQ 103
#define F_RITARDO 104
#define F_INT_CONS 105
#define F_MAX_CONS 106
#define F_USA_CONS 107

82
lv/lvtbfrq.uml Executable file
View File

@ -0,0 +1,82 @@
#include "lvtbfrq.h"
TOOLBAR "" 0 0 0 2
#include "Relapbar.h"
ENDPAGE
PAGE "Frequenza Consegne" 0 2 0 0
GROUPBOX DLG_NULL 80 15
BEGIN
PROMPT 1 1 "@b Frequenza Consegne"
END
LIST F_COD 3
BEGIN
PROMPT 2 3 ""
ITEM "FRQ|FRQ"
FLAGS "H"
FIELD COD
KEY 1
END
STRING F_COD_FRQ 2
BEGIN
PROMPT 2 5 "Cod.Frequenza Consegna "
FLAGS "BU"
FIELD CODTAB
KEY 1
USE FRQ
INPUT CODTAB F_COD_FRQ
DISPLAY "Cod.Freq.Cons." CODTAB
DISPLAY "Descr.Freq.Cons.@35" S0
DISPLAY "Ritardo" I0
DISPLAY "Intervallo" I1
DISPLAY "Max Cons." I2
DISPLAY "Usa Ult.Cons" B0
OUTPUT F_COD_FRQ CODTAB
OUTPUT F_DES_FRQ S0
OUTPUT F_RITARDO I0
OUTPUT F_INT_CONS I1
OUTPUT F_MAX_CONS I2
OUTPUT F_USA_CONS B0
CHECKTYPE REQUIRED
END
STRING F_DES_FRQ 35
BEGIN
PROMPT 2 7 "Descr.Frequenza Consegna"
FIELD S0
KEY 2
CHECKTYPE REQUIRED
END
NUMBER F_RITARDO 3 0
BEGIN
PROMPT 2 9 "Ritardo"
FIELD I0
END
NUMBER F_INT_CONS 3 0
BEGIN
PROMPT 15 9 "Intervallo"
FIELD I1
CHECKTYPE REQUIRED
END
NUMBER F_MAX_CONS 2 0
BEGIN
PROMPT 30 9 "Max Consegne Mese"
FIELD I2
END
BOOLEAN F_USA_CONS
BEGIN
FIELD B0
PROMPT 2 11 "Usa Ultima Consegna"
END
ENDPAGE
ENDMASK

7
lv/lvtbiti.h Executable file
View File

@ -0,0 +1,7 @@
#define F_COD 101
#define F_COD_ITINERARIO 102
#define F_DES_ITINERARIO 103
#define F_COD_AUTISTA 104
#define F_DES_AUTISTA 105
#define F_COD_MEZZO 106
#define F_DES_MEZZO 107

98
lv/lvtbiti.uml Executable file
View File

@ -0,0 +1,98 @@
#include "lvtbiti.h"
TOOLBAR "" 0 0 0 2
#include "Relapbar.h"
ENDPAGE
PAGE "Itinerari" 0 2 0 0
GROUPBOX DLG_NULL 90 15
BEGIN
PROMPT 1 1 "@b Itinerari"
END
LIST F_COD 3
BEGIN
PROMPT 2 3 ""
ITEM "ITI|ITI"
FLAGS "H"
FIELD COD
KEY 1
END
STRING F_COD_ITINERARIO 3
BEGIN
PROMPT 2 5 "Codice Itinerario "
FLAGS "BU"
FIELD CODTAB
KEY 1
USE ITI
INPUT CODTAB F_COD_ITINERARIO
INPUT S1 F_COD_AUTISTA
INPUT S2 F_COD_MEZZO
DISPLAY "Cod.Itinerario" CODTAB
DISPLAY "Descr.Itinerario@35" S0
DISPLAY "Cod.Autista" S1
DISPLAY "Cod.Mezzo" S2
OUTPUT F_COD_ITINERARIO CODTAB
OUTPUT F_DES_ITINERARIO S0
OUTPUT F_COD_AUTISTA S1
OUTPUT F_COD_MEZZO S2
CHECKTYPE REQUIRED
END
STRING F_DES_ITINERARIO 35
BEGIN
PROMPT 2 7 "Descrizione Itinerario"
FIELD S0
KEY 2
CHECKTYPE REQUIRED
END
STRING F_COD_AUTISTA 2
BEGIN
PROMPT 2 9 "Codice Autista "
FLAGS "BU"
FIELD S1
USE AUT
INPUT CODTAB F_COD_AUTISTA
DISPLAY "Cod.Autista" CODTAB
DISPLAY "Descr.Autista@35" S0
OUTPUT F_COD_AUTISTA CODTAB
OUTPUT F_DES_AUTISTA S0
CHECKTIPE NORMAL
END
STRING F_DES_AUTISTA 35
BEGIN
PROMPT 30 9 "Descrizione Autista"
FLAGS "D"
END
STRING F_COD_MEZZO 2
BEGIN
PROMPT 2 11 "Codice Mezzo "
FLAGS "BU"
FIELD S2
USE MEZ
INPUT CODTAB F_COD_MEZZO
DISPLAY "Cod.Mezzo" CODTAB
DISPLAY "Descr.Mezzo@35" S0
OUTPUT F_COD_MEZZO CODTAB
OUTPUT F_DES_MEZZO S0
CHECKTIPE NORMAL
END
STRING F_DES_MEZZO 35
BEGIN
PROMPT 30 11 "Descrizione Mezzo "
FLAGS "D"
END
ENDPAGE
ENDMASK