source: FOIAVistA/trunk/r/ORDER_ENTRY_RESULTS_REPORTING-OR-OCX--ORRC--ORRJ/OCXDI007.m@ 1608

Last change on this file since 1608 was 628, checked in by George Lilly, 15 years ago

initial load of FOIAVistA 6/30/08 version

File size: 4.5 KB
Line 
1OCXDI007 ;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 ;
5S ;
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 ^OCXDI008
15 ;
16 Q
17 ;
18DATA ;
19 ;
20 ;;RSUM^266418.911^8163.171^150.21^17847.241^22604.261^552387.1281^150.21^249632.891^13945.191^38842.331^579137.1361^32615.351^48094.371^5327.131^105884.601^172366.741^86164.551^710928.1441^59391.431^114970.591
21 ;;RSUM^93848.531^184396.741^115993.611^22843.251^150.21^21705.241^150.21^17754.261^89351.541^17754.261^57980.471^54694.431^222769.861^465424.1211^238659.891^57707.461^193128.811^150.21^17754.261^20212.251
22 ;;RSUM^479068.1231^150.21^4116.101^150.21^14986.211^150.21^2323.81^363269.1101^2851.91^150.21^25538.271^150.21^8878.151^56434.421^128259.631^78775.491^180282.731^150.21^194.21^150.21^25900.291^150.21^76901.511
23 ;;RSUM^150.21^77553.521^150.21^31795.321^150.21^2371.81^1243.61^19363.261^27501.311^30290.321^19082.251^21181.261^29264.321^27209.311^29389.321^27723.311^734.51^27801.321^25834.311^21110.281^53668.421^32152.321
24 ;;RSUM^38632.361^13371.221^114851.651^137606.691^241584.911^374728.1131^150.21^35732.381^152070.721^150.21^9536.171^676540.1511^385376.1101^150.21^378912.1161^150.21^108747.641^10225.201^40039.361^1486.71
25 ;;RSUM^4855.121^150.21
26 ;;RND^OCXOCMP4^2/02/99 13:17
27 ;;RTN^OCXOCMP5^2/02/99 13:39
28 ;;RSUM^150.21^1023.61^150.21^8409.161^35051.321^150.21^146735.701^30722.341^179618.771^99272.571^58297.411^189034.751^112724.601^150.21^98101.581^319379.1021^200134.821^87622.531^32615.351^150.21^27621.291
29 ;;RSUM^158220.721^32615.351^88457.501^130046.611^48470.361^63570.471^63741.471^152373.721^119573.631^16443.221^192066.791^229208.861^204527.801^132795.651^46834.391^17234.221^54289.411^11738.191^221862.871
30 ;;RSUM^248068.901^133013.661^2182.91^169419.721^75875.491^96403.551^121859.611^87314.521^214568.811^97839.561^34982.321^16455.221^83130.521^26067.301^44307.381^48369.391^40635.361^54767.421^150.21^4116.101
31 ;;RSUM^150.21
32 ;;RND^OCXOCMP5^2/02/99 13:39
33 ;;RTN^OCXOCMP6^3/25/99 15:18
34 ;;RSUM^150.21^1023.61^150.21^8409.161^45203.351^150.21^5330.121^150.21^299497.811^258514.901^150.21^14387.221^94200.561^103154.611^150.21^24981.291^150.21^135552.561^10934.181^4614.121^157616.711^204895.751
35 ;;RSUM^30722.341^56324.421^73034.481^56806.401^73572.491^118233.581^5888.131^17429.231^149599.691^206971.801^47573.361^304159.981^54978.401^122168.621^51640.391^31059.311^40060.341^498.41^65029.441^22062.281
36 ;;RSUM^211107.821^98829.561^5696.121^15986.221^145390.681^201916.791^45120.351^298034.971^52364.391^118299.611^49060.381^29071.301^150.21^104538.511^204152.811^30722.341^42830.351^14594.211^72228.481^160676.711
37 ;;RSUM^7212.141^49641.381^498.41^54298.401^29046.291^32707.351^88369.561^266153.921^65175.471^741.51^38963.381^5549.131^146469.741^115790.651^111280.601^741.51^208957.781^741.51^29202.291^498.41^134109.641
38 ;;RSUM^18395.231^301.31^39826.361^54332.411^150.21^5134.121^204964.681^264932.911^150.21^107678.531^162624.701^10696.191^60255.471^115985.611^150.21^96449.501^78973.521^157650.711^30722.341^20102.241^180687.761
39 ;;RSUM^150.21^4116.101^150.21^6650.141^150.21^38634.331^175775.701^12195.211^12226.211^9611.191^147352.831^294410.831^278999.831^286348.831^147396.831^10507.201^5281.131^128600.561^126672.561^11695.211^245814.851
40 ;;RSUM^231470.841^818396.1551^276495.921^259329.941^12213.211^11668.211^150.21^734.51^12109.211^11682.211^150.21^56112.411^194.21^150.21^2543.91^1876.71^78889.461^61089.461^150.21^87214.551^150.21^281926.1001
41 ;;RSUM^150.21
42 ;;RND^OCXOCMP6^3/25/99 15:18
43 ;;RTN^OCXOCMP7^10/29/98 12:37
44 ;;RSUM^150.21^150.21^14926.211^150.21^93986.501^80896.501^263777.931^150.21^156089.701^20314.251^29017.311^20958.261^23052.271^301.31^273113.971^301.31^297673.971^301.31^376184.1091^369888.1081^301.31^369419.1081
45 ;;RSUM^363180.1071^150.21^228492.821^150.21^194.21^150.21^24867.271^150.21^8524.151^46080.381^242059.871^4384.131^92328.551^387814.1121^4384.131^194.21^150.21^2522.91^126508.641^194.21^150.21^8608.161^150.21
46 ;;RSUM^3703.101^458694.1191^2045.71^150.21
47 ;;RND^OCXOCMP7^10/29/98 12:37
48 ;;RTN^OCXOCMP8^10/29/98 12:37
49 ;;RSUM^150.21^194.21^4801.121^150.21^29216.301^5270.121^149317.691^9347.171^66753.431^24067.261^194.21^150.21^27808.291^150.21^37287.321^74690.511^8598.181^25934.311^17276.241^25934.311^16414.231^150.21^445676.1241
50 ;1;
51 ;
Note: See TracBrowser for help on using the repository browser.