Routine: FBAAVD4

Entry Points

Name	Comments	DBIA/ICR reference
EN	;Routine primary entry point
EN1
BADCHK	;BACK CHECK DIGIT ON THE NPI
ACTIVATE	;CREATE AN ACTIVATED ENTRY IN MULTIPLE NPI FIELD
DEL	;NPI HAS BEEN DELETED
COMP	;COMPLETELY DELETE THE NPI
INACT	;INACTIVATE AN ENTRY
ROLLBACK	;ROLL BACK TO THE PREVIOUS NPI AFTER AN NPI IS DELETED
XIT	;CLEAN AND EXIT

Name	Line Occurrences
Function Call: WRITE	Prompt: !,*7,"Not a valid NPI. Please try again." Line Location: BADCHK+1
Function Call: WRITE	Prompt: " ??",$C(7) Line Location: DEL+3
Function Call: WRITE	Prompt: !,"This NPI has been deleted.",! Line Location: COMP+24
Routine Call	DIC Line Location: ACTIVATE+4 COMP+23 INACT+5
Routine Call	DIR Line Location: EN1+1 DEL+5 DEL+10

Name	Line Occurrences (* Changed, ! Killed)
^FBAAV - [#161.2]	EN+4, EN1+1, ACTIVATE+5, DEL+3, COMP+10, COMP+12, COMP+13, COMP+23, INACT+7, ROLLBACK+1 , ROLLBACK+2
^FBAAV("NPI"	ACTIVATE+5, COMP+3!, INACT+6!, ROLLBACK+2
^FBAAV("NPIHISTORY"	ACTIVATE+5, COMP+3!, INACT+6, INACT+9*

Name	Field # of Occurrence
>> DA	EN+3, EN+4, EN1+4, DEL+3, COMP+3, COMP+23
>> DA(1	ACTIVATE+2, COMP+4, INACT+3*, INACT+6, INACT+9, ROLLBACK+2
DIC	EN+2~, ACTIVATE+2, COMP+4, INACT+3*
DIC("DR"	ACTIVATE+3, COMP+22, INACT+4*
DIC(0	ACTIVATE+2, COMP+4, INACT+3*
DIE	EN+2~
DIR	EN+2~, DEL+4!
DIR("?"	EN1, DEL+4, DEL+7, DEL+8, DEL+9*
DIR("A"	EN1, EN1+4!, DEL+4, DEL+7*
DIR("B"	EN+4*, DEL+4
DIR("T"	EN1*
DIR(0	EN1, DEL+4, DEL+7*
DR	EN+2~
DTIME	EN1
DTOUT	EN+2~, EN1+1
DUOUT	EN+2~, EN1+1
FBBT	XIT+1!
FBCHECK	EN+2~, EN1, DEL+11, INACT+8
FBIEN	EN+2~, EN+3*, EN1+1, ACTIVATE+2, ACTIVATE+5, COMP+4, COMP+10, COMP+12, COMP+13, INACT+3 , INACT+7, ROLLBACK+1
FBNPI	EN+2~, EN1+2, EN1+3, EN1+4, EN1+5, EN1+6, ACTIVATE+1, ACTIVATE+5, DEL+4, COMP+3 , COMP+9, INACT+9, ROLLBACK+1, XIT+1!
FBOLDNPI	EN+2~, EN+4*, EN1+2, EN1+5, INACT+6
FBRB	COMP+5, COMP+12, COMP+19, COMP+25, ROLLBACK+1, XIT+1!
FBRBLST	COMP+7~, COMP+13*, COMP+15, COMP+17, COMP+19
FBRBLST(	COMP+9, COMP+17, COMP+19
FBRBNPI	EN+2~, ROLLBACK+1*, ROLLBACK+2
FBRBTMP	COMP+7~, COMP+10, COMP+12, COMP+13, COMP+19
FBRTN	EN+2~, EN+3*, EN1+4, XIT+1!
U	EN+4, EN1+1, ACTIVATE+5, DEL+3, COMP+10, COMP+15, COMP+17, COMP+19, INACT+7, ROLLBACK+1 , ROLLBACK+2
X	EN+2~, EN1+1, ACTIVATE+2, COMP+4, INACT+3*
Y	EN+2~, EN1+2, EN1+3, DEL+6, DEL+11