Index: APPS/Halux/Planning/Resource/impl/GebruikLogger.cls.xml =================================================================== diff -u -r57446 -r62511 --- APPS/Halux/Planning/Resource/impl/GebruikLogger.cls.xml (.../GebruikLogger.cls.xml) (revision 57446) +++ APPS/Halux/Planning/Resource/impl/GebruikLogger.cls.xml (.../GebruikLogger.cls.xml) (revision 62511) @@ -10,13 +10,17 @@ Set ToeleveringNr=ResourceLijn.ToeleveringNr Set UniekLijnNr=ResourceLijn.UniekLijnNr Set Product=ResourceLijn.ProductGetObjectId() + Set Resource=ResourceLijn.Resource + Set Activiteit=ResourceLijn.Activiteit Set ID="" &SQL( Select ID into :ID from APPS_Halux_Planning_Resource_dto.ResourceGebruikLogging where ToeleveringNr=:ToeleveringNr and UniekLijnNr=:UniekLijnNr and Product=:Product + and Resource=:Resource + and Activiteit=:Activiteit ) If ID="" { @@ -33,6 +37,8 @@ Set GebruikLogging.CreatieTijdstip = ResourceLijn.CreatieTijdstip Set GebruikLogging.TijdPerStuk = ResourceLijn.TijdPerStuk Set GebruikLogging.TijdIsDefaulted = ResourceLijn.TijdIsDefaulted + Set GebruikLogging.LeverenAan = ResourceLijn.LeverenAan + Do GebruikLogging.Save() } ]]>