source: FOIAVistA/trunk/r/ORDER_ENTRY_RESULTS_REPORTING-OR-OCX--ORRC--ORRJ/OCXDI00P.m@ 1757

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

initial load of FOIAVistA 6/30/08 version

File size: 4.4 KB
Line 
1OCXDI00P ;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 ^OCXDI00Q
15 ;
16 Q
17 ;
18DATA ;
19 ;
20 ;;RSUM^11222.211^32012.301^2148.71^54864.391^11205.211^33105.301^11222.211^19637.231^2148.71^12929.201^42663.361^14607.201^11194.211^4884.111^9276.191^3292.91^11239.211^7628.141^88849.551^19637.231^88900.551
21 ;;RSUM^33105.301^83735.531^20903.231^113778.621^32012.301^113836.621^30755.291^108006.601^20297.231^2148.71^25954.271^11194.211^12109.181^11239.211^7628.141^88849.551^19637.231^88900.551^33105.301^83735.531
22 ;;RSUM^29464.271^2148.71^20446.241^11194.211^8392.151^11239.211^7628.141^88849.551^19637.231^88900.551^33105.301^83735.531^24939.251^2148.71^22384.251^11194.211^9610.161^11239.211^5796.121^78614.521^15217.201
23 ;;RSUM^78662.521^15217.201^73782.501^9792.161^113778.621^32012.301^113836.621^26266.271^108006.601^28455.271^2148.71^34835.311^11194.211^18218.221^9276.191^8349.151^11239.211^7628.141^78614.521^15217.201
24 ;;RSUM^78662.521^15217.201^73782.501^33332.301^2148.71^38095.341^11194.211^20911.251^9276.191^7931.151^11239.211^5675.121^78614.521^15217.201^78662.521^15217.201^73782.501^42325.331^2148.71^12912.201^37223.331
25 ;;RSUM^74241.461^11183.211^48456.371^11200.211^19637.231^25177.321^1363.61^22225.301^8392.151^22251.301^10806.171^22277.301^4873.111^25200.321^1369.61^22248.301^4884.111^22274.301^533.41^150.21
26 ;;RND^OCXRU009^APR 30,1999 at 15:07
27 ;;RTN^OCXRU00A^APR 30,1999 at 15:07
28 ;;RSUM^150.21^324.31^150.21^8084.141^150.21^150.21^24215.261^190137.791^105365.591^150.21^150.21^150.21^194.21^150.21^1224.61^150.21^10115.161^22300.301^2130.71^25223.321^1375.61^22271.301^12109.181^22297.301
29 ;;RSUM^6872.131^22323.301^7831.141^25246.321^1381.61^22294.301^20911.251^22320.301^10955.171^2148.71^85914.491^11183.211^57897.401^11200.211^19637.231^25177.321^1363.61^22225.301^8392.151^22251.301^10806.171
30 ;;RSUM^22277.301^4873.111^25200.321^1369.61^22248.301^4884.111^22274.301^10115.161^22300.301^2130.71^25223.321^1375.61^22271.301^12109.181^22297.301^6872.131^22323.301^7831.141^25246.321^1381.61^22294.301
31 ;;RSUM^20911.251^22320.301^11840.181^2148.71^12895.201^30370.301^19609.231^11172.211^7831.141^25146.321^6362.131^25174.321^18456.221^22194.301^48456.371^25169.321^9851.161^25197.321^18456.221^22217.301^57897.401
32 ;;RSUM^25167.321^1363.61^22215.301^6362.131^22241.301^34841.301^22345.301^121270.541^25190.321^1369.61^22238.301^9851.161^22264.301^34841.301^22368.301^485346.1051^2148.71^12878.201^533.41^150.21
33 ;;RND^OCXRU00A^APR 30,1999 at 15:07
34 ;;RTN^OCXRU00B^APR 30,1999 at 15:30
35 ;;RSUM^150.21^324.31^150.21^8084.141^150.21^150.21^24215.261^190137.791^105365.591^150.21^5292.121^150.21^194.21^150.21^1224.61^150.21^25246.321^1381.61^22294.301^35740.321^22320.301^7464.141^22346.301^2109.81
36 ;;RSUM^25269.321^1387.61^22317.301^29626.301^22343.301^10955.171^2148.71^36255.341^11183.211^19272.251^11200.211^19637.231^25177.321^1363.61^22225.301^35740.321^22251.301^10827.171^22277.301^3184.101^25200.321
37 ;;RSUM^1369.61^22248.301^29626.301^22274.301^10955.171^2148.71^48988.371^11183.211^28603.281^11200.211^19637.231^25177.321^1363.61^22225.301^8392.151^22251.301^10806.171^22277.301^4873.111^25200.321^1369.61
38 ;;RSUM^22248.301^4884.111^22274.301^10115.161^22300.301^2130.71^25269.321^1387.61^22317.301^11940.181^22343.301^10955.171^2148.71^58678.421^11183.211^36340.331^11200.211^19637.231^25292.321^1393.61^22340.301
39 ;;RSUM^29626.301^22366.301^11840.181^2148.71^58946.421^11183.211^36518.331^11200.211^19637.231^25246.321^1381.61^22294.301^29774.301^22320.301^11840.181^2148.71^34322.331^11183.211^17843.241^11200.211^19637.231
40 ;;RSUM^25246.321^1381.61^22294.301^35888.321^22320.301^7464.141^22346.301^2081.81^25269.321^1387.61^22317.301^29774.301^22343.301^10955.171^2148.71^49739.421^11183.211^29597.331^11200.211^19637.231^25246.321
41 ;;RSUM^1381.61^22294.301^35888.321^22320.301^10827.171^22346.301^3230.101^25269.321^1387.61^22317.301^35888.321^22343.301^7464.141^22369.301^2121.81^25292.321^1393.61^22340.301^29774.301^22366.301^10955.171
42 ;;RSUM^2148.71^36557.341^11183.211^19466.251^11200.211^19637.231^25177.321^1363.61^22225.301^35888.321^22251.301^10827.171^22277.301^3196.101^25200.321^1369.61^22248.301^29774.301^22274.301^10955.171^2148.71
43 ;1;
44 ;
Note: See TracBrowser for help on using the repository browser.