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)
]]>