Index: WV.mac.rou
===================================================================
diff -u -r29059 -r41194
--- WV.mac.rou	(.../WV.mac.rou)	(revision 29059)
+++ WV.mac.rou	(.../WV.mac.rou)	(revision 41194)
@@ -21,51 +21,7 @@
 #include %occInclude
  
  
- /*   * /
-TestRQ
-	Set:('$D(%ClientIP)) %ClientIP="192.168.1.97"
-	New fopReq,sc
-	Set:('$G(%blFOPDocBase)) %blFOPDocBase=$System.OBJ.New("BL.FOP.DocBase.TestWS")
-	Set fopReq=%blFOPDocBase.NewFopRequest()
-	Set fopReq.data = ""
-	Set fopReq.dataRef = ""   ; "c:\Program Files\Assentis\DocBase\Data\resources\processes\TestDocBase\TestDocBase_vh2.xml"
-	Set fopReq.perfTrace = 0  ; "false"
-	Set fopReq.process = "RenderAndDistributeVH"
-	Set fopReq.stage = "DEV"
-	;Set fopReq.taskProps = ""
-	Set fopReq.traceLevel = 6
-	d %blFOPDocBase.AddToTaskPropt(fopReq.taskProps,"Test","TestVal")
-	Set:(fopReq.data="") fopReq.data=" "
-	Set:(fopReq.dataRef="") fopReq.dataRef=" "
-	d $System.OBJ.Dump(fopReq)
-	d WL^vhDBG("Dump fopReq "_fopReq_$$$CRLF_$$ObjToText^vhLib(fopReq))
-	Set sc=fopReq.%Save()
-	If $$$ISERR(sc) Do
-	. w "SaveResult: "_$$ParseStatus^vhLib(sc)
-	Else  Do
-	. w "Save OK",!
-	Quit
  
-OpenRQ(ReqID)
-	Set:('$D(%ClientIP)) %ClientIP="192.168.1.97"
-#define WSRequestInfo   WS.FOP.WSRequestInfo
-	New fopReq,sc
-	Set fopReq=##class($$$WSRequestInfo).%OpenId($G(ReqID,18))
-	d WL^vhDBG("Dump fopReq "_fopReq_$$$CRLF_$$ObjToText^vhLib(fopReq))
-	New aval,val
-	Set aval=fopReq.taskProps
-	d WL^vhDBG(aval_"  CountTaskProps:"_aval.Count())  ; _$C(13,10)_$$ObjToText^vhLib(aval))
-	set val=aval.GetNext("")
-	d WL^vhDBG(val)
-	Set sc=""
-	If $$$ISERR(sc) Do
-	. w "SaveResult: "_$$ParseStatus^vhLib(sc)
-	Else  Do
-	. w "Save OK",!
-	Quit
- /*   */
- 
- 
 StartDebug()
 	New k,x,y
 	w "Attach Studio to process "_$J_" and press <ENTER> to continue ... "