[613] | 1 | OCXDI001 ;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 ^OCXDI002
|
---|
| 15 | ;
|
---|
| 16 | Q
|
---|
| 17 | ;
|
---|
| 18 | DATA ;
|
---|
| 19 | ;
|
---|
| 20 | ;;RSTRT
|
---|
| 21 | ;;RTN^OCXBDT^8/04/98 13:21
|
---|
| 22 | ;;RSUM^150.21^324.31^17096.221^35127.331^58062.411^338615.1031^8688.171^8714.171^150.21^57808.351^150.21^29759.271^150.21^56000.361^150.21^174533.641^150.21^168593.631^150.21^168681.631^150.21^168769.631
|
---|
| 23 | ;;RSUM^150.21^168857.631^150.21^168945.631^150.21^169033.631^150.21^45534.371^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
|
---|
| 24 | ;;RSUM^150.21^86079.541^150.21
|
---|
| 25 | ;;RND^OCXBDT^8/04/98 13:21
|
---|
| 26 | ;;RTN^OCXBDT1^8/04/98 13:21
|
---|
| 27 | ;;RSUM^150.21^324.31^150.21^150.21^6833.131^19171.231^99135.581^150.21^105886.581^150.21^188848.781^150.21^92443.571^150.21^194.21^150.21^46651.401^150.21^7062.151^150.21^70243.441^150.21^59244.371^140487.571
|
---|
| 28 | ;;RSUM^44114.381^150.21^27158.311^212422.791^92855.551^150.21^91686.541^29303.291^94971.541^290568.951^56308.421^150.21^202162.801^211388.791^150.21^10106.191^150.21^200150.771^150.21^8516.161^150.21^82320.501
|
---|
| 29 | ;;RSUM^150.21^2531.91^150.21^203644.731^7969.161^18693.201^150.21
|
---|
| 30 | ;;RND^OCXBDT1^8/04/98 13:21
|
---|
| 31 | ;;RTN^OCXBDT2^8/04/98 13:21
|
---|
| 32 | ;;RSUM^150.21^324.31^150.21^150.21^17017.221^150.21^65540.461^199809.801^65120.461^198249.801^150.21^87109.591^12120.201^85758.541^229963.871^65765.471^70984.481^10252.171^212306.881^251531.851^66015.461
|
---|
| 33 | ;;RSUM^9442.181^106286.581^274260.971^107382.621^66697.451^41617.361^85456.511^150.21^194.21^150.21^39303.381^150.21^18233.241^150.21^20607.281^5711.131^25460.291^15551.231^150.21^101871.581^131336.661^20314.261
|
---|
| 34 | ;;RSUM^150.21^259609.971^59758.441^159348.721^150.21^194.21^150.21^28308.321^150.21^13339.201^11821.191^90522.541^150.21^44834.391^52529.431^77856.511^695142.1541^7539.141^77828.481^69542.451^75662.481^91402.541
|
---|
| 35 | ;;RSUM^77454.501^73034.521^27198.261^31198.321^22973.271^21702.271^98723.581^48489.391^498.41^390828.1161^349919.1111^498.41^541090.1341^350433.1111^498.41^150.21^194.21^13270.201^150.21^3932.101^73507.471
|
---|
| 36 | ;;RSUM^60715.431^18147.261^29321.321^28074.311^26392.301^26426.301^10962.201^24466.291^24490.291^24513.291^24367.291^24531.291^23094.281^23385.281^26184.301^24411.291^24435.291^24483.291^482.41^150.21
|
---|
| 37 | ;;RND^OCXBDT2^8/04/98 13:21
|
---|
| 38 | ;;RTN^OCXBDT3^8/04/98 13:21
|
---|
| 39 | ;;RSUM^150.21^1023.61^150.21^38997.321^112066.631^251782.891^80453.501^198839.781^68339.461^286250.941^153084.691^150.21^4033.101^150.21^10987.181^150.21^16017.211^10424.171^51194.431^46107.401^45483.401
|
---|
| 40 | ;;RSUM^43332.391^62635.461^11347.181^1182.61^9347.171^34644.301^7171.141^112066.631^1439.61^150.21^1467.71^3446.101^66277.451^56688.451^646.41^150.21^8671.161^150.21^33268.301^5255.121^12678.201^35262.331
|
---|
| 41 | ;;RSUM^146271.681^150.21^361982.1091^150.21^24786.281^150.21^194.21^150.21^212769.821^150.21^100028.591^150.21^2605.91^110935.621^40274.391^642.41^150.21^1336.61^151058.641^6319.121^6330.121^750.51^1173.61
|
---|
| 42 | ;;RSUM^750.51^10902.171^750.51^750.51^29813.291^204549.821^114493.621^750.51^5499.111^750.51^860.51^750.51^2670.91^533.41^150.21
|
---|
| 43 | ;;RND^OCXBDT3^8/04/98 13:21
|
---|
| 44 | ;;RTN^OCXBDT4^8/04/98 13:21
|
---|
| 45 | ;;RSUM^150.21^1023.61^150.21^26864.271^55149.391^429260.1171^150.21^24786.281^150.21^98106.571^200703.791^150.21^1439.61^150.21^1336.61^180645.701^6319.121^6330.121^750.51^1173.61^750.51^860.51^750.51^6657.141
|
---|
| 46 | ;;RSUM^750.51^10902.171^750.51^128020.601^750.51^38865.361^351159.1071^5234.131^750.51^233093.771^750.51^225901.861^166909.721^140662.661^122968.641^750.51^12198.211^750.51^89133.471^750.51^1388.71^750.51
|
---|
| 47 | ;;RSUM^19519.241^750.51^10227.171^750.51^26114.271^750.51^53047.451^41281.371^750.51^101579.541^750.51^38845.371^4004.131^750.51^74134.491^10503.201^184705.751^27435.301^54509.411^750.51^2298.91^750.51^12086.191
|
---|
| 48 | ;;RSUM^750.51^92175.531^750.51^4085.111^750.51^65232.411^144088.651^8984.161^17908.241^363590.1071^860.51^750.51^26785.281^750.51^12638.211^43958.351^153498.721^112491.571^341428.1081^12068.181^325417.971
|
---|
| 49 | ;;RSUM^100996.571^157867.731^54186.401^3796.101^750.51^34593.321^750.51^57917.411^35084.321^213320.801^619508.1321^418943.1121^378837.1071^6498.151^16212.221^152992.691^336207.1061^750.51^2781.91^750.51^24827.271
|
---|
| 50 | ;;RSUM^750.51^180987.801^1912.81^750.51^14718.211^64014.471^60074.431^195967.831^474778.1251^373535.1101^7276.161^117520.641^3300.101^750.51^23174.271^750.51^25263.311^8378.161^30803.321^19769.261^750.51
|
---|
| 51 | ;1;
|
---|
| 52 | ;
|
---|