source: FOIAVistA/trunk/r/CLINICAL_REMINDERS-PXRM/PXRMXHLP.m@ 1397

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

initial load of FOIAVistA 6/30/08 version

File size: 4.6 KB
Line 
1PXRMXHLP ; SLC/PJH - Reminder Reports Help Routine;12/30/2002
2 ;;2.0;CLINICAL REMINDERS;;Feb 04, 2005
3 ;
4HELP(CALL) ;General help text routine
5 N HTEXT
6 N DIWF,DIWL,DIWR,IC
7 S DIWF="C70",DIWL=0,DIWR=70
8 ;
9 I CALL=0 D
10 .S HTEXT(1)="Individual Patient: Run a report against an individual patients."
11 .S HTEXT(2)="Reminder Patient List: Run a report against a store patient list."
12 .S HTEXT(3)="Location: Run a report for a single location or multiple locations."
13 .S HTEXT(4)="OE/RR Team: Run a report against a OE/RR team"
14 .S HTEXT(5)="PCMM Provider: Run a report for patient assigned to a PCMMprovider."
15 .S HTEXT(6)="PCMM Team: Run a report against a PCMM Team."
16 I CALL=1 D
17 .S HTEXT(1)="Summary reports total the number of reminders applicable "
18 .S HTEXT(2)="and due for the above patient samples."
19 .S HTEXT(3)="Detailed reports list patients with reminders due in "
20 .S HTEXT(4)="name order or by appointment date."
21 I CALL=2 D
22 .S HTEXT(1)="DETAILED reports list in alpha order patients in the"
23 .S HTEXT(2)="selected patient sample with reminders due."
24 .S HTEXT(3)="SUMMARY reports give totals of reminders due for the"
25 .S HTEXT(4)="selected patient sample."
26 I CALL=3 D
27 .S HTEXT(1)="PREVIOUS will report on patients who visited the selected"
28 .S HTEXT(2)="locations in the date range specified"
29 .S HTEXT(3)="FUTURE will report on patients who have appointments at"
30 .S HTEXT(4)="selected locations in the date range specified."
31 I CALL=4 D
32 .S HTEXT(1)="PRIMARY CARE ONLY excludes patients who are not assigned"
33 .S HTEXT(2)="to the PCMM team as primary care. ALL displays all patients"
34 .S HTEXT(3)="assigned to the provider in PCMM."
35 I CALL=5 D
36 .S HTEXT(1)="Selecting Y will display all future appointments for"
37 .S HTEXT(2)="patients with reminders due. Selecting N will display"
38 .S HTEXT(3)="for patients with due reminders only the next appointment"
39 .I PXRMSEL="L" D
40 ..S HTEXT(4)="AT THE SELECTED LOCATION"
41 I CALL=6 D
42 .S HTEXT(1)="Selecting Y will display patients with reminders in"
43 .S HTEXT(2)="appointment date order. Selecting N will display patients"
44 .S HTEXT(3)="with reminders in patient name order."
45 I CALL=7 D
46 .S HTEXT(1)="ADMISSIONS will report on inpatients admitted in the"
47 .S HTEXT(2)="selected locations in the date range specified. "
48 .S HTEXT(3)="CURRENT INPATIENTS will report on inpatients currently at"
49 .S HTEXT(4)="selected locations."
50 I CALL=8 D
51 .S HTEXT(1)="Reports for ALL OUTPATIENT LOCATIONS, ALL INPATIENT LOCATIONS and ALL "
52 .S HTEXT(2)="CLINIC STOPS produce a combined list of reminders due for"
53 .S HTEXT(3)="for all locations in each facility selected."
54 .S HTEXT(4)=""
55 .S HTEXT(5)="Reports for SELECTED HOSPITAL LOCATIONS, SELECTED CLINIC STOPS and"
56 .S HTEXT(6)="SELECTED CLINIC GROUPS list reminders due by location for "
57 .S HTEXT(7)="each location selected."
58 I CALL=9 D
59 .I LIT="Facilities" D
60 ..S HTEXT(1)="Selecting Y will display one report for all facilities combining"
61 ..S HTEXT(2)="locations/teams with the same name. Selecting N will create a"
62 ..S HTEXT(3)="separate report for each facility."
63 .I LIT'="Facilities" D
64 ..S HTEXT(1)="Selecting Y will display one report for all "_LIT_" selected."
65 ..S HTEXT(2)="Selecting N will create a separate report for each "_LIT_"."
66 I CALL=10 D
67 .S HTEXT(1)="This option is only available if more than one location, team or provider is selected."
68 .S HTEXT(2)="Selecting I prints only the individual reports. Selecting R prints"
69 .S HTEXT(3)="the individual report plus overall totals for all locations, teams or providers."
70 .S HTEXT(4)="Selecting T prints only the overall totals for all locations, teams or providers."
71 I CALL=11 D
72 .S HTEXT(1)="Selecting Y will display patients with reminders in ward/bed"
73 .S HTEXT(2)="order. Selecting N will display patients with reminders in"
74 .S HTEXT(3)="patient name order."
75 I CALL=12 D
76 .S HTEXT(1)="Selecting Y will display the full patient SSN. Selecting N"
77 .S HTEXT(2)=" will display only the last 4 digits of the patient SSN."
78 I CALL=13 D
79 .S HTEXT(1)="Selecting Y will display the report as fields separated by"
80 .S HTEXT(2)="a selected delimiter character. Headings are suppressed. This"
81 .S HTEXT(3)="format of report is intended for import into PC spreadsheet (e.g. MS Excl)."
82 .S HTEXT(4)="Selecting N will display the normal report with headings"
83 I CALL=14 D
84 .S HTEXT(1)="Select the character to be output as a delimiter in the report."
85 I CALL=15 D
86 .S HTEXT(1)="Selecting Y will display the clinic name for the appointment date/time"
87 K ^UTILITY($J,"W")
88 S IC=""
89 F S IC=$O(HTEXT(IC)) Q:IC="" D
90 . S X=HTEXT(IC)
91 . D ^DIWP
92 W !
93 S IC=0
94 F S IC=$O(^UTILITY($J,"W",0,IC)) Q:IC="" D
95 . W !,^UTILITY($J,"W",0,IC,0)
96 K ^UTILITY($J,"W")
97 W !
98 Q
Note: See TracBrowser for help on using the repository browser.