Routine: IBCNOR1A

Package	Total	Call Graph
Integrated Billing	3	$$VALIDDT^IBCNINSU (BLDINSGR,CHKINS,CHKNM)^IBCNOR1 $$DAT2^IBOUTL
VA FileMan	3	NOW^%DTC ($$GET1,GETS)^DIQ ^DIR
Kernel	2	$$FMTE^XLFDT $$UP^XLFSTR

Entry Points

Name	Comments	DBIA/ICR reference
COMPILE(IBCNORRTN,IBCNOR)	; Entry Point called from EN^XUTMDEVQ. ; IBCNORRTN = Routine name for ^TMP($J,... ; IBCNOR = Array of params ; Input: ; IBCNOR("IBI") = select INS 0 some, 1 all ; IBCNOR("IBIA") = only 1-Active Insurance Companies ; IBCNOR("IBIG") = 0-Selected, 1-All Group Plans ; IBCNOR("IBIGA")= only 1-Active Group Plans ; IBCNOR("IBIGN")= 1-Group Name, 2-Group Number, 3-Both Group Name and Group Number ; IBCNOR("IBFIL")= A^B^C where" ; A - 1-Begin with, 2-Contains, 3-Range ; B - A=1 Begin with text, A=2 Contains text, A=3 Range start text ; C - only if A=3 Range End text ; IBCNOR("IBOUT") E-EXCEL, R-REPORT
COMPF	; process the found items
PRINT	; print out
P1
P2
EHDR	; EXCEL header
HDR	; report header
EXIT	; leave option
QLINE	; cr to continue
DTC(IBDTCK)	; check date return external if valid
DTCO	; date check exit
BLDPT	; collect the subscribers for the policies/groups

External References

Name	Field # of Occurrence
NOW^%DTC	PRINT+8
$$GET1^DIQ	COMPILE+33, COMPILE+35, COMPILE+60, COMPILE+63, COMPILE+80, BLDPT+16, BLDPT+17, BLDPT+20
GETS^DIQ	COMPILE+69
^DIR	QLINE+5
$$VALIDDT^IBCNINSU	DTC+4
BLDINSGR^IBCNOR1	COMPILE+27, COMPILE+40
CHKINS^IBCNOR1	COMPILE+73
CHKNM^IBCNOR1	COMPILE+36, COMPILE+72
$$DAT2^IBOUTL	PRINT+9
$$FMTE^XLFDT	DTC+6
$$UP^XLFSTR	BLDPT+17

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Build Insurance Groups...",! Line Location: COMPILE+39
Function Call: WRITE	Prompt: !,"Collecting Subscribers ...",! Line Location: COMPILE+44
Function Call: WRITE	Prompt: !,"Building Output ...",! Line Location: COMPILE+53
Function Call: WRITE	Prompt: "." Line Location: COMPILE+67
Function Call: WRITE	Prompt: ! Line Location: PRINT+13
Function Call: WRITE	Prompt: !,NONEMSG,!,EORMSG Line Location: PRINT+16
Function Call: WRITE	Prompt: !,EORMSG Line Location: P1+0
Function Call: WRITE	Prompt: !,IBPTNM,?32,$P(IBDATA,U,3),?48,$P(IBDATA,U,2) Line Location: P2+3
Function Call: WRITE	Prompt: !,IBPTNM,U,$P(IBDATA,U,3),U,$P(IBDATA,U,2) Line Location: P2+8
Function Call: WRITE	Prompt: !,HDRNAME_U_HDRDATE Line Location: EHDR+3
Function Call: WRITE	Prompt: !,"Filters: ",$S(IBCNOR("IBI")=1:"All",1:"Selected")," Insurances, " Line Location: EHDR+5
Function Call: WRITE	Prompt: $S(IBCNOR("IBIG")=1:"All",1:"Selected")," Group Plans" Line Location: EHDR+6
Function Call: WRITE	Prompt: " ,NAME Between ",$S(IBRF="":"'FIRST'",1:IBRF)," and ",$S(IBRL="zzzzzz":"'LAST'",1:IBRL) Line Location: EHDR+7
Function Call: WRITE	Prompt: !,"Patient Name"_U_"DOB"_U_"SSN" Line Location: EHDR+9
Function Call: WRITE	Prompt: HDRNAME,?40,HDRDATE,?69,"Page: ",IBA,! Line Location: HDR+5
Function Call: WRITE	Prompt: IBF Line Location: HDR+10
Function Call: WRITE	Prompt: ! Line Location: HDR+11
Function Call: WRITE	Prompt: ", " Line Location: HDR+12
Function Call: WRITE	Prompt: IBG,! Line Location: HDR+13
Function Call: WRITE	Prompt: !,"Patient Name",?32,"DOB",?48,"SSN" Line Location: HDR+14
Function Call: WRITE	Prompt: !,$E(IBDASHES,1,79) Line Location: HDR+15
Function Call: WRITE	Prompt: ! Line Location: QLINE+3
Routine Call	DIR Line Location: QLINE+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
2.312	GET1^DIQ, GETS^DIQ
^DIC(36 - [#36]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(36 - [#36]	COMPILE+31
^DPT - [#2]	COMPILE+65
^DPT("AB"	BLDPT+12, BLDPT+18
^TMP(	COMPILE+24, COMPILE+25, EXIT+4!
^TMP("IBCNOR"	COMPILE+25!, COMPILE+38, PRINT+15, BLDPT+5!, BLDPT+7, BLDPT+9, BLDPT+10, BLDPT+14, BLDPT+22, BLDPT+26* , BLDPT+27, BLDPT+28
^TMP($J	COMPILE+48!, COMPILE+54!, COMPILE+83, COMPILE+84, COMPF+3, COMPF+4, COMPF+5, COMPF+6, COMPF+8, COMPF+9 , EXIT+2!

Label References

Name	Line Occurrences
$$DTC	COMPILE+63
BLDPT	COMPILE+45
COMPF	COMPILE+54
DTCO	DTC+3, DTC+5, DTC+8
EHDR	PRINT+14
EXIT	PRINT+15, P1, P2+2
HDR	PRINT+14, P2+6
P1	P2
P2	P2+10
PRINT	COMPILE+86
QLINE	PRINT+18, P1, P2+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	PRINT+9
CRT	COMPILE+17~, COMPILE+20, COMPILE+21, QLINE+4
DIR	QLINE+2~, QLINE+5!
DIR(0	QLINE+5*
DIROUT	QLINE+2~
DIRUT	QLINE+2~
DT	COMPILE+78, COMPILE+79
DTOUT	QLINE+2~, QLINE+6
DUOUT	QLINE+2~, QLINE+6
EORMSG	PRINT+2~, PRINT+5*, PRINT+16, P1
GCT	COMPILE+17~
GDATA	COMPILE+17~
GIEN	COMPILE+17~
HDRDATE	PRINT+2~, PRINT+9*, EHDR+3, HDR+5
HDRNAME	PRINT+2~, PRINT+7*, EHDR+3, HDR+5
IB3553	BLDPT+2~, BLDPT+10*, BLDPT+26
IB36	BLDPT+2~, BLDPT+7*, BLDPT+12, BLDPT+18, BLDPT+26
IBA	COMPILE+17~, COMPILE+69, COMPILE+70, COMPILE+71, COMPILE+75, COMPILE+76, COMPF+2~, COMPF+5, COMPF+6, COMPF+7* , COMPF+8, COMPF+9, HDR+2~, HDR+4, HDR+5, BLDPT+2~, BLDPT+20*, BLDPT+21
IBAR	COMPILE+17~, COMPILE+69!
IBAR(	COMPILE+70, COMPILE+71, COMPILE+75, COMPILE+76
IBAR35	BLDPT+2~, BLDPT+8!
IBAR35(	BLDPT+10*, BLDPT+21
IBB	COMPF+2~, COMPF+9*, COMPF+10, COMPF+11, COMPF+12
IBBK	DTC+2~, DTC+4*, DTC+5, DTC+6
IBC	COMPILE+17~, COMPILE+84, COMPF+2~, COMPF+10, BLDPT+2~, BLDPT+6, BLDPT+7, BLDPT+9, BLDPT+10
IBCNOR	COMPILE~
IBCNOR("IBI"	COMPILE+23, COMPILE+30, EHDR+5, HDR+7
IBCNOR("IBIG"	COMPILE+26, EHDR+6, HDR+8
IBCNOR("IBOUT"	PRINT+3
IBCNORRTN	COMPILE~
IBCT	COMPILE+17~, COMPILE+52, COMPILE+67, BLDPT+2~, BLDPT+6, BLDPT+19, BLDPT+28
IBD	COMPF+2~, COMPF+6, COMPF+11, COMPF+13
IBDASHES	PRINT+2~, PRINT+10*, HDR+15
IBDATA	PRINT+2~, P2+1*, P2+3, P2+8
IBDFN	PRINT+2~
IBDOB	COMPILE+17~, COMPILE+63*, COMPILE+83, COMPF+15, PRINT+2~
IBDOBI	COMPILE+17~, COMPILE+63, COMPILE+83, COMPF+15, PRINT+2~, P1+1, P2*, P2+1
IBDT	DTC+2~, DTC+6, DTC+7*, DTCO+2
IBDTCK	DTC~, DTC+3, DTC+4
IBDTH	BLDPT+2~, BLDPT+16*
IBE	COMPF+2~, COMPF+12*
IBEFFDT	COMPILE+17~, COMPILE+75*, COMPILE+77, COMPILE+78, COMPILE+83
IBEORM	PRINT+2~, PRINT+4, PRINT+17, P1*, QLINE+3
IBEXPDT	COMPILE+17~, COMPILE+76*, COMPILE+79, COMPILE+83
IBF	COMPF+2~, COMPF+16, HDR+2~, HDR+7, HDR+8, HDR+10, HDR+11, BLDPT+2~, BLDPT+6, BLDPT+12* , BLDPT+18, BLDPT+26*
IBFC	BLDPT+2~, BLDPT+6, BLDPT+27
IBG	HDR+2~, HDR+9*, HDR+11, HDR+13
IBGC	BLDPT+2~, BLDPT+8, BLDPT+9, BLDPT+10
>> IBI36	COMPILE+70*, COMPILE+73, COMPILE+80, COMPILE+83
IBIF	COMPILE+17~, COMPILE+65*, COMPILE+69, COMPILE+83
IBIN	BLDPT+2~
>> IBINAME	COMPILE+35*, COMPILE+36
IBINS	COMPILE+17~
IBITM	COMPILE+17~, COMPILE+56*, COMPILE+57
>> IBJOB	COMPILE+24, COMPILE+25, EXIT+4
IBLNC	COMPILE+17~, COMPILE+20, PRINT+12, PRINT+17, P1, P2+1, P2+4, EHDR+2, EHDR+8, HDR+4 , HDR+7, HDR+11, QLINE+3
IBNA	COMPILE+17~
IBNAM	COMPILE+17~, COMPILE+57, COMPILE+58, COMPILE+83, COMPF+15
IBNM	COMPILE+18~, COMPILE+71*, COMPILE+72, COMPILE+83
>> IBOK	COMPILE+36, COMPILE+72, COMPILE+73*
IBPGC	PRINT+2~, PRINT+4, P2+4, EHDR+2, EHDR+4, HDR+3*, HDR+4, HDR+6
IBPGN	COMPILE+18~
IBPHM	COMPF+2~, COMPF+7, COMPF+8, COMPF+13, COMPF+14
IBPNM	BLDPT+2~, BLDPT+17*, BLDPT+23, BLDPT+24, BLDPT+26
IBPNMA	BLDPT+2~, BLDPT+17*, BLDPT+26
IBPTDFN	BLDPT+2~, BLDPT+12*, BLDPT+14, BLDPT+16, BLDPT+17, BLDPT+18, BLDPT+20, BLDPT+22, BLDPT+26
IBPTI	COMPILE+18~, COMPILE+52, COMPILE+54, COMPILE+56, COMPILE+58, COMPILE+60, COMPILE+63, COMPILE+65, COMPILE+69, COMPILE+83 , COMPILE+84, COMPF+3, COMPF+4, COMPF+5, COMPF+6, COMPF+8, COMPF+9, COMPF+15
IBPTINS	BLDPT+2~, BLDPT+12, BLDPT+18, BLDPT+20
IBPTNM	PRINT+2~, PRINT+20, P1, P2, P2+1, P2+3, P2+8
IBQ	COMPF+2~, COMPF+4, COMPF+6
>> IBRF	EHDR+7, HDR+9
>> IBRFU	BLDPT+24
>> IBRL	EHDR+7, HDR+9
>> IBRLU	BLDPT+23
IBSCRCT	COMPILE+18~, COMPILE+47*
IBSPACES	PRINT+2~, PRINT+11*, HDR+4
IBSSN	COMPILE+18~, COMPILE+62*, COMPILE+83, COMPF+15
>> IBSTOP	P2+2, P2+5, QLINE+6
IBT	PRINT+2~, PRINT+3*, PRINT+14, P2+2, P2+7
IBTMP	COMPILE+18~, COMPILE+50*, COMPILE+52, COMPILE+54, COMPILE+56, COMPF+15, COMPF+16, P1, P2, P2+1 , EXIT+3
IBTYPE	COMPILE+18~, COMPILE+80*, COMPILE+83
IBXTFEED	COMPILE+18~, COMPILE+20, COMPILE+21, QLINE+3
ICT	COMPILE+18~
IIEN	COMPILE+18~, COMPILE+31*, COMPILE+33, COMPILE+35, COMPILE+38
>> INACT	COMPILE+33*, COMPILE+34
>> INSCT	COMPILE+31, COMPILE+37, COMPILE+38
IOF	HDR+3
IOSL	COMPILE+20, COMPILE+21
IOST	COMPILE+21, COMPILE+39, COMPILE+44, COMPILE+53, COMPILE+67, BLDPT+19
LIN	QLINE+2~, QLINE+3*
MAXCNT	COMPILE+18~, COMPILE+20, COMPILE+21, P2+4, QLINE+3
NONEMSG	PRINT+2~, PRINT+6*, PRINT+16
PLANOK	COMPILE+18~
U	COMPILE+57, COMPILE+83, COMPF+6, COMPF+10, COMPF+11, COMPF+12, COMPF+15, P2+3, P2+8, EHDR+3 , EHDR+9, BLDPT+26, BLDPT+28
X	COMPILE+18~, COMPILE+60, COMPILE+61, COMPILE+62
Y	COMPILE+18~

Customize PDF page

Package: Integrated Billing

Routine: IBCNOR1A

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: