Routine: PXRMGECO

Information

PXRMGECO ;SLC/JVS GEC-Prompts Cont'd ;6/19/03 20:56

Source Information

Source file <PXRMGECO.m>

Call Graph

Call Graph Total: 9

Package	Total	Call Graph
Clinical Reminders	4	SUM^PXRMGECN (BDT,CATIO,EDT,FOR,PAT)^PXRMGECP LOC^PXRMGECR (CTD,CTDR,CTL,CTP)^PXRMGECS
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD
VA Fileman	2	^DIC ^DIR

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Clinical Reminders	1	PXRMGECP

Entry Points

External References

Name	Field # of Occurrence
^%ZIS	SUMIO+2, LOCIO+2, CTIO+2
HOME^%ZIS	SUMIO+11, LOCIO+11
^%ZISC	SUMIO+12, LOCIO+12, CTIO+33
^%ZTLOAD	SUMIO+8, LOCIO+8, CTIO+10, CTIO+17, CTIO+24, CTIO+31
^DIC	LOCDIC+5
^DIR	SUMIO+13, RSSC+7, LOCDIR+7, LOCIO+13, SOR+5, CTIO+34
SUM^PXRMGECN	SUMIO+10
BDT^PXRMGECP	SUMBDT, RSBDT, LOCBDT, CTBDT
CATIO^PXRMGECP	RSIOO
EDT^PXRMGECP	SUMEDT, RSEDT, LOCEDT, CTEDT
FOR^PXRMGECP	SUMFOR, RSFOR, LOCFOR, CTFOR
PAT^PXRMGECP	SUMPAT, RSPAT
LOC^PXRMGECR	LOCIO+10
CTD^PXRMGECS	CTIO+32
CTDR^PXRMGECS	CTIO+18
CTL^PXRMGECS	CTIO+25
CTP^PXRMGECS	CTIO+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: RS+4
Function Call: WRITE	Prompt: "GEC Referral Service Categories" Line Location: RS+5
Function Call: WRITE	Prompt: ! Line Location: RSSC+1
Function Call: WRITE	Prompt: @IOF Line Location: LOCDIR+3
Routine Call	%ZIS Line Location: SUMIO+11 LOCIO+11
Routine Call	DIC Line Location: LOCDIC+5
Routine Call	DIR Line Location: SUMIO+13 RSSC+7 LOCDIR+7 LOCIO+13 SOR+5 CTIO+34
Routine Call	%ZIS Line Location: SUMIO+2 LOCIO+2 CTIO+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^SC - [#44]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTTHF - [#9999999.64]	RS+9, RS+11
^AUTTHF("D"	RS+7, RS+8
^DISV(	RSSC+5, RSSC+11, LOCDIR+5, LOCDIR+11, SOR+3, SOR+8*

Label References

Name	Line Occurrences
CTBDT	CTEDT
CTEDT	CTFOR
CTIO	CTIOO
CTSOR	CTBDT
LOCBDT	LOCEDT
LOCDIC	LOCDIR+13
LOCEDT	LOCFOR
LOCIO	LOCIOO
RSBDT	RSEDT
RSEDT	RSPAT
RSPAT	RSFOR
SOR	CTSOR
SUMBDT	SUMEDT
SUMEDT	SUMPAT
SUMIO	SUMIOO
SUMPAT	SUMFOR

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	SUMIO+1~, SUMIO+2, LOCIO+1~, LOCIO+2, CTIO+1~, CTIO+2*
BDT	RS+2~, LOCDIR+2~
CAT	RS+2~, RS+14*, RS+16
CATARY	RS+2~
CATARY(	RS+12*, RS+13, RS+14
CATDA	RS+2~, RSSC+20!
CATDA(	RS+16*, RSSC+16, RSSC+17!, RSSC+18, RSSC+19
CATIEN	RS+2~
CATIEN(	RSSC+19*
CATMEY	RSSC+20!
CATMEY(	RSSC+15*, RSSC+17
CATNA	RS+2~, RS+11, RS+12, RS+13, RS+14, RS+17, RS+18
CNT	RS+2~, RS+6, RS+15, RS+16, RS+17, RS+18, RSSC+6
DETAIL	PXRMGECO+5~
DIC	LOCDIC+2~, LOCDIC+3*, LOCDIC+7!
DIC(0	LOCDIC+4*, LOCDIC+7!
DIR	LOCDIR+4!
DIR("A"	RSSC+2, RSSC+3, RSSC+4, RSSC+8!, LOCDIR+8!, SOR+2, SOR+6!
DIR("B"	RSSC+5, RSSC+8!, LOCDIR+5, LOCDIR+8!, SOR+3*, SOR+6!
DIR(0	SUMIO+13!, RSSC+6, RSSC+8!, LOCDIR+6, LOCDIR+8!, LOCIO+13!, SOR+4, SOR+6!, CTIO+34!
DIROUT	PXRMGECO+4~, SUMBDT, SUMEDT, SUMPAT, SUMFOR, SUMIOO, SUMIO+13, RSSC+9, RSBDT, RSEDT , RSPAT, RSFOR, RSIOO, LOCDIR+10, LOCBDT, LOCEDT, LOCFOR, LOCIOO, LOCIO+13, CTSOR , CTBDT, CTEDT, CTFOR, CTIOO, SOR+7, CTIO+34
DIRUT	PXRMGECO+4~, SUMBDT, SUMEDT!, SUMPAT!, SUMFOR!, SUMIO+13, RSSC+10, RSBDT, RSEDT!, RSPAT! , RSFOR!, LOCDIR+9, LOCBDT, LOCEDT!, LOCFOR!, LOCIO+13, CTSOR, CTBDT!, CTEDT!, CTFOR! , SOR+7, CTIO+34
DUOUT	PXRMGECO+4~, SUMIO+13, LOCDIR+9, LOCIO+13, CTIO+34
DUZ	RSSC+5, RSSC+11, LOCDIR+5, LOCDIR+11, SOR+3, SOR+8
EDT	RS+2~, LOCDIR+2~
FORMAT	PXRMGECO+5~
IEN	RS+3~, RS+8*, RS+9, RS+11, RS+12
IME	RSSC+12~, RSSC+14*
IO("Q"	SUMIO+4, LOCIO+4, CTIO+6, CTIO+13, CTIO+20, CTIO+27
IOF	RS+4, LOCDIR+3
LEN	RSSC+12~, RSSC+13*, RSSC+14
LOCNP	PXRMGECO+4~, LOCDIC+6, LOCDIR+12
MENU	PXRMGECO+4~
MEY	RSSC+12~, RSSC+14*, RSSC+15
NUM	RS+2~, RSSC+18*, RSSC+19
POP	PXRMGECO+4~, SUMIO+3, LOCIO+3, CTIO+3
PROV	PXRMGECO+4~
RPT7	RS+3~, RSIOO*
SOR	CT+3~, SOR+9*, CTIO+5, CTIO+12, CTIO+19, CTIO+26
STAY	RS+2~, RSSC+16*, RSSC+17
SYN	RS+3~, RS+7*, RS+8
>> X	RSSC+11, LOCDIR+11, SOR+8
Y	PXRMGECO+4~, SUMIO+13!, RSSC+13, RSSC+14, LOCDIC+2~, LOCDIC+6, LOCDIC+7!, LOCDIR+12, LOCDIR+13, LOCIO+13! , SOR+9, CTIO+34!
Y(0	LOCDIC+6
>> ZTDESC	SUMIO+6, LOCIO+6, CTIO+8, CTIO+15, CTIO+22, CTIO+29
>> ZTRTN	SUMIO+5, LOCIO+5, CTIO+7, CTIO+14, CTIO+21, CTIO+28
>> ZTSAVE("*"	SUMIO+7, LOCIO+7, CTIO+9, CTIO+16, CTIO+23, CTIO+30

Name	Comments	DBIA/ICR reference
LOC	;By Location in the Hospital
CTEDT
SUMEDT
SUM	;#8 Start of Summary (Scoring) report
CTIO	;=====Select IO device
CTBDT
RSPAT
RS	;#7 Start List and array of GEC Categories
LOCDIC	;====Select Location
SUMPAT
RSSC	;=====Select Referred Service Categories
CTIOO
LOCFOR
RSEDT
LOCBDT
RSFOR
LOCDIR	; #5 Start of Location Report
RSBDT
SUMFOR
CTSOR
CT	; #6 Start Referral Count Totals ; makes 4 different reports
SUMIOO
CTFOR
LOCIO	;=====Select IO device
SOR	;======Sort Type
LOCIOO
LOCEDT
SUMIO	;=====Select IO device
RSIOO
SUMBDT

Customize PDF page

Package: Clinical Reminders

Routine: PXRMGECO

Call Graph Total: 9

Caller Graph Total: 1