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

15
ce/ce4200.cpp

@ -7,6 +7,7 @@
#include "celib.h"
#include "../ve/velib.h"
#include "../ca/commesse.h"
#include "ce4200a.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..
TString80 codcms = salcecms_rec.get(SALCECMS_CODCMS);
//..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
//del cespite nell'esercizio
TDate dtfine = dtfineces;
//se esiste una data di proroga (D2) -> la data fine commessa e' la data proroga,altrimenti e'
//la normale data fine commessa (D1)
TDate dtfinecms = cms.get_date("D2");
//se esiste una data di proroga (DATAPROR) -> la data fine commessa e' la data proroga,altrimenti e'
//la normale data fine commessa (DATAFINE)
TDate dtfinecms = cms.get_date(COMMESSE_DATAPROR);
if (!dtfinecms.ok())
dtfinecms = cms.get_date("D1");
dtfinecms = cms.get_date(COMMESSE_DATAFINE);
if (dtfinecms.ok() && (dtfinecms < dtfineces))
dtfine = dtfinecms;
TDate dtini = dtinices;
const TDate dtinicms = cms.get_date("D0");
const TDate dtinicms = cms.get_date(COMMESSE_DATAINIZIO);
if ((dtinicms.ok()) && (dtinicms > dtinices))
dtini = dtinicms;
//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);
rigadoc.put(RDOC_CODCMS, codcms);
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
{
rigadoc.put(RDOC_CODART, idcesp);

20
ce/ce4200a.uml

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