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

Patch level :4.0 528

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :la ricerca delle commesse va fatta sul file LF_COMMESSE, non sulla tabella CMS


git-svn-id: svn://10.65.10.50/trunk@14932 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2007-02-19 15:10:03 +00:00
parent fb5350232e
commit 9a4c28e1cd
2 changed files with 18 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
ce/ce4200.cpp
View File

@ -7,6 +7,7 @@
#include "celib.h" #include "celib.h"
#include "../ve/velib.h" #include "../ve/velib.h"
#include "../ca/commesse.h"
#include "ce4200a.h" #include "ce4200a.h"
#include "ce4200.h" #include "ce4200.h"
@ -121,21 +122,21 @@ real TCalc_cesp_cms::calc_perc_util_cesp(const TRectype& salcecms_rec, const TDa
//prende il codice commessa del record.. //prende il codice commessa del record..
TString80 codcms = salcecms_rec.get(SALCECMS_CODCMS); TString80 codcms = salcecms_rec.get(SALCECMS_CODCMS);
//..ed accede cosi' alla tabella delle commesse //..ed accede cosi' alla tabella delle commesse
const TRectype& cms = cache().get("CMS", codcms); const TRectype& cms = cache().get(LF_COMMESSE, codcms);
//prende le date di inizio e fine commessa dalla tabella per poterle confrontare con le date limite //prende le date di inizio e fine commessa dalla tabella per poterle confrontare con le date limite
//del cespite nell'esercizio //del cespite nell'esercizio
TDate dtfine = dtfineces; TDate dtfine = dtfineces;
//se esiste una data di proroga (D2) -> la data fine commessa e' la data proroga,altrimenti e' //se esiste una data di proroga (DATAPROR) -> la data fine commessa e' la data proroga,altrimenti e'
//la normale data fine commessa (D1) //la normale data fine commessa (DATAFINE)
TDate dtfinecms = cms.get_date("D2"); TDate dtfinecms = cms.get_date(COMMESSE_DATAPROR);
if (!dtfinecms.ok()) if (!dtfinecms.ok())
dtfinecms = cms.get_date("D1"); dtfinecms = cms.get_date(COMMESSE_DATAFINE);
if (dtfinecms.ok() && (dtfinecms < dtfineces)) if (dtfinecms.ok() && (dtfinecms < dtfineces))
dtfine = dtfinecms; dtfine = dtfinecms;
TDate dtini = dtinices; TDate dtini = dtinices;
const TDate dtinicms = cms.get_date("D0"); const TDate dtinicms = cms.get_date(COMMESSE_DATAINIZIO);
if ((dtinicms.ok()) && (dtinicms > dtinices)) if ((dtinicms.ok()) && (dtinicms > dtinices))
dtini = dtinicms; dtini = dtinicms;
//intervallo giorni di utilizzo cespite nella commessa //intervallo giorni di utilizzo cespite nella commessa
@ -167,7 +168,7 @@ TRiga_documento& TCalc_cesp_cms::cerca_riga(TDocumento& doc_cesp, const TString&
TRiga_documento& rigadoc = doc_cesp.new_row(tiporiga); TRiga_documento& rigadoc = doc_cesp.new_row(tiporiga);
rigadoc.put(RDOC_CODCMS, codcms); rigadoc.put(RDOC_CODCMS, codcms);
if (groupcms) //se raggruppa per cms tanto vale mettere la descrizione della commessa if (groupcms) //se raggruppa per cms tanto vale mettere la descrizione della commessa
rigadoc.put(RDOC_DESCR, cache().get("CMS", codcms, "S0")); rigadoc.put(RDOC_DESCR, cache().get(LF_COMMESSE, codcms, COMMESSE_DESCRIZ));
else //se non raggruppa puo' usare anche il codice cespite, che scrive in codart else //se non raggruppa puo' usare anche il codice cespite, che scrive in codart
{ {
rigadoc.put(RDOC_CODART, idcesp); rigadoc.put(RDOC_CODART, idcesp);

20
ce/ce4200a.uml
View File

@ -241,12 +241,12 @@ BEGIN
PROMPT 1 17 "Codice Commessa " PROMPT 1 17 "Codice Commessa "
FLAGS "DUZ" FLAGS "DUZ"
KEY 1 KEY 1
USE CMS USE LF_COMMESSE
INPUT CODTAB F_CMSGEN INPUT CODCMS F_CMSGEN
DISPLAY "Codice@20" CODTAB DISPLAY "Codice@20" CODCMS
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" DESCRIZ
OUTPUT F_CMSGEN CODTAB OUTPUT F_CMSGEN CODCMS
OUTPUT F_DESCMSGEN S0 OUTPUT F_DESCMSGEN DESCRIZ
CHECKTYPE NORMAL CHECKTYPE NORMAL
END END
@ -255,10 +255,10 @@ BEGIN
PROMPT 1 18 "Descrizione " PROMPT 1 18 "Descrizione "
FLAGS "D" FLAGS "D"
KEY 2 KEY 2
USE CMS KEY 2 USE LF_COMMESSE KEY 2
INPUT S0 F_DESCMSGEN INPUT DESCRIZ F_DESCMSGEN
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" DESCRIZ
DISPLAY "Codice@20" CODTAB DISPLAY "Codice@20" CODCMS
COPY OUTPUT F_CMSGEN COPY OUTPUT F_CMSGEN
CHECKTYPE NORMAL CHECKTYPE NORMAL
END END