Patch level :
Files correlati : Ricompilazione Demo : [ ] Commento : git-svn-id: svn://10.65.10.50/trunk@17429 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
rajitgill
parent
d741387e9b
commit
c21d269c77
42
lv/lv0300a.h
42
lv/lv0300a.h
@ -1,22 +1,40 @@
|
||||
#define GEN 1
|
||||
#define RIT 2
|
||||
#define ANT 3
|
||||
#define CONG 4
|
||||
#define DOT 5
|
||||
#define FAT 2
|
||||
#define ORF 3
|
||||
#define ORC 4
|
||||
#define RIT 5
|
||||
#define ANT 6
|
||||
#define CONG 7
|
||||
#define DOT 8
|
||||
|
||||
#define F_CODNUM_GEN 201
|
||||
#define F_DESNUM_GEN 202
|
||||
#define F_TIPODOC_GEN 203
|
||||
#define F_DESTIPODOC_GEN 204
|
||||
#define F_BUONIRIT 205
|
||||
#define F_BUONIANT 206
|
||||
#define F_DOCCONG 207
|
||||
#define F_DOCDOT 208
|
||||
#define F_TIPORIGDOT 209
|
||||
#define F_TIPORIGDTMP 210
|
||||
#define F_DESCRTR1 211
|
||||
#define F_DESCRTR2 212
|
||||
|
||||
#define F_CODNUM_FAT 205
|
||||
#define F_DESNUM_FAT 206
|
||||
#define F_TIPODOC_FAT 207
|
||||
#define F_DESTIPODOC_FAT 209
|
||||
|
||||
#define F_CODNUM_ORF 210
|
||||
#define F_DESNUM_ORF 211
|
||||
#define F_TIPODOC_ORF 212
|
||||
#define F_DESTIPODOC_ORF 213
|
||||
|
||||
#define F_CODNUM_ORC 214
|
||||
#define F_DESNUM_ORC 215
|
||||
#define F_TIPODOC_ORC 216
|
||||
#define F_DESTIPODOC_ORC 217
|
||||
|
||||
#define F_BUONIRIT 218
|
||||
#define F_BUONIANT 219
|
||||
#define F_DOCCONG 220
|
||||
#define F_DOCDOT 221
|
||||
#define F_TIPORIGDOT 222
|
||||
#define F_TIPORIGDTMP 223
|
||||
#define F_DESCRTR1 224
|
||||
#define F_DESCRTR2 225
|
||||
|
||||
#define S_CODNUM_RIT 101
|
||||
#define S_TIPODOC_RIT 102
|
||||
|
||||
159
lv/lv0300a.uml
159
lv/lv0300a.uml
@ -84,6 +84,165 @@ BEGIN
|
||||
COPY OUTPUT F_TIPODOC_GEN
|
||||
END
|
||||
|
||||
STRING F_CODNUM_FAT 4
|
||||
BEGIN
|
||||
PROMPT 2 5 "Numerazione "
|
||||
FIELD NUM_FAT
|
||||
HELP "Codice numerazione"
|
||||
USE %NUM
|
||||
INPUT CODTAB F_CODNUM_FAT
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODNUM_FAT CODTAB
|
||||
OUTPUT F_DESNUM_FAT S0
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "UPA"
|
||||
WARNING "Numerazione assente"
|
||||
END
|
||||
|
||||
STRING F_DESNUM_FAT 50
|
||||
BEGIN
|
||||
PROMPT 24 5 ""
|
||||
HELP "Descrizione Numerazione"
|
||||
USE %NUM KEY 2
|
||||
INPUT S0 F_DESNUM_FAT
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_CODNUM_FAT
|
||||
END
|
||||
|
||||
STRING F_TIPODOC_FAT 4
|
||||
BEGIN
|
||||
PROMPT 2 6 "Tipo "
|
||||
FIELD TIPODOC_FAT
|
||||
HELP "Codice tipo documento"
|
||||
USE %TIP
|
||||
INPUT CODTAB F_TIPODOC_FAT
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_TIPODOC_FAT CODTAB
|
||||
OUTPUT F_DESTIPODOC_FAT S0
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "UP"
|
||||
END
|
||||
|
||||
STRING F_DESTIPODOC_FAT 50
|
||||
BEGIN
|
||||
PROMPT 24 6 ""
|
||||
HELP "Descrizione tipo documento"
|
||||
USE %TIP KEY 2
|
||||
INPUT S0 F_DESTIPODOC_FAT
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TIPODOC_FAT
|
||||
END
|
||||
|
||||
STRING F_CODNUM_ORF 4
|
||||
BEGIN
|
||||
PROMPT 2 8 "Numerazione "
|
||||
FIELD NUM_ORF
|
||||
HELP "Codice numerazione"
|
||||
USE %NUM
|
||||
INPUT CODTAB F_CODNUM_ORF
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODNUM_ORF CODTAB
|
||||
OUTPUT F_DESNUM_ORF S0
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "UPA"
|
||||
WARNING "Numerazione assente"
|
||||
END
|
||||
|
||||
STRING F_DESNUM_ORF 50
|
||||
BEGIN
|
||||
PROMPT 24 8 ""
|
||||
HELP "Descrizione Numerazione"
|
||||
USE %NUM KEY 2
|
||||
INPUT S0 F_DESNUM_ORF
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_CODNUM_ORF
|
||||
END
|
||||
|
||||
STRING F_TIPODOC_ORF 4
|
||||
BEGIN
|
||||
PROMPT 2 9 "Tipo "
|
||||
FIELD TIPODOC_ORF
|
||||
HELP "Codice tipo documento"
|
||||
USE %TIP
|
||||
INPUT CODTAB F_TIPODOC_ORF
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_TIPODOC_ORF CODTAB
|
||||
OUTPUT F_DESTIPODOC_ORF S0
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "UP"
|
||||
END
|
||||
|
||||
STRING F_DESTIPODOC_ORF 50
|
||||
BEGIN
|
||||
PROMPT 24 9 ""
|
||||
HELP "Descrizione tipo documento"
|
||||
USE %TIP KEY 2
|
||||
INPUT S0 F_DESTIPODOC_ORF
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TIPODOC_ORF
|
||||
END
|
||||
|
||||
STRING F_CODNUM_ORC 4
|
||||
BEGIN
|
||||
PROMPT 2 10 "Numerazione "
|
||||
FIELD NUM_ORC
|
||||
HELP "Codice numerazione"
|
||||
USE %NUM
|
||||
INPUT CODTAB F_CODNUM_ORC
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODNUM_ORC CODTAB
|
||||
OUTPUT F_DESNUM_ORC S0
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "UPA"
|
||||
WARNING "Numerazione assente"
|
||||
END
|
||||
|
||||
STRING F_DESNUM_ORC 50
|
||||
BEGIN
|
||||
PROMPT 24 10 ""
|
||||
HELP "Descrizione Numerazione"
|
||||
USE %NUM KEY 2
|
||||
INPUT S0 F_DESNUM_ORC
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_CODNUM_ORC
|
||||
END
|
||||
|
||||
STRING F_TIPODOC_ORC 4
|
||||
BEGIN
|
||||
PROMPT 2 11 "Tipo "
|
||||
FIELD TIPODOC_ORC
|
||||
HELP "Codice tipo documento"
|
||||
USE %TIP
|
||||
INPUT CODTAB F_TIPODOC_ORC
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_TIPODOC_ORC CODTAB
|
||||
OUTPUT F_DESTIPODOC_ORC S0
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "UP"
|
||||
END
|
||||
|
||||
STRING F_DESTIPODOC_ORC 50
|
||||
BEGIN
|
||||
PROMPT 24 11 ""
|
||||
HELP "Descrizione tipo documento"
|
||||
USE %TIP KEY 2
|
||||
INPUT S0 F_DESTIPODOC_ORC
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TIPODOC_ORC
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Buoni" 0 2 0 0
|
||||
|
||||
@ -26,22 +26,8 @@ bool TContratti_msk::on_art_select()
|
||||
const TString80 codart(row.get(ss.cid2index(S_CODART)));
|
||||
const TString4 umcont(row.get(ss.cid2index(S_UM)));
|
||||
TArticolo artrec(codart);
|
||||
TMask& rowmask=ss.sheet_mask();
|
||||
|
||||
set(F_GRMERC,artrec.get(ANAMAG_GRMERC).sleft(3));
|
||||
set(F_COLORE,artrec.get(ANAMAG_COLORE));
|
||||
set(F_LIVELLO,artrec.get(ANAMAG_LIVELLO));
|
||||
set(F_PPCONF,artrec.get(ANAMAG_PPCONF));
|
||||
set(F_PPCOLLO,artrec.get(ANAMAG_PPCOLLO));
|
||||
set(F_PPPALLET,artrec.get(ANAMAG_PPPALLET));
|
||||
set(F_TIPOPARTE,artrec.get(ANAMAG_TIPOPARTE));
|
||||
set(F_CODLAV1,artrec.get(ANAMAG_CODLAV1));
|
||||
set(F_CODLAV2,artrec.get(ANAMAG_CODLAV2));
|
||||
set(F_LINDEST1,artrec.get(ANAMAG_LINDEST1));
|
||||
set(F_LINDEST2,artrec.get(ANAMAG_LINDEST2));
|
||||
set(F_LAVATRICE,artrec.get(ANAMAG_LAVATRICE));
|
||||
set(F_ARTLAVCONT,artrec.get(ANAMAG_ARTLAVCONT));
|
||||
set(F_MANGDEST,artrec.get(ANAMAG_MANGDEST));
|
||||
|
||||
const int indsped=get_int(F_INDSPED);
|
||||
const TDate oggi(TODAY);
|
||||
|
||||
@ -67,8 +53,11 @@ bool TContratti_msk::on_art_select()
|
||||
consyear=artrec.convert_to_um(recgiac.get("ACQ").as_real()+recgiac.get("ENT").as_real(),umcont);
|
||||
}
|
||||
|
||||
set(F_DOTOD,dotod);
|
||||
set(F_CONSANNO,consyear);
|
||||
rowmask.set(S_DOTOD,dotod);
|
||||
row.add(dotod.stringa(),ss.cid2index(S_DOTOD));
|
||||
|
||||
rowmask.set(S_CONSANNO,consyear);
|
||||
row.add(consyear.stringa(),ss.cid2index(S_CONSANNO));
|
||||
|
||||
TDate imese(oggi);
|
||||
imese.set_day(1);
|
||||
@ -115,13 +104,14 @@ bool TContratti_msk::on_art_select()
|
||||
}
|
||||
}
|
||||
|
||||
set(F_CONSMESE,consmonth);
|
||||
rowmask.set(S_CONSMESE,consmonth);
|
||||
row.add(consmonth.stringa(),ss.cid2index(S_CONSMESE));
|
||||
|
||||
const bool varclcons = get_int(F_PPCONF)>0;
|
||||
const bool varclcons = rowmask.get_int(S_PPCONF)>0;
|
||||
|
||||
ss.enable_cell(ss.selected(),ss.cid2index(S_CALCCONS));
|
||||
|
||||
ss.sheet_mask().set(S_CALCCONS,"0");
|
||||
rowmask.set(S_CALCCONS,"0");
|
||||
row.add("0",ss.cid2index(S_CALCCONS));
|
||||
|
||||
return true;
|
||||
@ -149,14 +139,18 @@ bool TContratti_msk:: on_field_event(TOperable_field& o,TField_event e,long joll
|
||||
{
|
||||
TSheet_field& ss=sfield(F_RIGHE);
|
||||
TToken_string& row=ss.row(ss.selected());
|
||||
row.add(o.get(),0);
|
||||
row.add(o.get(),ss.cid2index(S_CODART));
|
||||
TArticolo art(o.get());
|
||||
const TString& um = art.um()[0].get(UMART_UM);
|
||||
|
||||
set(S_UM,um);
|
||||
row.add(um,S_UM);
|
||||
on_art_select();
|
||||
}
|
||||
break;
|
||||
case F_RIGHE:
|
||||
if (e==se_enter)
|
||||
on_art_select();
|
||||
break;
|
||||
else
|
||||
if (e==fe_init)
|
||||
on_art_select();
|
||||
break;
|
||||
default:break;
|
||||
}
|
||||
|
||||
|
||||
143
lv/lv0400.h
143
lv/lv0400.h
@ -6,82 +6,83 @@
|
||||
#define F_DATAIN 204
|
||||
#define F_DATASC 205
|
||||
#define F_RIGHE 206 //sheet righe contratto
|
||||
#define F_GRMERC 207
|
||||
#define F_COLORE 208
|
||||
#define F_LIVELLO 209
|
||||
#define F_PPCONF 210
|
||||
#define F_PPCOLLO 211
|
||||
#define F_PPPALLET 212
|
||||
#define F_TIPOPARTE 213
|
||||
#define F_CODLAV1 214
|
||||
#define F_CODLAV2 215
|
||||
#define F_LINDEST1 216
|
||||
#define F_LINDEST2 217
|
||||
#define F_LAVATRICE 218
|
||||
#define F_ARTLAVCONT 219
|
||||
#define F_MANGDEST 220
|
||||
#define F_PERFAT 221
|
||||
#define F_TIPOCAN 222
|
||||
#define F_INPERFAT 223
|
||||
#define F_DTLASTFAT 224
|
||||
#define F_ATTFATNODT 225
|
||||
#define F_FORFNOCONS 226
|
||||
#define F_TIPOSTPRZ 227
|
||||
#define F_TIPOLIS 228
|
||||
#define F_TIPOIMB 229
|
||||
#define F_CAUSMAG 230
|
||||
#define F_CAUSMAGDESC 231
|
||||
#define F_CONTSPOR 232
|
||||
#define F_SSCONS 233
|
||||
#define F_RIFBOLFAT 234
|
||||
#define F_ADDCAPROT 235
|
||||
#define F_PROFORME 236
|
||||
#define F_STRCONS 237
|
||||
#define F_FATTSOSP 238
|
||||
#define F_STDICITURA 239
|
||||
#define F_CICLAGGIO 240
|
||||
#define F_STPRZBOL 241
|
||||
#define F_STETIMATI 242
|
||||
#define F_STETITS 243
|
||||
#define F_STDDTPTS 244
|
||||
#define F_IMPMINFAT 245
|
||||
#define F_PERCNOCONT 246
|
||||
#define F_PERCTOLPES 247
|
||||
#define F_NUMUT 248
|
||||
#define F_NUMETI 249
|
||||
#define F_RITAUDTTMP 250
|
||||
#define F_DOTOD 251
|
||||
#define F_CONSMESE 252
|
||||
#define F_CONSANNO 253
|
||||
#define DLG_PLANNING 254
|
||||
#define F_INDSPED 255
|
||||
#define F_INDIR 256
|
||||
#define F_PERFAT 207
|
||||
#define F_TIPOCAN 208
|
||||
#define F_INPERFAT 209
|
||||
#define F_DTLASTFAT 210
|
||||
#define F_ATTFATNODT 211
|
||||
#define F_FORFNOCONS 212
|
||||
#define F_TIPOSTPRZ 213
|
||||
#define F_TIPOLIS 214
|
||||
#define F_TIPOIMB 215
|
||||
#define F_CAUSMAG 216
|
||||
#define F_CAUSMAGDESC 217
|
||||
#define F_CONTSPOR 218
|
||||
#define F_SSCONS 219
|
||||
#define F_RIFBOLFAT 220
|
||||
#define F_ADDCAPROT 221
|
||||
#define F_PROFORME 222
|
||||
#define F_STRCONS 223
|
||||
#define F_FATTSOSP 224
|
||||
#define F_STDICITURA 225
|
||||
#define F_CICLAGGIO 226
|
||||
#define F_STPRZBOL 227
|
||||
#define F_STETIMATI 228
|
||||
#define F_STETITS 229
|
||||
#define F_STDDTPTS 230
|
||||
#define F_IMPMINFAT 231
|
||||
#define F_PERCNOCONT 232
|
||||
#define F_PERCTOLPES 233
|
||||
#define F_NUMUT 234
|
||||
#define F_NUMETI 235
|
||||
#define F_RITAUDTTMP 236
|
||||
#define DLG_PLANNING 237
|
||||
#define F_INDSPED 238
|
||||
#define F_INDIR 239
|
||||
#define S_CODART 101
|
||||
#define S_DESCR 102
|
||||
#define S_UM 103
|
||||
#define S_CONG 104
|
||||
#define S_PREZZOST 105
|
||||
#define S_PREZZORN 106
|
||||
#define S_IMPFISART 107
|
||||
#define S_SCONTO 108
|
||||
#define S_DOTIN 109
|
||||
#define S_DOTTMP 110
|
||||
#define S_PRZDTTMP 111
|
||||
#define S_INDTTMP 112
|
||||
#define S_FIDTTMP 113
|
||||
#define S_PREZDAN 114
|
||||
#define S_VALCONV 115
|
||||
#define S_ARTBLOC 116
|
||||
#define S_CALCCONS 117
|
||||
#define S_TIPOFORF 118
|
||||
#define S_NOLCIC 119
|
||||
#define S_VCARTCLI 120
|
||||
#define S_MINCIC 121
|
||||
#define S_FORFPERCL 122
|
||||
#define S_CAUSMAG 123
|
||||
#define S_TIPONOL 124
|
||||
#define S_RITAUDTTMP 125
|
||||
#define S_FATTKG 126
|
||||
#define S_ARROT 127
|
||||
#define S_SCONTO 107
|
||||
#define S_DOTIN 108
|
||||
#define S_DOTOD 109
|
||||
#define S_CONSMESE 110
|
||||
#define S_CONSANNO 111
|
||||
#define S_DOTTMP 112
|
||||
#define S_PRZDTTMP 113
|
||||
#define S_INDTTMP 114
|
||||
#define S_FIDTTMP 115
|
||||
#define S_IMPFISART 116
|
||||
#define S_PREZDAN 117
|
||||
#define S_VALCONV 118
|
||||
#define S_ARTBLOC 119
|
||||
#define S_CALCCONS 120
|
||||
#define S_TIPOFORF 121
|
||||
#define S_NOLCIC 122
|
||||
#define S_VCARTCLI 123
|
||||
#define S_MINCIC 124
|
||||
#define S_FORFPERCL 125
|
||||
#define S_CAUSMAG 126
|
||||
#define S_TIPONOL 127
|
||||
#define S_RITAUDTTMP 128
|
||||
#define S_FATTKG 129
|
||||
#define S_ARROT 130
|
||||
#define S_GRMERC 131
|
||||
#define S_COLORE 132
|
||||
#define S_LIVELLO 133
|
||||
#define S_PPCONF 134
|
||||
#define S_PPCOLLO 135
|
||||
#define S_PPPALLET 136
|
||||
#define S_TIPOPARTE 137
|
||||
#define S_CODLAV1 138
|
||||
#define S_CODLAV2 139
|
||||
#define S_LINDEST1 140
|
||||
#define S_LINDEST2 141
|
||||
#define S_LAVATRICE 142
|
||||
#define S_ARTLAVCONT 143
|
||||
#define S_MANGDEST 144
|
||||
|
||||
|
||||
|
||||
|
||||
345
lv/lv0400a.uml
345
lv/lv0400a.uml
@ -103,22 +103,25 @@ BEGIN
|
||||
PROMPT 66 2 "~Giri"
|
||||
END
|
||||
|
||||
SPREADSHEET F_RIGHE 0 8
|
||||
SPREADSHEET F_RIGHE 0 14
|
||||
BEGIN
|
||||
PROMPT 0 5 "Righe contratto"
|
||||
ITEM "Articolo@20"
|
||||
ITEM "Descrizione@50"
|
||||
ITEM "UM"
|
||||
ITEM "Cong."
|
||||
ITEM "Prezzo in vigore"
|
||||
ITEM "Prezzo di Rinnovo"
|
||||
ITEM "Importo fisso"
|
||||
ITEM "Sconto %"
|
||||
ITEM "Dot.Iniziale"
|
||||
ITEM "Dot.Temporanea"
|
||||
ITEM "Articolo@10"
|
||||
ITEM "Descrizione@30"
|
||||
ITEM "UM@3"
|
||||
ITEM "Cong.@4"
|
||||
ITEM "Prezzo in vigore@8"
|
||||
ITEM "Prezzo di Rinnovo@8"
|
||||
ITEM "Sconto %@4"
|
||||
ITEM "Dot.Iniziale@5"
|
||||
ITEM "Dotaz. odierna@5"
|
||||
ITEM "Cons. mese@6"
|
||||
ITEM "Cons.anno@6"
|
||||
ITEM "Dot.Temporanea@5"
|
||||
ITEM "Prezzo Dot.Temp."
|
||||
ITEM "Inizio Dot.Temp."
|
||||
ITEM "Fine Dot.Temp."
|
||||
ITEM "Importo fisso"
|
||||
ITEM "Prezzo Danneggiati"
|
||||
ITEM "Val. convenzionale"
|
||||
ITEM "Articolo bloccato"
|
||||
@ -133,119 +136,20 @@ BEGIN
|
||||
ITEM "Ritiro aut.Dot.Temp."
|
||||
ITEM "Fatturazione a kg"
|
||||
ITEM "Arrotondamento"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 78 8
|
||||
BEGIN
|
||||
PROMPT 1 14 "@bDettaglio"
|
||||
END
|
||||
|
||||
NUMBER F_DOTOD 9
|
||||
BEGIN
|
||||
PROMPT 2 15 "Dotaz. odierna "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_COLORE 20 10
|
||||
BEGIN
|
||||
PROMPT 30 15 "Colore "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_GRMERC 3
|
||||
BEGIN
|
||||
PROMPT 55 15 "Tipologia "
|
||||
FLAG "UD"
|
||||
USE GMC KEY 1 SELECT CODTAB[4,5]==""
|
||||
INPUT CODTAB F_GRMERC
|
||||
DISPLAY "Codice" CODTAB[1,3]
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_GRMERC CODTAB[1,3]
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
NUMBER F_PPCONF 9
|
||||
BEGIN
|
||||
PROMPT 2 16 "Pz. per Pacco "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
NUMBER F_PPCOLLO 9
|
||||
BEGIN
|
||||
PROMPT 30 16 "Per Sacco "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
NUMBER F_PPPALLET 9
|
||||
BEGIN
|
||||
PROMPT 55 16 "Per Carrello "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_MANGDEST 3
|
||||
BEGIN
|
||||
PROMPT 2 17 "Mangano Dest. "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_ARTLAVCONT 4
|
||||
BEGIN
|
||||
PROMPT 30 17 "Art.Lav.cont."
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_LAVATRICE 4
|
||||
BEGIN
|
||||
PROMPT 55 17 "Lavatrice "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_CODLAV1 3
|
||||
BEGIN
|
||||
PROMPT 2 18 "Cod. Lavag. 1 "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_CODLAV2 3
|
||||
BEGIN
|
||||
PROMPT 30 18 "Cod. Lavag. 2"
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_TIPOPARTE 1
|
||||
BEGIN
|
||||
PROMPT 55 18 "Tipo Parte "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_LINDEST1 3
|
||||
BEGIN
|
||||
PROMPT 2 19 "Linea dest. 1 "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_LINDEST2 3
|
||||
BEGIN
|
||||
PROMPT 30 19 "Linea dest. 2"
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_LIVELLO 1
|
||||
BEGIN
|
||||
PROMPT 55 19 "Livello "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
NUMBER F_CONSMESE 9
|
||||
BEGIN
|
||||
PROMPT 2 20 "Consegnato mese"
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
NUMBER F_CONSANNO 9
|
||||
BEGIN
|
||||
PROMPT 30 20 "Consegn. anno"
|
||||
FLAGS "D"
|
||||
ITEM "Tipologia"
|
||||
ITEM "Colore"
|
||||
ITEM "Livello"
|
||||
ITEM "Pezzi per pacco"
|
||||
ITEM "Pezzi per sacco"
|
||||
ITEM "Pezzi per carrello"
|
||||
ITEM "Tipo parte"
|
||||
ITEM "Cod. lavaggio 1"
|
||||
ITEM "Cod. lavaggio 2"
|
||||
ITEM "Linea dest. 1"
|
||||
ITEM "Linea dest. 2"
|
||||
ITEM "Lavatrice"
|
||||
ITEM "Art.lavacont"
|
||||
ITEM "Mangano Dest."
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
@ -485,6 +389,27 @@ ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
TOOLBAR "" 0 0 0 2
|
||||
|
||||
BUTTON DLG_OK 2 2
|
||||
BEGIN
|
||||
PROMPT 1 1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_DELREC 2 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Elimina"
|
||||
MESSAGE EXIT,K_DEL
|
||||
PICTURE BMP_DELREC
|
||||
END
|
||||
|
||||
BUTTON DLG_CANCEL 2 2
|
||||
BEGIN
|
||||
PROMPT 4 1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "" -1 -1 80 20
|
||||
|
||||
GROUPBOX DLG_NULL 78 3
|
||||
@ -523,73 +448,73 @@ LISTBOX S_TIPOFORF 1 25
|
||||
BEGIN
|
||||
PROMPT 1 3 "Tipo Forfait "
|
||||
ITEM "0|Nessuno"
|
||||
MESSAGE HIDE,1@|DISABLE, S_IMPFISART|DISABLE,3@|DISABLE,S_MINCIC|ENABLE,2@
|
||||
MESSAGE DISABLE,1@|DISABLE, S_IMPFISART|DISABLE,3@|DISABLE,S_MINCIC|ENABLE,2@
|
||||
ITEM "1|A valore fisso"
|
||||
MESSAGE HIDE,1@|ENABLE,S_IMPFISART|DISABLE,3@|DISABLE,S_MINCIC|DISABLE,2@
|
||||
MESSAGE DISABLE,1@|ENABLE,S_IMPFISART|DISABLE,3@|DISABLE,S_MINCIC|DISABLE,2@
|
||||
ITEM "2|Nolo"
|
||||
MESSAGE SHOW,S_NOLCIC|HIDE,S_VCARTCLI|DISABLE,S_IMPFISART|DISABLE,3@|DISABLE,S_MINCIC|ENABLE,2@
|
||||
MESSAGE ENABLE,S_NOLCIC|DISABLE,S_VCARTCLI|DISABLE,S_IMPFISART|DISABLE,3@|DISABLE,S_MINCIC|ENABLE,2@
|
||||
ITEM "3|Ciclaggio"
|
||||
MESSAGE SHOW,S_NOLCIC|HIDE,S_VCARTCLI|DISABLE,S_IMPFISART|DISABLE,3@|ENABLE,S_MINCIC|ENABLE,2@
|
||||
MESSAGE ENABLE,S_NOLCIC|DISABLE,S_VCARTCLI|DISABLE,S_IMPFISART|DISABLE,3@|ENABLE,S_MINCIC|ENABLE,2@
|
||||
ITEM "4|% sul val. convenz."
|
||||
MESSAGE HIDE,S_NOLCIC|SHOW,S_VCARTCLI|DISABLE,S_IMPFISART|ENABLE,3@|DISABLE,S_MINCIC|DISABLE,2@
|
||||
MESSAGE DISABLE,S_NOLCIC|ENABLE,S_VCARTCLI|DISABLE,S_IMPFISART|ENABLE,3@|DISABLE,S_MINCIC|DISABLE,2@
|
||||
ITEM "5|Fisso su dot. iniziale"
|
||||
MESSAGE HIDE,1@|ENABLE,S_IMPFISART|DISABLE,3@|DISABLE,S_MINCIC|DISABLE,2@
|
||||
MESSAGE DISABLE,1@|ENABLE,S_IMPFISART|DISABLE,3@|DISABLE,S_MINCIC|DISABLE,2@
|
||||
FIELD TIPOFORF
|
||||
END
|
||||
|
||||
LISTBOX S_NOLCIC 1 20
|
||||
BEGIN
|
||||
PROMPT 46 3 "In base a "
|
||||
ITEM "N|Nessuno"
|
||||
ITEM "I|Dot. iniziale"
|
||||
ITEM "O|Dot. odierna"
|
||||
FLAGS "H"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
LISTBOX S_VCARTCLI 1 20
|
||||
BEGIN
|
||||
PROMPT 46 3 "Per "
|
||||
PROMPT 46 4 "Per "
|
||||
ITEM "N|Nessuno"
|
||||
ITEM "C|Cliente"
|
||||
ITEM "A|Articolo"
|
||||
FLAGS "H"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
CURRENCY S_PREZZOST 15
|
||||
BEGIN
|
||||
PROMPT 1 4 "Prezzo in vigore "
|
||||
PROMPT 1 5 "Prezzo in vigore "
|
||||
FIELD PREZZO
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
CURRENCY S_PREZZORN 15
|
||||
BEGIN
|
||||
PROMPT 43 4 "Prezzo di rinnovo "
|
||||
PROMPT 43 5 "Prezzo di rinnovo "
|
||||
FIELD PREZRIN
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
CURRENCY S_IMPFISART 15
|
||||
BEGIN
|
||||
PROMPT 1 5 "Importo fisso "
|
||||
PROMPT 1 6 "Importo fisso "
|
||||
FIELD IMPFISART
|
||||
END
|
||||
|
||||
NUMBER S_SCONTO 6 2
|
||||
BEGIN
|
||||
PROMPT 43 5 "Sconto % "
|
||||
PROMPT 43 6 "Sconto % "
|
||||
FIELD SCONTPERC
|
||||
END
|
||||
|
||||
NUMBER S_CONG 9
|
||||
BEGIN
|
||||
PROMPT 1 6 "Conguaglio "
|
||||
PROMPT 1 7 "Conguaglio "
|
||||
FIELD QTACONG
|
||||
END
|
||||
|
||||
CURRENCY S_VALCONV 15
|
||||
BEGIN
|
||||
PROMPT 43 6 "Val. convenzionale"
|
||||
PROMPT 43 7 "Val. convenzionale"
|
||||
FLAGS "U"
|
||||
FIELD VALCONV
|
||||
GROUP 3
|
||||
@ -597,21 +522,20 @@ END
|
||||
|
||||
NUMBER S_FORFPERCL 6 2
|
||||
BEGIN
|
||||
PROMPT 1 7 "% Forfait cliente "
|
||||
PROMPT 1 8 "% Forfait cliente "
|
||||
FIELD FORFPERCL
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
NUMBER S_MINCIC 4 2
|
||||
BEGIN
|
||||
PROMPT 43 7 "Minimo cilcaggio "
|
||||
PROMPT 43 8 "Minimo cilcaggio "
|
||||
FIELD MINCIC
|
||||
END
|
||||
|
||||
|
||||
STRING S_UM 2
|
||||
BEGIN
|
||||
PROMPT 1 8 "Unità di misura "
|
||||
PROMPT 1 9 "Unità di misura "
|
||||
USE LF_UMART KEY 2
|
||||
JOIN UMS INTO CODTAB=UM
|
||||
INPUT CODART S_CODART SELECT
|
||||
@ -625,7 +549,7 @@ END
|
||||
|
||||
STRING S_CAUSMAG 4
|
||||
BEGIN
|
||||
PROMPT 43 8 "Causale di default"
|
||||
PROMPT 43 9 "Causale di default"
|
||||
USE CAU
|
||||
INPUT CODTAB S_CAUSMAG
|
||||
DISPLAY "Codice" CODTAB
|
||||
@ -637,45 +561,45 @@ END
|
||||
|
||||
CURRENCY S_PREZDAN 15
|
||||
BEGIN
|
||||
PROMPT 1 9 "Prezzo danneggiati "
|
||||
PROMPT 1 10 "Prezzo danneggiati "
|
||||
FLAGS "U"
|
||||
FIELD PREZDAN
|
||||
END
|
||||
|
||||
CURRENCY S_PRZDTTMP 15
|
||||
BEGIN
|
||||
PROMPT 43 9 "Prezzo dot. temp. "
|
||||
PROMPT 43 10 "Prezzo dot. temp. "
|
||||
FLAGS "U"
|
||||
FIELD PRZDTTMP
|
||||
END
|
||||
|
||||
NUMBER S_DOTIN 9
|
||||
BEGIN
|
||||
PROMPT 1 10 "Dot. iniziale "
|
||||
PROMPT 1 11 "Dot. iniziale "
|
||||
FIELD DOTIN
|
||||
END
|
||||
|
||||
NUMBER S_DOTTMP 9
|
||||
BEGIN
|
||||
PROMPT 43 10 "Dot. temporanea "
|
||||
PROMPT 43 11 "Dot. temporanea "
|
||||
FIELD DOTTMP
|
||||
END
|
||||
|
||||
DATE S_INDTTMP
|
||||
BEGIN
|
||||
PROMPT 1 11 "Inizio dot. temporanea "
|
||||
PROMPT 1 12 "Inizio dot. temporanea "
|
||||
FIELD INDTTMP
|
||||
END
|
||||
|
||||
DATE S_FIDTTMP
|
||||
BEGIN
|
||||
PROMPT 43 11 "Fine dot. temp "
|
||||
PROMPT 43 12 "Fine dot. temp "
|
||||
FIELD FIDTTMP
|
||||
END
|
||||
|
||||
LISTBOX S_ARTBLOC 1 34
|
||||
BEGIN
|
||||
PROMPT 1 12 "Articolo bloccato "
|
||||
PROMPT 1 13 "Articolo bloccato "
|
||||
ITEM "0|Nessuna"
|
||||
ITEM "1|Articolo in sostituzione"
|
||||
ITEM "2|Cliente in chiusura"
|
||||
@ -685,7 +609,7 @@ END
|
||||
|
||||
LISTBOX S_CALCCONS 1 34
|
||||
BEGIN
|
||||
PROMPT 1 13 "Calcolo del consegnato "
|
||||
PROMPT 1 14 "Calcolo del consegnato "
|
||||
ITEM "0|Conguaglio alla confezione"
|
||||
ITEM "1|Uguale al ritirato"
|
||||
FIELD CALCCONS
|
||||
@ -693,48 +617,139 @@ END
|
||||
|
||||
LISTBOX S_TIPONOL 1 34
|
||||
BEGIN
|
||||
PROMPT 1 14 "Tipo Noleggio "
|
||||
PROMPT 1 15 "Tipo Noleggio "
|
||||
FIELD TIPONOL
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
BOOLEAN S_RITAUDTTMP
|
||||
BEGIN
|
||||
PROMPT 1 15 "Ritiro automatico dotazione temporanea"
|
||||
PROMPT 1 16 "Ritiro automatico dotazione temporanea"
|
||||
FIELD RITAUDTTMP
|
||||
END
|
||||
|
||||
BOOLEAN S_FATTKG
|
||||
BEGIN
|
||||
PROMPT 1 16 "Fatturazione a Kg."
|
||||
PROMPT 1 17 "Fatturazione a Kg."
|
||||
FIELD FATTKG
|
||||
END
|
||||
|
||||
BOOLEAN S_ARROT
|
||||
BEGIN
|
||||
PROMPT 1 17 "Arrotondamento"
|
||||
PROMPT 1 18 "Arrotondamento"
|
||||
FIELD ARROT
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
TOOLBAR "" 0 0 0 2
|
||||
PAGE "" -1 -1 80 20
|
||||
|
||||
BUTTON DLG_OK 2 2
|
||||
NUMBER S_DOTOD 9
|
||||
BEGIN
|
||||
PROMPT 1 1 ""
|
||||
PROMPT 2 5 "Dotaz. odierna "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
BUTTON DLG_DELREC 2 2
|
||||
STRING S_COLORE 20 10
|
||||
BEGIN
|
||||
PROMPT 2 1 "Elimina"
|
||||
MESSAGE EXIT,K_DEL
|
||||
PICTURE BMP_DELREC
|
||||
PROMPT 30 5 "Colore "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_GRMERC 3
|
||||
BEGIN
|
||||
PROMPT 55 5 "Tipologia "
|
||||
FLAG "UD"
|
||||
USE GMC KEY 1 SELECT CODTAB[4,5]==""
|
||||
INPUT CODTAB S_GRMERC
|
||||
DISPLAY "Codice" CODTAB[1,3]
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT S_GRMERC CODTAB[1,3]
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
BUTTON DLG_CANCEL 2 2
|
||||
NUMBER S_PPCONF 9
|
||||
BEGIN
|
||||
PROMPT 2 6 "Pz. per Pacco "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
NUMBER S_PPCOLLO 9
|
||||
BEGIN
|
||||
PROMPT 30 6 "Per Sacco "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
NUMBER S_PPPALLET 9
|
||||
BEGIN
|
||||
PROMPT 55 6 "Per Carrello "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_MANGDEST 3
|
||||
BEGIN
|
||||
PROMPT 4 1 ""
|
||||
PROMPT 2 7 "Mangano Dest. "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_ARTLAVCONT 4
|
||||
BEGIN
|
||||
PROMPT 30 7 "Art.Lav.cont."
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_LAVATRICE 4
|
||||
BEGIN
|
||||
PROMPT 55 7 "Lavatrice "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_CODLAV1 3
|
||||
BEGIN
|
||||
PROMPT 2 8 "Cod. Lavag. 1 "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_CODLAV2 3
|
||||
BEGIN
|
||||
PROMPT 30 8 "Cod. Lavag. 2"
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_TIPOPARTE 1
|
||||
BEGIN
|
||||
PROMPT 55 8 "Tipo Parte "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_LINDEST1 3
|
||||
BEGIN
|
||||
PROMPT 2 9 "Linea dest. 1 "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_LINDEST2 3
|
||||
BEGIN
|
||||
PROMPT 30 9 "Linea dest. 2"
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_LIVELLO 1
|
||||
BEGIN
|
||||
PROMPT 55 9 "Livello "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
NUMBER S_CONSMESE 9
|
||||
BEGIN
|
||||
PROMPT 2 10 "Consegnato mese"
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
NUMBER S_CONSANNO 9
|
||||
BEGIN
|
||||
PROMPT 30 10 "Consegn. anno"
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
@ -7,7 +7,10 @@ Item_01 = "Archivi e Tabelle di Base", [LVMENU_001]
|
||||
Item_02 = "Gestione Giri", [LVMENU_040]
|
||||
Item_03 = "Configurazione", [LVMENU_090]
|
||||
Item_04 = "Contratti", "lv0 -3", "F"
|
||||
Item_05 = "DDT", "ve0 -1 -filtI==2 -defnumbol|tipbol|lv", "F"
|
||||
Item_05 = "DDT", "ve0 -1 -filtI1=1 -defNUM_GEN|TIPODOC_GEN|lv", "F"
|
||||
Item_05 = "FAT", "ve0 -1 -filtI1=2 -defNUM_FAT|TIPODOC_FAT|lv", "F"
|
||||
Item_05 = "ORF", "ve0 -1 -filtI1=3 -defNUM_ORF|TIPODOC_ORF|lv", "F"
|
||||
Item_05 = "ORC", "ve0 -1 -filtI1=3 -defNUM_ORC|TIPODOC_ORC|lv", "F"
|
||||
|
||||
[LVMENU_001]
|
||||
Caption = "Archivi e Tabelle di Base"
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user