Routine: IBERS2

Package	Total	Call Graph
Registration	2	$$LST^DGMTU ELIG^VADPT
Integrated Billing	1	^IBCNS

Package	Total	Caller Graph
Integrated Billing	1	IBERS1

Entry Points

Name	Comments	DBIA/ICR reference
ENDLN
PAT	;name,clinic,appointment date/time
INS
MT	;means test, date of last means test, primary eligibility
ENDINSC	;print the INS and SC arrays on the same lines
EXIT
DX	;print discharge and billing dx's for last 6 appointments
SC
END	;end of sheet, Last section on patient printed on RS: new dx's, signature
LINE	;prints 1 (IBW=1) 2 (IBW=2) or three (IBW=3) pieces of data on a formated line
CHECKS	;print space for checks

External References

Name	Field # of Occurrence
$$LST^DGMTU	MT+1
^IBCNS	INS
ELIG^VADPT	IBERS2+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	MT+3
^DG(391 - [#391]	SC+2
^DIC(31 - [#31]	SC+6
^DIC(36 - [#36]	INS+5
^DPT - [#2]	SC, SC+3, SC+4, SC+5, SC+6
^TMP("IBRSP"	INS+2, ENDLN

Label References

Name	Line Occurrences
ENDINSC	SC, SC+2, SC+3, SC+4
ENDLN	IBERS2+6, PAT+4, MT+5, ENDINSC+2, CHECKS+2, END+2, END+4, LINE+4
LINE	IBERS2+6, PAT+1, PAT+2, PAT+3, MT+2, MT+4, ENDINSC+1, CHECKS+1, END+3
SC	INS+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DFN	IBERS2+5*, MT+1, SC, SC+3, SC+4, SC+5, SC+6, EXIT!
>> IB1	END+1, LINE+4, LINE+6
>> IB2	INS+7, SC+7, LINE+4, LINE+5
>> IB3	CHECKS+1, LINE+5
>> IB4	LINE+5
IBCMP	INS+5*, INS+6, INS+7, INS+8, ENDINSC+3!
IBCOND	INS, SC+5, SC+6*, SC+7, SC+9, END+1, END+2, EXIT!
IBDD	INS+4, ENDINSC+3!
IBDD(	INS+4
IBDIS	SC+6*, SC+7, ENDINSC+3!
IBDISC	SC+6*, SC+7, ENDINSC+3!
>> IBDSH	PAT+4, MT+5, ENDINSC+2, CHECKS+2, END+4
IBDT	IBERS2+5*, MT+1, INS, EXIT!
IBI	INS+4, INS+5, INS+6, INS+7, INS+8, ENDINSC+1, ENDINSC+3!, END+1, EXIT!
IBINDT	INS*, ENDINSC+3!
IBINS	INS+1, ENDINSC+3!
IBINS(	INS+5, INS+6, INS+7, INS+8*, ENDINSC+1
IBINS(1	INS+1*
IBL	LINE+5*, LINE+6, LINE+7, LINE+8, ENDLN+1!
IBLC	IBERS2+5, EXIT!, ENDLN
>> IBLN	IBERS2+5, PAT+1, PAT+2, PAT+3
IBLX	INS+5*, INS+6, INS+7, ENDINSC+3!
IBNS	INS+4*, INS+5, ENDINSC+3!
IBOUTP	INS*, ENDINSC+3!
IBSC	SC+5*, SC+6, ENDINSC+3!
IBSCD	ENDINSC+3!
IBSCD(	SC+7*, ENDINSC+1
IBSCD(1	SC+2, SC+3, SC+4, SC+9
IBT	LINE+4, LINE+5, LINE+7, LINE+8, ENDLN+1!
IBW	IBERS2+6, PAT+1, PAT+2, PAT+3, MT+2, MT+4, ENDINSC+1, CHECKS+1, END+3*, EXIT! , LINE+4, LINE+5, LINE+8
IBX	IBERS2+6, PAT+1, PAT+2, PAT+3, PAT+4, MT+2, MT+4, MT+5, INS+1, INS+6 , INS+8, SC+1, SC+2, SC+3, SC+4, SC+7, SC+8, SC+9, ENDINSC+1, ENDINSC+2* , CHECKS+1, CHECKS+2, END+1, END+3, END+4, EXIT!, LINE+4, LINE+6, LINE+7, LINE+8* , ENDLN
IBY	PAT+1, PAT+2, PAT+3, MT+2, MT+4, ENDINSC+1, CHECKS+1, END+3, EXIT!, LINE+7*
IBZ	CHECKS+1, EXIT!, LINE+8
IOM	INS+2
VAEL	ENDINSC+3!
VAEL(1	MT+2
VAEL(3	MT+4, SC
VAEL(4	SC+2
VAEL(6	SC+2
VAERR	ENDINSC+3!
X	EXIT!
Y	MT+1, MT+2, MT+3, MT+4, EXIT!

Customize PDF page

Package: Integrated Billing

Routine: IBERS2

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: