Routine: BQIPLDL

Information

BQIPLDL ;PRXM/HC/DLS - Delete Panel ; 14 Nov 2005 10:44 AM

Source file <BQIPLDL.m>

Package	Total	Call Graph
iCare	4	UPD^BQINOTF EVT^BQIPLRF $$PLID^BQIUG1 $$TKO^BQIUL1
VA Fileman	3	^DIK $$IENS^DILF $$GET1^DIQ
Kernel	2	^%ZTER $$NOW^XLFDT

Name	Comments	DBIA/ICR reference
CHKS	; Do some checks here before proceeding.
DONE	; Exit, stage right...
HDR	;
ERR	;
EN(DATA,OWNR,PLIEN)	; EP - BQI DELETE PANEL

RPC Name	Call Tags
BQI DELETE PANEL	EN

FileNo	Call Tags
90505.01	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^BQICARE - [#90505]	CHKS+4, CHKS+9, CHKS+16, CHKS+26
^BQICARE("AD"	CHKS+10, CHKS+13, CHKS+15
^DD("DD"	ERR+4
^TMP("BQIPLDL"	EN+14
^VA(200 - [#200]	CHKS+16

Name	Line Occurrences
DONE	CHKS+5
HDR	EN+21

Name	Field # of Occurrence
>> BMXSEC	CHKS+3, CHKS+5, CHKS+10, CHKS+18, ERR+5*
BQII	EN+12~, EN+17, DONE+1, DONE+2, HDR+1, ERR+3, ERR+6*
DA	EN+12~, CHKS+21*, CHKS+23
DA(1	CHKS+21*, CHKS+28
DATA	EN~, EN+14*, EN+15, DONE+1, DONE+2, HDR+1, ERR+3, ERR+6
DIK	EN+12~, CHKS+28*
DUZ	CHKS+3
ERRDTM	ERR+2~, ERR+4*, ERR+5
IENS	CHKS+22~, CHKS+23*, CHKS+24
OWNR	EN~, CHKS+3, CHKS+4, CHKS+9, CHKS+21, CHKS+26, CHKS+33
PLIDEN	CHKS+8~, CHKS+9*, CHKS+10, CHKS+13, CHKS+15
PLIEN	EN~, CHKS+4, CHKS+9, CHKS+21, CHKS+26, CHKS+33
POWNR	CHKS+8~, CHKS+12, CHKS+13, CHKS+15, CHKS+16
PPLIEN	CHKS+8~, CHKS+14, CHKS+15, CHKS+16
RSLT	EN+12~, CHKS+5, CHKS+30, DONE+1, ERR+3*
TEXT	CHKS+8~, CHKS+11, CHKS+18, CHKS+22~, CHKS+24, CHKS+26
TEXT1	CHKS+8~, CHKS+11, CHKS+16, CHKS+17*, CHKS+18
U	CHKS+16
UID	EN+12~, EN+13*, EN+14
X	EN+12~
Y	ERR+2~, ERR+4*
>> ZTSK	EN+13