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

Patch level : 10.0 no patch

Browse Source 
Files correlati     : lv3
Ricompilazione Demo : [ ]
Commento            :


git-svn-id: svn://10.65.10.50/branches/R_10_00@21081 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2010-10-27 10:32:37 +00:00
parent 3e14d5aa5c
commit cbb9055e06
1 changed files with 18 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lv/lv3300.cpp
View File

@ -997,12 +997,14 @@ bool TGestione_buoni_msk::pre_causale_handler(TMask_field& f, KEY k)
if (rdoc.get_date("ADATATMP").empty()) if (rdoc.get_date("ADATATMP").empty())
{ {
if (adata.ok() && adata >= datadoc) if (adata.ok()/* && adata >= datadoc*/)
{ {
rdoc.put("ADATATMP", adata); rdoc.put("ADATATMP", adata);
msk.field(FR_JOLLY4).set(adata); msk.field(FR_JOLLY4).set(adata);
} }
else else
{
if(adata < datadoc)
{ {
//instanzio in TRecordset sui giri //instanzio in TRecordset sui giri
TISAM_recordset giri("USE LVRCONSPLAN KEY 3\nSELECT DTCONS>#DATADOC\nFROM CODCF=#CODCF CODCONT=#CODCONT\nTO CODCF=#CODCF CODCONT=#CODCONT"); TISAM_recordset giri("USE LVRCONSPLAN KEY 3\nSELECT DTCONS>#DATADOC\nFROM CODCF=#CODCF CODCONT=#CODCONT\nTO CODCF=#CODCF CODCONT=#CODCONT");
@ -1023,6 +1025,7 @@ bool TGestione_buoni_msk::pre_causale_handler(TMask_field& f, KEY k)
} }
} }
} }
}
//abilito o disabilito azzerandolo il campo "Ritirato" a seconda di cosa prevede la causale //abilito o disabilito azzerandolo il campo "Ritirato" a seconda di cosa prevede la causale
if (cau.is_ritiro()) if (cau.is_ritiro())