| 1 | OCXDI009 ;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 ^OCXDI00A
|
|---|
| 15 | ;
|
|---|
| 16 | Q
|
|---|
| 17 | ;
|
|---|
| 18 | DATA ;
|
|---|
| 19 | ;
|
|---|
| 20 | ;;RSUM^13788.221^8644.151^12048.211^63846.481^266286.901^150.21^102625.571^150.21^176832.771^49592.391^57829.431^1940.71^150.21^63445.461^150.21^182652.771^150.21^1919.81^102913.591^172114.771^14292.211^546.41
|
|---|
| 21 | ;;RSUM^150.21^4806.121^150.21^4873.111^16407.221^329524.1101^244918.931^92555.571^1486.61^150.21^5644.131^8637.151^39552.361^24563.271^54320.421^62102.451^131514.651^16720.211^5005.141^1866.71^23700.291^260783.781
|
|---|
| 22 | ;;RSUM^296149.841^68576.501^150.21^117528.661^77312.511^1993.71^150.21^5569.131^150.21^4873.111^197981.811^311500.1021^1486.61^150.21
|
|---|
| 23 | ;;RND^OCXOCMPC^10/29/98 12:37
|
|---|
| 24 | ;;RTN^OCXOCMPD^1/12/99 14:45
|
|---|
| 25 | ;;RSUM^150.21^1023.61^150.21^25129.271^150.21^196550.791^37643.341^386467.1121^166638.681^137275.641^101945.531^498.41^263206.921^20761.261^714809.1491^77218.501^16199.231^437159.1171^498.41^124611.651^24097.281
|
|---|
| 26 | ;;RSUM^386892.1121^477700.1211^43701.361^498.41^34886.341^143124.681^151530.701^498.41^834599.1571^91469.551^24119.281^498.41^32615.351^498.41^134824.681^279529.791^283115.801^192308.721^498.41^39951.371
|
|---|
| 27 | ;;RSUM^15016.201^56271.431^59193.441^741.51^25897.291^74957.491^17435.241^264125.811^127369.561^29591.311^90486.531^264125.811^226670.751^29591.311^90958.511^214572.821^354688.931^27721.301^50022.391^129240.631
|
|---|
| 28 | ;;RSUM^85622.531^168050.741^222271.861^197914.791^245774.901^741.51^16922.231^364423.1031^354688.931^28724.311^403398.1131^177206.761^156974.711^229741.871^233181.861^498.41^35109.331^498.41^404034.1061^498.41
|
|---|
| 29 | ;;RSUM^15199.231^37903.381^91102.511^1075116.1881^81529.491^58071.441^498.41^88115.501^71350.451^498.41^57646.401^498.41^154047.691^109596.601^4150.111^841409.1671^848681.1671^841005.1671^555604.1301^253637.931
|
|---|
| 30 | ;;RSUM^245429.881^150.21^4116.101^150.21
|
|---|
| 31 | ;;RND^OCXOCMPD^1/12/99 14:45
|
|---|
| 32 | ;;RTN^OCXOCMPE^10/29/98 12:37
|
|---|
| 33 | ;;RSUM^150.21^557.41^150.21^194.21^150.21^18944.241^150.21^4133.101^114237.581^366867.1041^199558.781^366959.1041^150.21^521985.1231^109596.571^199211.781^150.21^701322.1391^113496.581^209968.801^150.21^701298.1391
|
|---|
| 34 | ;;RSUM^113488.581^209834.801^150.21^30866.301^210951.831^208550.841^77863.501^54253.411^21882.261^3686.101^322995.1001^273806.941^31561.321^194.21^150.21^150.21^21215.251^55195.451^21220.241^388453.1111^20114.271
|
|---|
| 35 | ;;RSUM^84497.511^42630.381^3579.111^90928.521^47025.391^3523.111^327245.1031^7058.161^57706.431^150.21^20956.251^150.21^105629.541^150.21^105507.601^172047.741^150.21^278977.971^411603.1171^320997.1001^355075.1051
|
|---|
| 36 | ;;RSUM^17580.261^368290.1091^150.21^20393.251^273042.921^1108581.1871^13714.191^5166.131^150.21^354897.1091^259716.901^121427.641^360515.1021^375919.1081^60056.471^150.21^34858.331^150.21^57488.441^150.21
|
|---|
| 37 | ;;RSUM^3889.101^1922.81^150.21^18035.231^150.21^134789.641^88173.501^194.21
|
|---|
| 38 | ;;RND^OCXOCMPE^10/29/98 12:37
|
|---|
| 39 | ;;RTN^OCXOCMPF^10/29/98 12:37
|
|---|
| 40 | ;;RSUM^150.21^194.21^150.21^25144.281^12678.181^40274.371^14862.211^99014.591^8425.171^440082.1061^161906.701^359550.1011^203034.771^79410.531^194.21^150.21^5696.131^150.21^51210.371^358909.1071^368143.1081
|
|---|
| 41 | ;;RSUM^4420.121^117865.591^24788.261^494568.1271^168394.721^150.21^5981.141^150.21^12006.171^150.21^21215.251^55195.451^21220.241^388453.1111^20114.271^84497.511^42630.381^3579.111^90928.521^47025.391^3523.111
|
|---|
| 42 | ;;RSUM^327245.1031^4120.121^57706.431^150.21^5644.131^3970.101^150.21^50703.441^1866.71^23700.291^535579.1191^34172.321^68576.501^150.21^101018.611^14264.231^101118.611^14285.231^150.21^101675.621^150.21
|
|---|
| 43 | ;;RSUM^44012.391^22024.261^150.21^45813.401^13386.201^150.21^1486.61^150.21^1002212.1561^150.21^15084.211^150.21^20367.241^186890.761^149377.701^12644.181^219537.831^123242.621^119602.621^23449.251^7425.161
|
|---|
| 44 | ;;RSUM^149827.701^213429.851^80959.511^56830.421^23527.271^4395.111^150.21^3872.101^150.21
|
|---|
| 45 | ;;RND^OCXOCMPF^10/29/98 12:37
|
|---|
| 46 | ;;RTN^OCXOCMPG^1/12/99 14:45
|
|---|
| 47 | ;;RSUM^150.21^9881.171^150.21^11125.171^19137.251^5397.131^150.21^44142.371^36441.341^20757.261^102378.571^159999.721^169863.761^179814.761^136863.661^172669.771^79092.501^251324.901^80596.531^345369.1061
|
|---|
| 48 | ;;RSUM^410763.1121^10622.181^66659.481^41476.361^27796.311^402833.1091^215076.801^269597.931^75484.551^115261.581^108999.591^93789.591^106258.601^143603.691^678230.1461^372622.971^150.21^36115.341^20757.261
|
|---|
| 49 | ;1;
|
|---|
| 50 | ;
|
|---|
