Routine: IBDFPE1

Package	Total	Call Graph
VA Fileman	4	^DIC ^DIE ^DIK ^DIR
Registration	2	(FULL,PAUSE)^VALM1 EN^VALM2
Automated Information Collection System	1	INIT^IBDFPE
Kernel	1	(KILL,STAT)^%ZTLOAD

Entry Points

Name	Comments	DBIA/ICR reference
STAT	; -- Find out the status of the queued job and kill a tasked job
DP1	; -- actual deletion
REP
DELQ
ADD	; -- Add New Print Parameters
DEL	; -- Delete Clinic Group
EDT	; -- Edit Parameter Groups

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ADD+3
Function Call: WRITE	Prompt: ! Line Location: ADD+5
Function Call: WRITE	Prompt: !," TASK: ",$S($D(ZTSK):ZTSK,1:"")_" - ",$S(ZTSK(0)=1:"Defined",1:"Undefined") Line Location: STAT+9
Function Call: WRITE	Prompt: !,"STATUS CODE: ",ZTSK(1) Line Location: STAT+10
Function Call: WRITE	Prompt: !," STATUS: ",ZTSK(2) Line Location: STAT+11
Function Call: WRITE	Prompt: !,"SUCCESSFUL DELETION OF TASK" Condition for execution: ZTSK(0)=1 Line Location: STAT+12
Function Call: WRITE	Prompt: !!,"*JOB STOPPED UPON REQUEST*" Line Location: STAT+12
Function Call: WRITE	Prompt: !!,"Status of Queued Job <<< "_$P(IBDFNODE,"^",1)_" >>>",!!,"JOB NOT TASKED!" Line Location: STAT+14
Function Call: WRITE	Prompt: " NO NEED TO INTERUPT JOB!" Line Location: STAT+14
Function Call: WRITE	Prompt: !,"Entry ",$P($G(^IBD(357.09,1,"Q",DA,0)),"^",1)," not Deleted!" Line Location: DEL+10
Function Call: WRITE	Prompt: !,"Entry ",IBDVALM," Deleted" Line Location: DP1+2
Routine Call	DIE Line Location: EDT+6 ADD+8
Routine Call	DIC Line Location: ADD+3 ADD+5
Routine Call	DIR Line Location: DEL+10

FileNo	Call Tags
^IBD(357.09 - [#357.09]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^IBD(357.09 - [#357.09]	ADD+3, STAT+6, DEL+8, DEL+9, DEL+10

Name	Line Occurrences
DP1	DEL+11
REP	EDT+3, EDT+7, ADD+3, ADD+5, STAT+3, STAT+16, DEL+3, DELQ

Name	Field # of Occurrence
DA	EDT+5, EDT+6!, ADD+3, ADD+5, ADD+6, ADD+8!, STAT+5, STAT+6, STAT+15!, DEL+6* , DEL+8, DEL+9, DEL+10
DA(1	EDT+6, ADD+5, ADD+6, STAT+6, STAT+15!, DEL+7*, DP1+1
DIC	EDT+6!, ADD+3!, ADD+5!, ADD+8!
DIC("A"	ADD+5*
DIC("DR"	ADD+3, ADD+5
DIC(0	ADD+3, ADD+5
DIE	EDT+6!, ADD+6, ADD+8!
>> DIK	DEL+7, DP1+1
DIR	DEL+1~, DEL+10!
DIR("A"	DEL+9*
DIR("B"	DEL+9*
DIR(0	DEL+9*
DIRUT	DEL+1~
DLAYGO	ADD+2~, ADD+3, ADD+5
DR	EDT+6!, ADD+7, ADD+8!
DUOUT	DEL+1~
IBDAT	EDT+1~, STAT+1~
IBDFNODE	STAT+1~, STAT+6*, STAT+8, STAT+14
IBDFSTAT	STAT+1~, STAT+6*, STAT+14
>> IBDFSTOP	STAT+6, STAT+12, STAT+14
>> IBDTYPE(	EDT+5, STAT+5, DEL+6
IBDVALM	EDT+1~, EDT+3, EDT+5, STAT+1~, STAT+3, STAT+5, DEL+1~, DEL+3, DEL+6, DP1+2
>> VALMBCK	EDT+2, EDT+4, REP, STAT+2, STAT+4, DEL+2, DEL+4, DELQ+1
VALMY	EDT+1~, STAT+1~, DEL+1~
VALMY(	EDT+5, STAT+5, DEL+6
VALMY(0	EDT+3, STAT+3, DEL+3
>> XQORNOD(0	EDT+3, STAT+3, DEL+3
>> Y	ADD+3, ADD+5, DEL+10
>> ZTSK	STAT+6*, STAT+9
>> ZTSK(0	STAT+9, STAT+12
>> ZTSK(1	STAT+10
>> ZTSK(2	STAT+11