Routine: APSPCO1

Package

Total

Call Graph

^DIC ^DIE $$GET1^DIQ ^DIR

FULL^VALM1 FLDTEXT^VALM10

$$DIRYN^APSPUTIL

Package	Total	Caller Graph
IHS Changes To Pharmacy	1	APSPCO

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
PMTLLST(EFLG)	;EP- Prompt user for location restriction list
CHGCOM	;EP- Change comment associated with order
EDTLLST	;EP- Create/Edit a location restriction list

FileNo	Call Tags
^PS(52.41 - [#52.41]	GET1^DIQ

Name	Line Occurrences
$$PMTLLST	EDTLLST+3

Name	Field # of Occurrence
>> APSPCO("QFLG"	CHGCOM+14*
APSPCOQF	CHGCOM+1~, CHGCOM+5
>> APSPPOP	CHGCOM+14
COM	CHGCOM+1~, CHGCOM+11, CHGCOM+12, CHGCOM+13
DA	EDTLLST+1~, EDTLLST+3, EDTLLST+4, CHGCOM+1~, CHGCOM+6, CHGCOM+7, CHGCOM+9, CHGCOM+11
DIC	PMTLLST+1~, PMTLLST+2*
DIC("A"	PMTLLST+4, PMTLLST+5
DIC(0	PMTLLST+2*
DIDEL	EDTLLST+1~
DIE	EDTLLST+1~, EDTLLST+5, CHGCOM+1~, CHGCOM+10
>> DIR("A"	CHGCOM+2*
>> DIR(0	CHGCOM+2*
DIRUT	CHGCOM+1~
DLAYGO	EDTLLST+1~, EDTLLST+2*
DR	EDTLLST+1~, EDTLLST+5, CHGCOM+1~, CHGCOM+10
DTOUT	CHGCOM+1~
DUOUT	EDTLLST+1~, CHGCOM+1~, CHGCOM+3
EFLG	PMTLLST~, PMTLLST+2, PMTLLST+3
ITM	CHGCOM+1~, CHGCOM+5*
LST	CHGCOM+1~, CHGCOM+4*, CHGCOM+5
U	CHGCOM+6
VAL	CHGCOM+1~, CHGCOM+5*, CHGCOM+6, CHGCOM+13
>> VALMAR	CHGCOM+6
>> VALMBCK	CHGCOM+3, CHGCOM+15
>> VALMCNT	CHGCOM+2
Y	PMTLLST+1~, PMTLLST+7, CHGCOM+1~, CHGCOM+4

Information