Routine: APCDSPD

Information

APCDSPD ; IHS/CMI/LAB - display site parameters ;

Source file <APCDSPD.m>

Package	Total	Call Graph
IHS VA Utilities	3	^XBDBQUE ($$VAL,ENPM)^XBDIQ1 VIEWR^XBLM
VA Fileman	2	^DIC ^DIR

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Display Patient Care Component Site Parameters",! Line Location: EN1+3
Function Call: WRITE	Prompt: !!,"Goodbye" Line Location: EN1+4
Function Call: WRITE	Prompt: @IOF Condition for execution: $D(IOF) Line Location: PRINT+3
Function Call: WRITE	Prompt: !?15,"PATIENT CARE COMPONENT DATA ENTRY SITE PARAMETERS",! Line Location: PRINT+3
Function Call: WRITE	Prompt: !?(37-$S(L>37:37,1:L)),$P(APCDX(X),U),":",?40,$P(APCDX(X),U,2) Line Location: PRINT+7
Function Call: WRITE	Prompt: !?40,"PCC DATA ENTRY SITE PARAMETERS Page ",APCDPG,!! Line Location: FF+5
Routine Call	DIC Line Location: EN1+4
Routine Call	DIR Line Location: EN1+6 FF+2

FileNo	Call Tags
^APCDSITE - [#9001001.2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD(9001001.2	PRINT+4

Name	Field # of Occurrence
APCDI	XIT+1!, PRINT+2!, PRINT+4, HCDB+2, HCDB+4, MNE+2*, MNE+4
APCDPG	XIT+1!, PRINT+1, FF+3, FF+5
APCDQUIT	EN1+1!, PRINT+5, PRINT+6, HCDB+3, MNE+3, FF+2*
APCDSITE	EN1+5*, XIT+1!, PRINT+4, MNE+1
APCDX	XIT+1!, PRINT+2!, HCDB+1!, MNE+1!
APCDX(	PRINT+4*, PRINT+5, PRINT+7, HCDB+2, HCDB+4, MNE+2, MNE+4
DA	EN1+6!
DIC	EN1+4*!
DIC(0	EN1+4*
DIR	EN1+6!, FF+2!
DIR("A"	EN1+6, FF+2
DIR("B"	EN1+6*
DIR(0	EN1+6, FF+2
>> DIRUT	EN1+7, FF+2
IOF	EN1+2, PRINT+3, FF+4
IOSL	PRINT+6, HCDB+3, MNE+3
IOST	FF+2
>> L	PRINT+7*
U	PRINT+4, PRINT+7
X	PRINT+5*, PRINT+7, FF+1~
>> XBNS	EN1+9*
>> XBRC	EN1+9*
>> XBRP	EN1+9*
>> XBRX	EN1+9*
Y	EN1+4, EN1+5, EN1+8, XIT+1!