Index: Sys/FOP/QueueItem.cls.xml
===================================================================
diff -u -r66131 -r66528
--- Sys/FOP/QueueItem.cls.xml (.../QueueItem.cls.xml) (revision 66131)
+++ Sys/FOP/QueueItem.cls.xml (.../QueueItem.cls.xml) (revision 66528)
@@ -69,7 +69,7 @@
SELECT ID, SingleLockKey INTO :NextID, :SingleLockKey FROM Sys_FOP.TaskQueue WHERE Status='W' ORDER BY Priority DESC, ID)
&SQL(OPEN crsNextQItem)
For &SQL(FETCH crsNextQItem) Quit:(SQLCODE) Do:($L(SingleLockKey)) Quit:($L(NextID))
- . d WL^vhDBG("NextID?")
+ . ;d WL^vhDBG("NextID?")
. Set:(..IsSingleLocked(SingleLockKey)) NextID=""
; // To debug : uncomment this block instead of previous block.
@@ -80,7 +80,7 @@
;. Set:(..IsSingleLocked(SingleLockKey)) NextID=""
;. d WL^vhDBG(" --> "_$S(NextID="":" Is Locked", 1:NextID_" retained"))
- d WL^vhDBG("NextID:"_$G(NextID)_" SQLCODE="_SQLCODE) ; _" Status:"_$G(Status))
+ ;d WL^vhDBG("NextID:"_$G(NextID)_" SQLCODE="_SQLCODE) ; _" Status:"_$G(Status))
&SQL(CLOSE crsNextQItem)
Quit $G(NextID)
]]>
Index: Sys/FOP/emDocMulti.cls.xml
===================================================================
diff -u -r29059 -r66528
--- Sys/FOP/emDocMulti.cls.xml (.../emDocMulti.cls.xml) (revision 29059)
+++ Sys/FOP/emDocMulti.cls.xml (.../emDocMulti.cls.xml) (revision 66528)
@@ -355,7 +355,7 @@
Task:Sys.FOP.Task,SeqItem:Sys.FOP.emSeqItem,blnUpdatePageCount:%Boolean
%Status
@@ -386,7 +386,7 @@
Task:Sys.FOP.Task
%Status
@@ -407,7 +407,7 @@
Quit:('$IsObject(pxVoorblad)) $$$ERROR($$$GeneralError,"No pxVoorblad supplied in DocMulti (proxy voorblad)")
Do pxVoorblad.FillPageCountFromPPOD(..PPODGroupName)
;d WL^vhDBG("SetVoorbladPageCount propt PageCnt="_pxVoorblad.PageCnt) if pxVoorblad.PageCnt="" s pxVoorblad.PageCnt="999"
- d WL^vhDBG("SetVoorbladPageCount propt PageCnt="_pxVoorblad.PageCnt)
+ ;d WL^vhDBG("SetVoorbladPageCount propt PageCnt="_pxVoorblad.PageCnt)
Set:(pxVoorblad.PageCnt>0) Doc.XSLParameters=Doc.XSLParameters_$LB("pPageCount="_pxVoorblad.PageCnt)