OCXDI00L ;SLC/RJS,CLA - OCX PACKAGE DIAGNOSTIC ROUTINES ;SEP 7,1999 at 10:29
;;3.0;ORDER ENTRY/RESULTS REPORTING;**32**;Dec 17,1997
;; ;;ORDER CHECK EXPERT version 1.01 released OCT 29,1998
;
S ;
;
D DOT^OCXDIAG
;
;
K REMOTE,LOCAL,OPCODE,REF
F LINE=1:1:500 S TEXT=$P($T(DATA+LINE),";",2,999) Q:TEXT I $L(TEXT) D Q:QUIT
.S ^TMP("OCXDIAG",$J,$O(^TMP("OCXDIAG",$J,"A"),-1)+1)=TEXT
;
G ^OCXDI00M
;
Q
;
DATA ;
;
;;RSUM^1755.71^150.21^18233.241^150.21^20607.281^5711.131^25460.291^15551.231^150.21^128567.651^135675.671^20314.261^150.21^259609.971^59758.441^159348.721^150.21^194.21^150.21^28308.321^150.21^13339.201
;;RSUM^117911.621^194.21^150.21^76418.481^150.21^342244.1081^150.21
;;RND^OCXRU0^APR 30,1999 at 15:07
;;RTN^OCXRU001^APR 30,1999 at 15:06
;;RSUM^150.21^324.31^150.21^8084.141^150.21^150.21^24215.261^190137.791^105365.591^150.21^5088.121^150.21^194.21^150.21^1224.61^150.21^66799.451^73144.471^84594.511^86047.511^90427.521^115587.581^94357.531
;;RSUM^46380.371^73914.471^60929.431^54821.411^68057.451^58383.421^57924.421^87768.511^67670.451^104419.551^83876.491^64250.441^119865.601^118249.591^76644.481^33101.311^33251.301^11265.211^16880.211^11282.211
;;RSUM^3277.91^7714.171^1261.61^7731.171^154489.621^7748.171^41247.291^7765.171^1261.61^2148.71^19018.231^11265.211^7507.141^11282.211^7507.141^7714.171^179756.681^25591.321^4330.101^22639.301^27048.231^25614.321
;;RSUM^2524.81^22662.301^3103.101^25637.321^7507.141^22685.301^31166.301^25660.321^29102.281^22708.301^2659.81^2148.71^10183.171^11265.211^2524.81^11282.211^2524.81^7714.171^179961.631^25476.321^7507.141
;;RSUM^22524.301^31166.301^25499.321^2524.81^22547.301^1363.61^25522.321^4330.101^22570.301^123587.511^2148.71^49514.371^11265.211^29102.281^11282.211^4061.101^7714.171^229401.721^7731.171^24249.221^25476.321
;;RSUM^7507.141^22524.301^7628.141^25499.321^4330.101^22547.301^62883.361^25522.321^10832.171^22570.301^658987.1251^2148.71^11608.181^11265.211^3229.91^11282.211^3229.91^7714.171^77461.411^25591.321^4330.101
;;RSUM^22639.301^3997.91^25614.321^7507.141^22662.301^31166.301^25637.321^2524.81^22685.301^1363.61^2148.71^15538.211^11265.211^5440.121^11282.211^5440.121^7714.171^377957.901^25545.321^4330.101^22593.301
;;RSUM^154845.581^25568.321^7507.141^22616.301^6228.131^2148.71^52219.381^11265.211^31105.291^11282.211^3340.91^7714.171^58782.341^9362.191^2157.81^25522.321^4330.101^22570.301^76954.391^25545.321^5440.121
;;RSUM^22593.301^8887.151^25568.321^7507.141^22616.301^16907.211^2148.71^24233.261^11265.211^10832.171^11282.211^3312.91^7714.171^251445.731^533.41^150.21
;;RND^OCXRU001^APR 30,1999 at 15:06
;;RTN^OCXRU002^APR 30,1999 at 15:06
;;RSUM^150.21^324.31^150.21^8084.141^150.21^150.21^24215.261^190137.791^105365.591^150.21^5100.121^150.21^194.21^150.21^1224.61^150.21^7731.171^8298.131^27030.331^4330.101^23984.311^46716.311^25637.321^7507.141
;;RSUM^22685.301^7628.141^25660.321^5440.121^22708.301^8859.151^2148.71^21596.241^11265.211^9041.151^11282.211^9041.151^7714.171^178883.601^25476.321^7507.141^22524.301^7628.141^25499.321^4330.101^22547.301
;;RSUM^34646.261^25522.321^10832.171^22570.301^190193.631^2148.71^35232.311^11265.211^18321.221^11282.211^6308.131^7714.171^199682.641^9362.191^168112.621^25545.321^4330.101^22593.301^16659.181^25568.321
;;RSUM^7507.141^22616.301^7628.141^2148.71^46170.361^11265.211^26577.271^2148.71^60248.411^11265.211^37199.321^2148.71^34856.311^11265.211^18179.221^2148.71^60071.411^11265.211^37247.321^11282.211^2602.81
;;RSUM^2148.71^37549.331^11265.211^20206.241^11282.211^6451.131^2148.71^57097.401^11265.211^34849.311^2148.71^35959.321^11265.211^18940.231^2148.71^50655.381^11265.211^30000.291^2148.71^35900.321^11265.211
;;RSUM^18863.231^11282.211^3949.101^7714.171^1261.61^7731.171^160584.571^7748.171^22116.221^7765.171^1261.61^2148.71^13771.191^11265.211^4330.101^11282.211^4330.101^7714.171^285630.811^25476.321^7507.141
;;RSUM^22524.301^7628.141^25499.321^4330.101^22547.301^72559.391^2148.71^32720.301^11265.211^16637.211^11282.211^3430.91^7714.171^185886.631^25476.321^7507.141^22524.301^4687.111^25499.321^10832.171^22547.301
;;RSUM^216406.681^25522.321^4330.101^22570.301^40626.281^2148.71^21945.241^11265.211^9201.151^11282.211^9201.151^7714.171^89272.521^9362.191^1417.61^25545.321^4330.101^22593.301^57006.331^25568.321^7507.141
;;RSUM^22616.301^7628.141^25591.321^31105.291^22639.301^1411.61^2148.71^20368.241^11265.211^8308.151^11282.211^6221.131^7714.171^316451.811^25522.321^4330.101^22570.301^25740.221^25545.321^7507.141^22593.301
;1;
;
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HOCXDI00L 4594 printed Oct 16, 2024@18:23:29 Page 2
OCXDI00L ;SLC/RJS,CLA - OCX PACKAGE DIAGNOSTIC ROUTINES ;SEP 7,1999 at 10:29
+1 ;;3.0;ORDER ENTRY/RESULTS REPORTING;**32**;Dec 17,1997
+2 ;; ;;ORDER CHECK EXPERT version 1.01 released OCT 29,1998
+3 ;
S ;
+1 ;
+2 DO DOT^OCXDIAG
+3 ;
+4 ;
+5 KILL REMOTE,LOCAL,OPCODE,REF
+6 FOR LINE=1:1:500
SET TEXT=$PIECE($TEXT(DATA+LINE),";",2,999)
if TEXT
QUIT
IF $LENGTH(TEXT)
Begin DoDot:1
+7 SET ^TMP("OCXDIAG",$JOB,$ORDER(^TMP("OCXDIAG",$JOB,"A"),-1)+1)=TEXT
End DoDot:1
if QUIT
QUIT
+8 ;
+9 GOTO ^OCXDI00M
+10 ;
+11 QUIT
+12 ;
DATA ;
+1 ;
+2 ;;RSUM^1755.71^150.21^18233.241^150.21^20607.281^5711.131^25460.291^15551.231^150.21^128567.651^135675.671^20314.261^150.21^259609.971^59758.441^159348.721^150.21^194.21^150.21^28308.321^150.21^13339.201
+3 ;;RSUM^117911.621^194.21^150.21^76418.481^150.21^342244.1081^150.21
+4 ;;RND^OCXRU0^APR 30,1999 at 15:07
+5 ;;RTN^OCXRU001^APR 30,1999 at 15:06
+6 ;;RSUM^150.21^324.31^150.21^8084.141^150.21^150.21^24215.261^190137.791^105365.591^150.21^5088.121^150.21^194.21^150.21^1224.61^150.21^66799.451^73144.471^84594.511^86047.511^90427.521^115587.581^94357.531
+7 ;;RSUM^46380.371^73914.471^60929.431^54821.411^68057.451^58383.421^57924.421^87768.511^67670.451^104419.551^83876.491^64250.441^119865.601^118249.591^76644.481^33101.311^33251.301^11265.211^16880.211^11282.211
+8 ;;RSUM^3277.91^7714.171^1261.61^7731.171^154489.621^7748.171^41247.291^7765.171^1261.61^2148.71^19018.231^11265.211^7507.141^11282.211^7507.141^7714.171^179756.681^25591.321^4330.101^22639.301^27048.231^25614.321
+9 ;;RSUM^2524.81^22662.301^3103.101^25637.321^7507.141^22685.301^31166.301^25660.321^29102.281^22708.301^2659.81^2148.71^10183.171^11265.211^2524.81^11282.211^2524.81^7714.171^179961.631^25476.321^7507.141
+10 ;;RSUM^22524.301^31166.301^25499.321^2524.81^22547.301^1363.61^25522.321^4330.101^22570.301^123587.511^2148.71^49514.371^11265.211^29102.281^11282.211^4061.101^7714.171^229401.721^7731.171^24249.221^25476.321
+11 ;;RSUM^7507.141^22524.301^7628.141^25499.321^4330.101^22547.301^62883.361^25522.321^10832.171^22570.301^658987.1251^2148.71^11608.181^11265.211^3229.91^11282.211^3229.91^7714.171^77461.411^25591.321^4330.101
+12 ;;RSUM^22639.301^3997.91^25614.321^7507.141^22662.301^31166.301^25637.321^2524.81^22685.301^1363.61^2148.71^15538.211^11265.211^5440.121^11282.211^5440.121^7714.171^377957.901^25545.321^4330.101^22593.301
+13 ;;RSUM^154845.581^25568.321^7507.141^22616.301^6228.131^2148.71^52219.381^11265.211^31105.291^11282.211^3340.91^7714.171^58782.341^9362.191^2157.81^25522.321^4330.101^22570.301^76954.391^25545.321^5440.121
+14 ;;RSUM^22593.301^8887.151^25568.321^7507.141^22616.301^16907.211^2148.71^24233.261^11265.211^10832.171^11282.211^3312.91^7714.171^251445.731^533.41^150.21
+15 ;;RND^OCXRU001^APR 30,1999 at 15:06
+16 ;;RTN^OCXRU002^APR 30,1999 at 15:06
+17 ;;RSUM^150.21^324.31^150.21^8084.141^150.21^150.21^24215.261^190137.791^105365.591^150.21^5100.121^150.21^194.21^150.21^1224.61^150.21^7731.171^8298.131^27030.331^4330.101^23984.311^46716.311^25637.321^7507.141
+18 ;;RSUM^22685.301^7628.141^25660.321^5440.121^22708.301^8859.151^2148.71^21596.241^11265.211^9041.151^11282.211^9041.151^7714.171^178883.601^25476.321^7507.141^22524.301^7628.141^25499.321^4330.101^22547.301
+19 ;;RSUM^34646.261^25522.321^10832.171^22570.301^190193.631^2148.71^35232.311^11265.211^18321.221^11282.211^6308.131^7714.171^199682.641^9362.191^168112.621^25545.321^4330.101^22593.301^16659.181^25568.321
+20 ;;RSUM^7507.141^22616.301^7628.141^2148.71^46170.361^11265.211^26577.271^2148.71^60248.411^11265.211^37199.321^2148.71^34856.311^11265.211^18179.221^2148.71^60071.411^11265.211^37247.321^11282.211^2602.81
+21 ;;RSUM^2148.71^37549.331^11265.211^20206.241^11282.211^6451.131^2148.71^57097.401^11265.211^34849.311^2148.71^35959.321^11265.211^18940.231^2148.71^50655.381^11265.211^30000.291^2148.71^35900.321^11265.211
+22 ;;RSUM^18863.231^11282.211^3949.101^7714.171^1261.61^7731.171^160584.571^7748.171^22116.221^7765.171^1261.61^2148.71^13771.191^11265.211^4330.101^11282.211^4330.101^7714.171^285630.811^25476.321^7507.141
+23 ;;RSUM^22524.301^7628.141^25499.321^4330.101^22547.301^72559.391^2148.71^32720.301^11265.211^16637.211^11282.211^3430.91^7714.171^185886.631^25476.321^7507.141^22524.301^4687.111^25499.321^10832.171^22547.301
+24 ;;RSUM^216406.681^25522.321^4330.101^22570.301^40626.281^2148.71^21945.241^11265.211^9201.151^11282.211^9201.151^7714.171^89272.521^9362.191^1417.61^25545.321^4330.101^22593.301^57006.331^25568.321^7507.141
+25 ;;RSUM^22616.301^7628.141^25591.321^31105.291^22639.301^1411.61^2148.71^20368.241^11265.211^8308.151^11282.211^6221.131^7714.171^316451.811^25522.321^4330.101^22570.301^25740.221^25545.321^7507.141^22593.301
+26 ;1;
+27 ;
