Routine: IBCNBLA

Package	Total	Call Graph
Integrated Billing	7	NEWSCRN^IBCNBLA REJECT^IBCNBLA1 MULSEL^IBCNBLA2 (HDR,INIT)^IBCNBLL (HDR,INIT)^IBCNBLP ($$LOCK,$$SELINS,UNLOCK)^IBCNBU1 EN^IBCNEAMC
List Manager	4	EN^VALM FULL^VALM1 CLEAN^VALM10 EN^VALM2
VA FileMan	3	$$FIND1^DIC $$GET1^DIQ ^DIR

Package	Total	Caller Graph
Integrated Billing	10	IBCNB FAST EXIT IBCNB LIST CHECK NAMES IBCNB LIST ENTRY SCREEN IBCNB LIST PROCESS SCREEN IBCNB LIST REJECT IBCNB LIST SORT IBCNB PROCESS ENTRY SCREEN IBCNB PROCESS TOGGLE IBCNBLA IBCNBLA1
Kernel	1	^ORD(101

Entry Points

Name	Comments	DBIA/ICR reference
NEWSCRN(TEMPLAT,TMPARR,IBBUFDA)	; open a new screen for a specific buffer entry, pass in LM template and the array to select from ; if temp array is defined then user selects the buffer entry, otherwise use entry passed in
SEL(TMPARR)	; user selects one of the items from the list on the screen
SELQ
PNXTSCRN(TEMPLAT,IBBUFDA)	; open a new screen for a buffer entry, rebuild the process screen on return since it may have changed
LNXTSCRN(TEMPLAT,TMPARR,AVIEW)	; select entries from list to process/expand
LNXTX	;
LREJECT(TMPARR)	; user select entries from list then reject/delete them
LREJX	;
FASTEXIT	; sets flag signaling system should be exited
SELSORT	; select the way to sort the list screen
SELSORTX	;
TGLSCRN(IBBUFDA)	; toggle process screen from policy to insurance info, glbal variable IBCNSCRN contains ins co chosen
AMCHK	; This procedure is called from the main buffer screen as an action ; to check the insurance company names in the buffer file. This will ; invoke another ListMan screen that shows a list of all insurance ; company names that do not exist in File 36 either as names or as ; synonyms and also they do not exist in the Auto Match file. These ; are bad insurance company names that need to be corrected before ; electronic insurance verification attempts can be made. ; esg - 6/20/02 - SDD 5.1.11 - Add an action on the main buffer ; screen to call the buffer names check option
AMCHKX	;

External References

Name	Field # of Occurrence
$$FIND1^DIC	SELSORT+38
$$GET1^DIQ	SELSORT+38
^DIR	SEL+4, SEL+12, LNXTSCRN+34, LREJECT+34, FASTEXIT+4, SELSORT+9, SELSORT+50
NEWSCRN^IBCNBLA	PNXTSCRN+1
REJECT^IBCNBLA1	LREJECT+22
MULSEL^IBCNBLA2	LNXTSCRN+10, LREJECT+8
HDR^IBCNBLL	SELSORT+60
INIT^IBCNBLL	SELSORT+60
HDR^IBCNBLP	PNXTSCRN+2, TGLSCRN+6
INIT^IBCNBLP	PNXTSCRN+2, TGLSCRN+6
$$LOCK^IBCNBU1	NEWSCRN+4
$$SELINS^IBCNBU1	TGLSCRN+4
UNLOCK^IBCNBU1	NEWSCRN+4, LNXTSCRN+40, LREJECT+42
EN^IBCNEAMC	AMCHK+10
EN^VALM	NEWSCRN+4, LNXTSCRN+21
FULL^VALM1	LNXTSCRN+9, LREJECT+7, FASTEXIT+3, SELSORT+3, TGLSCRN+2
CLEAN^VALM10	PNXTSCRN+2, TGLSCRN+6
EN^VALM2	SEL+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!," >>> Selected entry has been ",$S(IBY="A":"ACCEPTED",IBY="R":"REJECTED",1:"UNKNOWN STATUS") Line Location: SEL+11
Function Call: WRITE	Prompt: " and may no longer be edited or modified.",! Line Location: SEL+12
Function Call: WRITE	Prompt: @IOF Line Location: LNXTSCRN+27
Function Call: WRITE	Prompt: !!!,"You are ",ACT,"ing multiple insurance buffer entries." Line Location: LNXTSCRN+28
Function Call: WRITE	Prompt: !,"You just completed entry number ",IBCNEZEN," (",IBCNEZCT," of ",IBCNEZGD,")." Line Location: LNXTSCRN+29
Function Call: WRITE	Prompt: ! Line Location: LNXTSCRN+34
Function Call: WRITE	Prompt: @IOF,!?2,$G(IORVON) Line Location: LREJECT+19
Function Call: WRITE	Prompt: " Entry ",IBCNEZEN," (",IBCNEZCT," of ",IBCNEZGD,") " Line Location: LREJECT+20
Function Call: WRITE	Prompt: $G(IORVOFF) Line Location: LREJECT+21
Function Call: WRITE	Prompt: ! Line Location: LREJECT+34
Function Call: WRITE	Prompt: ! Line Location: SELSORT+3
Function Call: WRITE	Prompt: !,"Select the item to sort the buffer records on the buffer list screen." Line Location: SELSORT+4
Function Call: WRITE	Prompt: !!,"Enter an Insurance Company to display the Groups/Plans for that company or ",!,"enter Return to display a patient's policies.",!! Line Location: TGLSCRN+3
Routine Call	DIC Line Location: SELSORT+38
Routine Call	DIR Line Location: SEL+4 SEL+12 LNXTSCRN+34 LREJECT+34 FASTEXIT+4 SELSORT+9 SELSORT+50
Routine Call	VALM Line Location: NEWSCRN+4 LNXTSCRN+21

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^IBE(365.15 - [#365.15]	FIND1^DIC, GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^IBA(355.33 - [#355.33]	SEL+10
^TMP(	SEL+3, SEL+8

Label References

Name	Line Occurrences
$$SEL	NEWSCRN+3
LNXTX	LNXTSCRN+11
LREJX	LREJECT+9
SELQ	SEL+3
SELSORTX	SELSORT+10, SELSORT+19

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACT	LNXTSCRN+8~, LNXTSCRN+23, LNXTSCRN+24, LNXTSCRN+28, LNXTSCRN+31, LNXTSCRN+32
AVIEW	LNXTSCRN~
DIR	SEL+4!, SEL+12!, LNXTSCRN+8~, LNXTSCRN+34!, LREJECT+28~, LREJECT+34!, FASTEXIT+1~, SELSORT+1~, SELSORT+9!, SELSORT+50!
DIR("?"	SELSORT+42, SELSORT+43, SELSORT+44, SELSORT+45, SELSORT+46, SELSORT+47, SELSORT+48, SELSORT+49
DIR("A"	LNXTSCRN+31, LNXTSCRN+32, LREJECT+31, LREJECT+32, FASTEXIT+4, SELSORT+8, SELSORT+40*
DIR("B"	LNXTSCRN+33, LREJECT+33, FASTEXIT+4, SELSORT+8, SELSORT+41*
DIR(0	SEL+4, SEL+12, LNXTSCRN+30, LREJECT+30, FASTEXIT+4, SELSORT+7, SELSORT+33, SELSORT+39
DIROUT	LNXTSCRN+8~, LREJECT+28~, SELSORT+1~
DIRUT	LNXTSCRN+8~, LREJECT+28~, FASTEXIT+1~, SELSORT+1~, SELSORT+19, SELSORT+51
DTOUT	LNXTSCRN+8~, LREJECT+28~, SELSORT+1~
DUOUT	LNXTSCRN+8~, LREJECT+28~, SELSORT+1~
IBBUFDA	NEWSCRN~, NEWSCRN+3~, NEWSCRN+4, PNXTSCRN~, PNXTSCRN+1, LNXTSCRN+7~, LNXTSCRN+18, LREJECT+6~, LREJECT+16*, TGLSCRN~ , TGLSCRN+1
IBCNEZAR	LNXTSCRN+7~, LNXTSCRN+10, LNXTSCRN+11, LREJECT+6~, LREJECT+8, LREJECT+9
IBCNEZAR(	LNXTSCRN+15, LNXTSCRN+16, LNXTSCRN+17, LREJECT+13, LREJECT+14, LREJECT+15
IBCNEZBF	LNXTSCRN+7~, LNXTSCRN+17, LNXTSCRN+18, LNXTSCRN+40, LREJECT+6~, LREJECT+15, LREJECT+16, LREJECT+22, LREJECT+42
IBCNEZCT	LNXTSCRN+7~, LNXTSCRN+14, LNXTSCRN+19, LNXTSCRN+25, LNXTSCRN+29, LREJECT+6~, LREJECT+12, LREJECT+17, LREJECT+20, LREJECT+27 , LREJECT+29
IBCNEZEN	LNXTSCRN+7~, LNXTSCRN+14, LNXTSCRN+15, LNXTSCRN+16, LNXTSCRN+17, LNXTSCRN+29, LREJECT+6~, LREJECT+12, LREJECT+13, LREJECT+14 , LREJECT+15, LREJECT+20
IBCNEZGD	LNXTSCRN+7~, LNXTSCRN+10, LNXTSCRN+25, LNXTSCRN+29, LREJECT+6~, LREJECT+8, LREJECT+20, LREJECT+27, LREJECT+29
IBCNEZQ	LNXTSCRN+7~, LNXTSCRN+20, LNXTSCRN+22, LNXTSCRN+35, LREJECT+6~, LREJECT+18, LREJECT+22, LREJECT+27, LREJECT+36!
>> IBCNSCRN	TGLSCRN+4*
>> IBCNSORT	SELSORT+8, SELSORT+11, SELSORT+19, SELSORT+56
>> IBCNSORT(1	SELSORT+17!, SELSORT+22, SELSORT+23, SELSORT+24, SELSORT+25, SELSORT+26, SELSORT+27, SELSORT+28, SELSORT+29, SELSORT+55*
>> IBFASTXT	LNXTSCRN+22, FASTEXIT+5*
IBSELN	SEL+2~, SEL+7*, SEL+8
IBX	SEL+2~, SEL+8, SEL+10*, SELQ
IBY	SEL+2~, SEL+10*, SEL+11
IOF	LNXTSCRN+27, LREJECT+19
>> IORVOFF	LREJECT+21
>> IORVON	LREJECT+19
REMAIN	LNXTSCRN+8~, LNXTSCRN+25, LNXTSCRN+26, LNXTSCRN+32, LREJECT+28~, LREJECT+29, LREJECT+32
ST	SELSORT+1~, SELSORT+36*, SELSORT+37, SELSORT+38, SELSORT+39
STDES	SELSORT+1~, SELSORT+37, SELSORT+38, SELSORT+39
TEMPLAT	NEWSCRN~, NEWSCRN+4, PNXTSCRN~, PNXTSCRN+1, LNXTSCRN~, LNXTSCRN+21, LNXTSCRN+24
TMPARR	NEWSCRN~, NEWSCRN+3, SEL~, SEL+3, SEL+7, SEL+8, SEL+10, LNXTSCRN~, LNXTSCRN+10, LREJECT~ , LREJECT+8
U	SEL+8, SEL+10, LNXTSCRN+17, LREJECT+15, SELSORT+56
>> VALM("ENTITY"	SEL+4
>> VALMBCK	NEWSCRN+5, PNXTSCRN+2, LNXTX+1, LREJX+1, FASTEXIT+2, SELSORTX+1, TGLSCRN+6, AMCHK+11
>> VALMBG	SELSORTX+1, TGLSCRN+6
VALMY	SEL+2~, SEL+7
VALMY(	SEL+7
X	LNXTSCRN+8~, LREJECT+28~, FASTEXIT+1~, SELSORT+1~
>> XQORNOD(0	SEL+6
Y	LNXTSCRN+8~, LNXTSCRN+35, LREJECT+28~, LREJECT+36, FASTEXIT+1~, FASTEXIT+5, SELSORT+1~, SELSORT+10, SELSORT+11, SELSORT+19 , SELSORT+52
Y(0	SELSORT+11, SELSORT+55, SELSORT+56

Customize PDF page

Package: Integrated Billing

Routine: IBCNBLA

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 11

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: