Routine: PSUDEM7

Package	Total	Call Graph
Pharmacy Benefits Management	4	INST^PSUDEM1 PTF^PSUDEM5 EN^PSUDEM8 $$VAL^PSUTL
Uncategorized	1	$$GETICN^MPIF001
VA Fileman	1	C^%DTC

Package

Total

Call Graph

INST^PSUDEM1 PTF^PSUDEM5 EN^PSUDEM8 $$VAL^PSUTL

$$GETICN^MPIF001

C^%DTC

Name	Comments	DBIA/ICR reference
SSNICN	;Find patient Admission date, SSN and ICN for inpatient record
EN	;EN
XMD	;Format mailman message and send.
DAT	;Find discharge dates that fall within the extract date range
CONF	;Construct globals for confirmation message
REC	;If "^" is contained in any record, replace it with (')
NODATA	;Generate a 'No Data' message if there is no data in the extract

Name	Line Occurrences (* Changed, ! Killed)
^DGPT - [#45]	DAT+17, SSNICN+4
^DGPT("ADS"	DAT+5, DAT+14
^DPT - [#2]	SSNICN+8
^XTMP(	CONF+8, CONF+9
^XTMP("PSU_"	EN+3, EN+5!, EN+6!, DAT+12, DAT+15, DAT+18, DAT+20, DAT+21, SSNICN+9, SSNICN+12* , NODATA+5, XMD+3, XMD+4, XMD+11, XMD+14, XMD+16, XMD+18*, XMD+22

Name	Field # of Occurrence
>> I	XMD+15*, XMD+16, XMD+18
>> NONE	NODATA+2*, CONF+3
>> PSUAB	XMD+2, XMD+3, XMD+4
>> PSUDD	DAT+4, DAT+5, DAT+6, DAT+14
>> PSUDDT	DAT+6*, DAT+11, DAT+12, DAT+15
PSUDIVIS	CONF+4~, CONF+6*, CONF+8, CONF+9
PSUDT	DAT+16~, DAT+17*, DAT+18
>> PSUEDT	DAT+11
PSUICN	SSNICN+3~, SSNICN+10*, SSNICN+11, SSNICN+12
PSUICN1	SSNICN+3~
>> PSUIEN	DAT+13, DAT+14, DAT+15, DAT+17, DAT+18, DAT+20, DAT+21, SSNICN+4, SSNICN+9, SSNICN+12
>> PSUJOB	EN+3, EN+5, EN+6, DAT+12, DAT+15, DAT+18, DAT+20, DAT+21, SSNICN+9, SSNICN+12 , NODATA+5, XMD+3, XMD+4, XMD+11, XMD+14, XMD+16, XMD+18, XMD+22, CONF+7
PSULC	XMD+7~, XMD+11, XMD+13
>> PSUM	NODATA+4, NODATA+5, XMD+22, XMD+24*
PSUMAX	XMD+7~, XMD+8, XMD+9, XMD+13
PSUMC	XMD+7~, XMD+10, XMD+13, XMD+14, XMD+16, XMD+18, XMD+22, XMD+24, CONF+8
>> PSUMLC	XMD+10, XMD+12, XMD+13, XMD+14, XMD+16, XMD+17, XMD+18
>> PSUPL	XMD+2, XMD+4, XMD+5
PSUPT	SSNICN+3~, SSNICN+4*, SSNICN+7, SSNICN+8, SSNICN+10
PSUREC	SSNICN+6~, SSNICN+8, SSNICN+9, REC+2
>> PSUSDT	DAT+7
>> PSUSDT1	DAT+10*, DAT+11
>> PSUSIT	DAT+20, DAT+21
>> PSUSNDR	CONF+6
>> PSUSUB	CONF+7*, CONF+8, CONF+9
PSUTLC	XMD+7~, XMD+21, XMD+22, CONF+3*, CONF+9
PSUTMC	XMD+7~
>> PSUXMYH	NODATA+3*
>> PSUXMYS1	NODATA+3
U	DAT+15, DAT+17, DAT+18, DAT+20, DAT+21, SSNICN+4, SSNICN+8, SSNICN+9, SSNICN+12
>> X	DAT+10, XMD+11, XMD+14, XMD+15, XMD+16, XMD+18, XMD+22
>> X1	DAT+7*
>> X2	DAT+8*
>> Z	XMD+15*

Information