| [613] | 1 | OCXDI00R ;SLC/RJS,CLA - OCX PACKAGE DIAGNOSTIC ROUTINES ;SEP 7,1999 at 10:29
|
|---|
| 2 | ;;3.0;ORDER ENTRY/RESULTS REPORTING;**32**;Dec 17,1997
|
|---|
| 3 | ;; ;;ORDER CHECK EXPERT version 1.01 released OCT 29,1998
|
|---|
| 4 | ;
|
|---|
| 5 | S ;
|
|---|
| 6 | ;
|
|---|
| 7 | D DOT^OCXDIAG
|
|---|
| 8 | ;
|
|---|
| 9 | ;
|
|---|
| 10 | K REMOTE,LOCAL,OPCODE,REF
|
|---|
| 11 | F LINE=1:1:500 S TEXT=$P($T(DATA+LINE),";",2,999) Q:TEXT I $L(TEXT) D Q:QUIT
|
|---|
| 12 | .S ^TMP("OCXDIAG",$J,$O(^TMP("OCXDIAG",$J,"A"),-1)+1)=TEXT
|
|---|
| 13 | ;
|
|---|
| 14 | G ^OCXDI00S
|
|---|
| 15 | ;
|
|---|
| 16 | Q
|
|---|
| 17 | ;
|
|---|
| 18 | DATA ;
|
|---|
| 19 | ;
|
|---|
| 20 | ;;RSUM^646.41^150.21^76418.481^150.21
|
|---|
| 21 | ;;RND^OCXRU2^APR 30,1999 at 15:07
|
|---|
| 22 | ;;RTN^OCXRU3^APR 30,1999 at 15:07
|
|---|
| 23 | ;;RSUM^150.21^324.31^25317.221^194.21^150.21^32797.311^150.21^150.21^63684.421^150.21^141098.701^227558.891^30509.321^150.21^9676.181^639222.1341^150.21^64901.441^82568.501^150.21^482.41^150.21^19533.241
|
|---|
| 24 | ;;RSUM^150.21^34434.311^150.21^9676.181^688709.1381^150.21^77911.531^210473.861^13919.231^52202.401^150.21^96215.581^50817.391^150.21^482.41^150.21^44766.361^150.21^10948.171^150.21^350912.1081^150.21^188279.741
|
|---|
| 25 | ;;RSUM^150.21^409710.1131^449939.1161^150.21^7737.151^217424.841^247076.871^6691.141^194.21^150.21^5498.131^310210.971^21116.251^194.21^150.21^4650.121^312667.981^52082.431^194.21^150.21^16756.221^62298.441
|
|---|
| 26 | ;;RSUM^42559.361^53585.411^150.21^33701.311^57533.391^11108.191^7863.151^30831.311^30899.311^29883.321^1992.71^70433.471^646.41^150.21^76418.481^150.21
|
|---|
| 27 | ;;RND^OCXRU3^APR 30,1999 at 15:07
|
|---|
| 28 | ;;RTN^OCXRU4^APR 30,1999 at 15:07
|
|---|
| 29 | ;;RSUM^150.21^324.31^18568.191^194.21^150.21^50059.381^150.21^40735.331^150.21^101437.601^17380.241^160879.731^23999.281^48598.401^2531.81^9323.171^732636.1451^144087.661^213222.801^150.21^2065.71^150.21
|
|---|
| 30 | ;;RSUM^47407.371^150.21^53696.381^150.21^101437.601^17380.241^160879.731^23999.281^9676.181^776560.1491^139741.651^100708.551^150.21^2065.71^150.21^44766.361^150.21^10948.171^150.21^350912.1081^150.21^188279.741
|
|---|
| 31 | ;;RSUM^150.21^409710.1131^449939.1161^150.21^7737.151^217424.841^247076.871^6691.141^194.21^150.21^5498.131^310210.971^21116.251^194.21^150.21^4650.121^312667.981^52082.431^194.21^150.21^16756.221^62298.441
|
|---|
| 32 | ;;RSUM^42559.361^53585.411^150.21^33701.311^57533.391^11108.191^7863.151^30831.311^30899.311^29883.321^1992.71^70433.471^646.41^150.21^76418.481^150.21
|
|---|
| 33 | ;;RND^OCXRU4^APR 30,1999 at 15:07
|
|---|
| 34 | ;;RTN^OCXRULE^APR 30,1999 at 15:07
|
|---|
| 35 | ;;RSUM^150.21^324.31^150.21^163935.691^150.21^1435.61^374594.1031^1798.81^678.51^113672.491^95861.491^285290.871^69790.461^120114.501^121003.611^139306.651^37500.341^345062.1041^6266.141^150.21^909.51^150.21
|
|---|
| 36 | ;;RSUM^36501.321^150.21^139987.671^132027.661^103136.571^153954.701^498.41^360455.1091^173584.771^91623.551^498.41^185781.741^38948.341^131294.611^16452.231^7772.151^63902.451^7210.151^9063.161^116854.571
|
|---|
| 37 | ;;RSUM^498.41^175297.721^150.21^14200.211^150.21^6544.141^12386.191^68380.471^94245.561^48732.381^150.21^127507.641^35697.291^279436.771^160943.651^150.21^194.21^150.21^40079.391^150.21^33701.311^57533.391
|
|---|
| 38 | ;;RSUM^11108.191^7863.151^30831.311^30899.311^29883.321^1992.71^70433.471^646.41^150.21
|
|---|
| 39 | ;;RND^OCXRULE^APR 30,1999 at 15:07
|
|---|
| 40 | ;;RTN^OCXSEND^8/04/98 13:21
|
|---|
| 41 | ;;RSUM^150.21^324.31^17096.221^35127.331^60996.421^19171.231^345012.1041^8688.171^8714.171^150.21^103594.471^150.21^284049.861^150.21^29566.311^678.51^140060.531^117764.521^301.31^1055361.1601^150.21^6512.131
|
|---|
| 42 | ;;RSUM^299200.821^206663.701^350568.891^468.41^150.21^1878.71^150.21^31879.281^150.21^59000.371^150.21^182102.651^150.21^175487.641^150.21^175577.641^150.21^175667.641^150.21^175757.641^150.21^175847.641
|
|---|
| 43 | ;;RSUM^150.21^48209.381^150.21^76370.441^150.21^194.21^150.21^24345.271^41556.331^9601.181^6555.141^25920.291^25984.291^17250.251^1992.71^70433.471^646.41^150.21^86079.541^150.21^3708.111^55911.421^39072.361
|
|---|
| 44 | ;;RSUM^2804.91^150.21^1243.61^150.21^97991.461^6457.131^2933.91^260482.821^150.21^79931.511^18807.251^39228.341^150.21^167467.741^18807.251^39228.341^150.21^197670.811^18807.251^39228.341^150.21^103208.551
|
|---|
| 45 | ;;RSUM^150.21^194.21^150.21^5099.131^150.21^636.41^25602.291^59094.461^150.21^212769.821^150.21
|
|---|
| 46 | ;;RND^OCXSEND^8/04/98 13:21
|
|---|
| 47 | ;;RTN^OCXSEND1^8/04/98 13:21
|
|---|
| 48 | ;;RSUM^150.21^324.31^150.21^9234.161^150.21^207074.811^150.21^194.21^150.21^9661.171^150.21^60480.411^208522.801^57460.431^517486.1231^189636.851^4720.121^97455.551^22341.271^135587.661^150.21^6542.151^255620.801
|
|---|
| 49 | ;;RSUM^91118.451^236339.891^8076.161^17042.241^159411.721^214823.901^112659.561^151719.741^5398.131^150.21^8815.181^38026.321^5500.131^125309.671^16000.231^18239.231^114036.631^38964.341^22454.281^112890.601
|
|---|
| 50 | ;;RSUM^71649.481^27947.291^43052.361^45521.371^150.21^108384.561^5629.141^38923.341^41298.351^150.21^486.41^150.21^1716.71^150.21^38152.361^97809.571^109360.591^31493.321^38683.351^36369.341^36322.341^32308.321
|
|---|
| 51 | ;1;
|
|---|
| 52 | ;
|
|---|
