Index: APPS/Halux/Planning/Resource/impl/ConvertAll.cls.xml =================================================================== diff -u -r57301 -r57446 --- APPS/Halux/Planning/Resource/impl/ConvertAll.cls.xml (.../ConvertAll.cls.xml) (revision 57301) +++ APPS/Halux/Planning/Resource/impl/ConvertAll.cls.xml (.../ConvertAll.cls.xml) (revision 57446) @@ -27,7 +27,7 @@ D ##class(APPS.Halux.Planning.Resource.impl.ConvertAll).%New().Verwerk() D ##class(APPS.Halux.Planning.Resource.impl.ConvertAll).VerwijderAlles() 1 - @@ -73,7 +73,7 @@ Set TOENr=..ProductieOrderLijn.ToeleveringNr Set TLUNr=..ProductieOrderLijn.UniekLijnNr\100*100 Set ResourceID="" - &SQL(select top 1 ID into :ResourceID from APPS_Halux_Planning_Resource_impl.ResourceLijn where ToeleveringNr=:TOENr and UniekLijnNr=:TLUNr) + &SQL(select top 1 ID into :ResourceID from APPS_Halux_Planning_Resource_dto.ResourceLijn where ToeleveringNr=:TOENr and UniekLijnNr=:TLUNr) Quit $L(ResourceID) ]]> @@ -85,11 +85,11 @@ Set TLUNr=..ProductieOrderLijn.UniekLijnNr\100*100 Set ResourceID="" &sql(DECLARE DELRES CURSOR FOR - select ID into :ResourceID from APPS_Halux_Planning_Resource_impl.ResourceLijn where ToeleveringNr=:TOENr and UniekLijnNr=:TLUNr) + select ID into :ResourceID from APPS_Halux_Planning_Resource_dto.ResourceLijn where ToeleveringNr=:TOENr and UniekLijnNr=:TLUNr) &sql(OPEN DELRES) For &sql(FETCH DELRES) Quit:SQLCODE Do - . Do ##class(APPS.Halux.Planning.Resource.impl.ResourceLijn).%DeleteId(ResourceID) + . Do ##class(APPS.Halux.Planning.Resource.dto.ResourceLijn).%DeleteId(ResourceID) &sql(CLOSE DELRES) ]]>