Routine: FBUCEN1

Package	Total	Call Graph
VA FileMan	4	^DIC ^DIE $$GET1^DIQ ^DIR
Fee Basis	3	($$PTR,$$UPOK,LOCK)^FBUCUTL DIE^FBUCUTL2 (GROUP,READ)^FBUCUTL7

Package	Total	Caller Graph
Fee Basis	2	FBUCEN FBUCLINK

Entry Points

Name	Comments	DBIA/ICR reference
EN(FBZ,FBDA)	;entry point from fbucen: check if group, and any in group dispositioned ; if any are, ask if claim being entered should be dispostioned ; disposition new claim to what user selects
GETDISP
PTC(FBSCL)	;
SELPTC(FBDA,FBPT)	;selects Patient type
MSTRPTC(FBCLM,FBPTC)	;
SCNDPTC(FBMCLM,FBCLM,FBPTC)	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"At least one other claim in this group has been dispositioned." Line Location: EN+18
Function Call: WRITE	Prompt: !!,"The existing disposition(s) in the group follow:",! Line Location: EN+19
Function Call: WRITE	Prompt: !?10,$P($G(FBDISPO(FBI)),U,2) Line Location: EN+20
Function Call: WRITE	Prompt: !,"Vendor information is required for disposition.",!,"The claim cannot be dispositioned." Line Location: GETDISP+5
Function Call: WRITE	Prompt: !,"The claim cannot be dispositioned." Line Location: GETDISP+7
Function Call: WRITE	Prompt: !,"Patient Type Code is required to disposition the claim." Line Location: PTC+6
Function Call: WRITE	Prompt: !!,"No Patient Type for master claim." Line Location: PTC+9
Function Call: WRITE	Prompt: !!,"No Patient Type for secondary claim." Line Location: PTC+10
Function Call: WRITE	Prompt: !,"Master claim doesn't have any Patient Type Code" Line Location: MSTRPTC+1
Function Call: WRITE	Prompt: !,"Master claim has Patient Type Code : ",$$GET1^DIQ(162.7,FBMCLM_",",9) Line Location: SCNDPTC+1
Routine Call	DIC Line Location: GETDISP
Routine Call	DIE Line Location: GETDISP+9 SELPTC+4
Routine Call	DIR Line Location: PTC+7 MSTRPTC+2 SCNDPTC+2

FileNo	Call Tags
^FB583 - [#162.7]	Classic Fileman Calls, GET1^DIQ
^FB(162.91 - [#162.91]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^FB583 - [#162.7]	GETDISP+2, GETDISP+5, GETDISP+9, PTC+1, PTC+3, PTC+4, SELPTC+4, MSTRPTC+5, SCNDPTC+5

Name	Field # of Occurrence
DA	EN+5~, GETDISP+9, SELPTC+2, SELPTC+4
DIC	GETDISP*!
DIC("S"	GETDISP*
DIC(0	GETDISP*
DIE	EN+5~, GETDISP+9, SELPTC+2, SELPTC+4
DIR	PTC+7!, MSTRPTC+2!, SCNDPTC+2!
DIR("A"	PTC+7, MSTRPTC+2, SCNDPTC+2*
DIR("B"	PTC+7, MSTRPTC+2, SCNDPTC+2*
DIR(0	PTC+7, MSTRPTC+2, SCNDPTC+2*
DIRUT	EN+5~, PTC+8, MSTRPTC+3, SCNDPTC+3
DR	EN+5~, GETDISP+9, SELPTC+2, SELPTC+3*
DTOUT	EN+5~, GETDISP
DUOUT	EN+5~, GETDISP
FBALL	EN+5~, EN+7*, EN+25
FBC	EN+5~, EN+12*, EN+13, EN+16, EN+23
FBCLM	MSTRPTC~, MSTRPTC+4, MSTRPTC+5, SCNDPTC~, SCNDPTC+4, SCNDPTC+5
FBD	EN+5~, EN+10~, EN+11, EN+14, EN+24, GETDISP, GETDISP+1
FBDA	EN~, EN+6, EN+8, EN+14, GETDISP+3, GETDISP+5, GETDISP+7, GETDISP+9, SELPTC~, SELPTC+2
FBDIRA	EN+5~, EN+23, EN+24, EN+25
FBDISPO	EN+5~
FBDISPO(	EN+11*, EN+14!, EN+16!, EN+20, GETDISP+1
FBDISPO(0	EN+24
FBDR	GETDISP+2~*, GETDISP+3
FBGCT	EN+5~, EN+8, EN+12, EN+13, EN+14, EN+15, EN+16*, EN+17, EN+23, EN+24 , GETDISP
FBGROUP	EN+5~, EN+8
FBGROUP(	EN+11
FBI	EN+5~, EN+10~, EN+11, EN+20~, GETDISP+1, GETDISP+2
FBLOCK	EN+5~, GETDISP+9, SELPTC+1~, SELPTC+4
FBMCL	PTC+1~*, PTC+2, PTC+3, PTC+9, PTC+10
FBMCLM	SCNDPTC~, SCNDPTC+1
FBMPT	PTC+3~*, PTC+5, PTC+9, PTC+10
FBO	EN+10~, EN+11*
FBOUT	EN+5~, EN+7*, EN+25
FBPT	SELPTC~, SELPTC+3
FBPTC	MSTRPTC~, MSTRPTC+5*, MSTRPTC+6, SCNDPTC~, SCNDPTC+4
FBSCL	PTC~, PTC+1, PTC+4, PTC+10
FBSPT	PTC+4~*, PTC+5, PTC+10
FBZ	EN~, EN+6, EN+8, EN+12
FBZ1	GETDISP+2~*
U	EN+8, EN+11, EN+12, EN+16, EN+20, EN+24, GETDISP+2, GETDISP+5, PTC+3, PTC+4 , MSTRPTC+5, SCNDPTC+5
Y	EN+5~, GETDISP, PTC+8, MSTRPTC+3, SCNDPTC+4