| [613] | 1 | OCXDI00E ;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 ^OCXDI00F
|
|---|
| 15 | ;
|
|---|
| 16 | Q
|
|---|
| 17 | ;
|
|---|
| 18 | DATA ;
|
|---|
| 19 | ;
|
|---|
| 20 | ;;RSUM^434.41^196617.771^434.41^235992.811^434.41^236462.831^599.51^150.21^194.21^150.21^5364.131^106867.621^150.21^5644.131^150.21^329182.961^150.21^7506.151^150.21^32294.291^150.21^15081.211^150.21^140782.671
|
|---|
| 21 | ;;RSUM^83304.521^33110.311^150.21^150.21^79542.481^150.21^3621.101^27666.311^59749.431^39855.351^38487.351^32907.321^12993.211^150.21^8685.161^150.21^64811.411^150.21^296591.1021^150.21^36008.311^150.21^128311.641
|
|---|
| 22 | ;;RSUM^157079.761^150.21^111375.561^8890.161^8410.151^150.21^262561.791^150.21^45813.361^150.21^276495.901^706863.1351^150.21^28387.291^150.21^23368.261^150.21^3988.101^268842.801^17585.241^17827.241^29323.291
|
|---|
| 23 | ;;RSUM^62130.411^150.21^1270.61^65839.471^14342.201^95448.541^194.21^1250.61^65867.471^14342.201^95471.541^194.21^1222.61^65895.471^14342.201^103438.561^194.21^150.21^150.21^280026.891^2872.91^150.21
|
|---|
| 24 | ;;RND^OCXODSP^10/29/98 12:37
|
|---|
| 25 | ;;RTN^OCXODSP1^10/29/98 12:37
|
|---|
| 26 | ;;RSUM^150.21^19591.241^150.21^35454.311^150.21^185727.791^150.21^66012.461^229271.861^243228.881^150.21^434.41^464189.1211^150.21^96521.571^8789.151^678.51^212406.811^42792.401^217888.831^50195.421^15938.211
|
|---|
| 27 | ;;RSUM^357880.1071^301.31^45862.401^117638.591^252272.871^150.21^96558.571^26964.291^678.51^214950.801^405234.1161^418359.1161^416187.1161^444190.1161^432951.1161^423833.1161^437808.1161^720508.1541^720608.1541
|
|---|
| 28 | ;;RSUM^118747.631^150.21^194.21^150.21^150.21^5325.131^150.21^26217.271^8858.181^53775.441^39528.371^426488.1201^294631.991^111555.611^82691.521^82217.481^150.21^7168.161^39528.371^426488.1201^118059.621
|
|---|
| 29 | ;;RSUM^77855.511^85860.531^12673.201^315858.961^150.21^194.21^150.21^34822.321^150.21^6397.131^150.21^15738.201^150.21^37072.341^44651.391^257989.921^153169.671^50768.391^194.21^150.21^79542.481^150.21^3621.101
|
|---|
| 30 | ;;RSUM^27666.311^59749.431^39855.351^38487.351^32907.321^12993.211^150.21^150.21^13339.201^150.21^122386.631^194.21^150.21
|
|---|
| 31 | ;;RND^OCXODSP1^10/29/98 12:37
|
|---|
| 32 | ;;RTN^OCXODSP2^10/29/98 12:37
|
|---|
| 33 | ;;RSUM^150.21^19591.241^150.21^49865.371^150.21^185787.791^150.21^66042.461^225312.851^243275.881^150.21^434.41^203257.791^216591.831^215276.811^150.21^96557.571^31481.291^74589.511^5755.131^278902.851^212152.751
|
|---|
| 34 | ;;RSUM^8172.161^131247.691^189274.801^8185.161^2680.91^131247.691^157634.751^170701.781^103586.501^196256.811^8198.161^6400.141^131247.691^157634.751^181040.781^103586.501^173091.791^181184.781^98888.491
|
|---|
| 35 | ;;RSUM^274833.941^301.31^263373.941^301.31^322217.1011^150.21^454988.1211^150.21^194.21^150.21^10054.171^150.21^8752.151^238532.871^87876.531^6976.151^19897.231^476716.1251^82271.531^150.21^34822.321^150.21
|
|---|
| 36 | ;;RSUM^6397.131^150.21^15738.201^150.21^37072.341^44651.391^257989.921^153169.671^50768.391^194.21^150.21^79542.481^150.21^3621.101^27666.311^59749.431^39855.351^38487.351^32907.321^12993.211^150.21^150.21
|
|---|
| 37 | ;;RSUM^13339.201^150.21^122386.631^194.21^150.21
|
|---|
| 38 | ;;RND^OCXODSP2^10/29/98 12:37
|
|---|
| 39 | ;;RTN^OCXODSP3^10/29/98 12:37
|
|---|
| 40 | ;;RSUM^150.21^33167.311^150.21^35454.311^150.21^282773.971^150.21^66072.461^225499.851^243322.881^150.21^434.41^184325.761^178550.741^150.21^564918.1351^150.21^536496.1171^150.21^204340.791^150.21^142258.661
|
|---|
| 41 | ;;RSUM^150.21^194.21^150.21^10054.171^150.21^8752.151^238532.871^87876.531^6976.151^19897.231^476716.1251^82271.531^150.21^34822.321^150.21^6397.131^150.21^15738.201^150.21^37072.341^44651.391^257989.921
|
|---|
| 42 | ;;RSUM^153169.671^50768.391^194.21^150.21^79542.481^150.21^3621.101^27666.311^59749.431^39855.351^38487.351^32907.321^12993.211^150.21^150.21^13339.201^150.21^122386.631^194.21^150.21^23081.261^150.21^3266.91
|
|---|
| 43 | ;;RSUM^350179.1031^194.21^150.21
|
|---|
| 44 | ;;RND^OCXODSP3^10/29/98 12:37
|
|---|
| 45 | ;;RTN^OCXODSP4^10/29/98 12:37
|
|---|
| 46 | ;;RSUM^150.21^38003.331^150.21^119197.571^150.21^343022.961^150.21^46299.391^394920.1041^14854.211^150.21^66126.461^220198.841^243410.881^150.21^434.41^195310.761^183949.761^219283.841^150.21^130070.661^123295.671
|
|---|
| 47 | ;;RSUM^280639.941^150.21^260387.941^123295.671^243092.901^298452.941^150.21^194.21^150.21^4881.121^150.21^11488.171^48919.401^148171.701^230711.871^273411.941^303065.991^4218.101^150.21^10054.171^150.21^8752.151
|
|---|
| 48 | ;;RSUM^238532.871^87876.531^6976.151^19897.231^476716.1251^82271.531^150.21^34822.321^150.21^6397.131^150.21^15738.201^150.21^37072.341^44651.391^257989.921^153169.671^50768.391^194.21^150.21^79542.481^150.21
|
|---|
| 49 | ;1;
|
|---|
| 50 | ;
|
|---|
