Patch level :10.0 904

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
aggiunto il magazzino viaggiante all'agente


git-svn-id: svn://10.65.10.50/branches/R_10_00@21506 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2011-01-24 16:34:18 +00:00
parent 8c741f3555
commit 9d9e85c601
4 changed files with 72 additions and 6 deletions

View File

@ -1,3 +1,3 @@
122
0
$agenti|0|0|151|0|Archivio agenti|||
$agenti|0|0|156|0|Archivio agenti|||

View File

@ -1,5 +1,5 @@
122
23
24
CODAGE|1|5|0|Codice agente
RAGSOC|1|50|0|Ragione sociale
CODFORN|3|6|0|Codice fornitore relativo
@ -23,6 +23,7 @@ CODFISC|1|16|0|Codice Fiscale
MATRICOLA|1|8|0|Matricola
PLURIMAND|8|1|0|Plurimandatario
DATACESS|5|8|0|Data cessazione rapporto
CODMAG|1|5|0|Codice magazzino viaggiante
3
CODAGE|
UPPER(RAGSOC)|X

View File

@ -32,5 +32,9 @@
#define F_MATRICOLA 130
#define F_PLURIMAND 131
#define F_DATACESS 132
#define F_CODMAG 135
#define F_DESMAG 136
#define F_CODDEP 137
#define F_DESDEP 138
#define G_CAPOZONA 1

View File

@ -164,7 +164,7 @@ END
NUMBER F_PERCPROVV 5 2
BEGIN
PROMPT 2 15 "% provvigione fissa "
PROMPT 2 15 "% provvigione fissa "
FIELD PERCPROVV
NUM_EXPR {(#F_PERCPROVV>=0.0)&&(#F_PERCPROVV<100.0)}
WARNING "Inserire una percentuale tra 0 e 100"
@ -172,22 +172,83 @@ END
STRING F_MATRICOLA 8
BEGIN
PROMPT 2 16 "Numero matricola "
PROMPT 2 16 "Numero matricola "
FIELD MATRICOLA
END
DATE F_DATACESS
BEGIN
PROMPT 2 17 "Data cessazione rapporto "
PROMPT 33 16 "Data cessazione rapporto "
FIELD DATACESS
END
BOOLEAN F_PLURIMAND
BEGIN
PROMPT 2 18 "Plurimandatario"
PROMPT 2 17 "Plurimandatario"
FIELD PLURIMAND
END
//magazzino viaggiante collegato all'agente (arsenale,insomma)
GROUPBOX DLG_NULL 76 4
BEGIN
PROMPT 2 18 "Magazzino viaggiante"
END
STRING F_CODMAG 3
BEGIN
PROMPT 3 19 "Magazzino "
FIELD CODMAG[1,3]
USE MAG SELECT CODTAB[4,5]==""
FLAGS "U"
INPUT CODTAB F_CODMAG
DISPLAY "Codice " CODTAB[1,3]
DISPLAY "Denominazione mag.@50 " S0
OUTPUT F_CODMAG CODTAB[1,3]
OUTPUT F_DESMAG S0
CHECKTYPE NORMAL
END
STRING F_DESMAG 50
BEGIN
PROMPT 20 19 ""
USE MAG KEY 2
INPUT S0 F_DESMAG
DISPLAY "Denominazione mag.@50" S0
DISPLAY "Cod. magazzino" CODTAB[1,3]
DISPLAY "Cod. deposito" CODTAB[4,5]
COPY OUTPUT F_CODMAG
CHECKTYPE NORMAL
END
STRING F_CODDEP 2
BEGIN
PROMPT 3 20 "Deposito "
FIELD CODMAG[4,5]
FLAGS "U"
USE MAG
INPUT CODTAB[1,3] F_CODMAG SELECT
INPUT CODTAB[4,5] F_CODDEP
DISPLAY "Cod. magazzino" CODTAB[1,3]
DISPLAY "Cod. deposito" CODTAB[4,5]
DISPLAY "Denominazione dep.@50" S0
OUTPUT F_CODMAG CODTAB[1,3]
OUTPUT F_CODDEP CODTAB[4,5]
OUTPUT F_DESDEP S0
CHECKTYPE NORMAL
END
STRING F_DESDEP 50
BEGIN
PROMPT 20 20 ""
USE MAG KEY 2
INPUT S0 F_DESDEP
DISPLAY "Denominazione dep.@50" S0
DISPLAY "Cod. magazzino" CODTAB[1,3]
DISPLAY "Cod. deposito" CODTAB[4,5]
COPY OUTPUT F_CODDEP
CHECKTYPE NORMAL
END
ENDPAGE
PAGE "Ricerche" -1 -1 78 8