Index: csp/foptask.cls.xml =================================================================== diff -u -r1074 -r2588 --- csp/foptask.cls.xml (.../foptask.cls.xml) (revision 1074) +++ csp/foptask.cls.xml (.../foptask.cls.xml) (revision 2588) @@ -3,10 +3,10 @@ CSP page for viewing a FOP Queue Item/Task -User -%VHMacro,BL.Sys.FOP.Common +vhLib.Macro,BL.Sys.FOP.Common cache %CSP.Page +0 1 @@ -29,7 +29,6 @@ . Set tmpGlob=sGlob Set tmpGlob=$$$Replace(tmpGlob,sGlob_"XXX"_"(",sGlob_"(") Quit tmpGlob - ]]> @@ -47,7 +46,6 @@ Set arGlobRef(Key,"glob")=$P(tmpGlob,"(",1) Set arGlobRef(Key,"globshow")=($L(ObjID)) Quit - ]]> @@ -61,7 +59,6 @@ Set QItem=##class(BL.Sys.FOP.Scheduler).OpenQItem(QItemID) Set sc=##class(BL.Sys.FOP.Scheduler).MoveToArchive(.QItem,1) Quit "QueueItem "_QItemID_$S($$$ISERR(sc):$$$CRLF_" not moved to Archive! "_$$$CRLF_"Error :"_$$ParseStatus^vhLib(sc), 1:" successfully moved to Archive (ArchID="_$S($IsObject(QItem):QItem.%Id(),1:"")_".") - ]]> @@ -957,7 +954,6 @@ Set lbAvoidSQL=$LB("CREATE TABLE","ALTER TABLE","DROP TABLE","CREATE QUERY","DROP QUERY","INSERT","UPDATE","DELETE") Set CspPageTitle="FOP Queue"_$S($G(ShowTask):" - "_TaskOmsTitle, 1:"") Quit 1 - ]]> @@ -970,7 +966,6 @@ @@ -985,7 +980,6 @@ Set sc=##class(BL.Sys.FOP.Scheduler).RepostTaskFromQueue(QItemID,,.NewID,"",blnRunAsBatch) Set msg="Repost Task: New ID="_$G(NewID)_$S($$$ISERR(sc):$$$CRLF_"Error :"_$$ParseStatus^vhLib(sc), 1:"")_$S(blnRunAsBatch:$$$CRLF_"Run Task as Batch.", 1:"") Quit msg - ]]>