Routine: IBACCWLVE

Information

IBACCWLVE ;EDE/TAZ - ACC (Automated Community Care) Claims - VIEW ENCOUNTER ; 12-SEP-2023 ; 12-SEP-2023

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
List Manager	3	EN^VALM ($$SETFLD,$$SETSTR)^VALM1 (CLEAN,CNTRL,SET)^VALM10
Kernel	2	($$FMTE,$$HL7TFM)^XLFDT DISP^XQORM1
VA FileMan	1	$$GET1^DIQ

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 6

Package	Total	Caller Graph
Integrated Billing	6	IBACC WL IBACCRUR VE IBACC WL VE IBACCWLAIVIEW IBACCWLVE1 IBACCWLVE2 IBACCWLVE3

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
HDR	; -- header code
INIT	;EP -- init variables and list array
INITQ	;Exit
AMT	;Display Amount Patient Paid
CL1	;Institutional Claim Code
CN1	;Display Contract Information
CR1	;Display Ambulance Transport Information
CR2	;Spinal Manipulation Service Information
CR3	;Durable Medical Equipment Certification
CTP	;Drug Quantity
DMG	;Demographics
DN1	;Orthodontic Total Months of Treatment
DN2	;Tooth Status
FRM	;Supporting Documentation
HL	;Display HL Record
LIN	;Drug Identification
LQ	;Form Identification Code
LX	;Service Line Number
MEA	;Test Results
MOA	;Outpatient Adjudication Information
NTE	;Display Claim Note
N3	;Address line 1
N4	;City, State, and Zip
OI	;Other Insurance Coverage Information
PAT	;Display Patient Segment
PER	;Submitter EDI Contact Information
PRV	;Provider Specialty
PS1	;Purchased Service Information
QTY	;Ambulance Patient Count
TOO	;Tooth Information
DATE(DATE,TYPE)	;Format Date/Time
DATEQ	;
DOL(DATA)	;Format Dollars
NAME(DATA)	;Format Person Name
PHONE(NUM)	;Format phone number
YN(YN)	;Translate Yes/No element
ZIP(ZIP)	;Format Zip Code
HELP	; -- help code
EXIT	; -- exit code
EXPND	; -- expand code
SET(TITLE,VALUE,BLANK,HEADER)	;
SETQ	;
SET1(TITLE,VALUE)	;

External References

Name	Field # of Occurrence
$$GET1^DIQ	INIT+3, INIT+14, INIT+30
EN^VALM	EN+6
$$SETFLD^VALM1	SET1+1, SET1+2
$$SETSTR^VALM1	SET+10
CLEAN^VALM10	EXIT+5
CNTRL^VALM10	SET+9
SET^VALM10	INITQ+1, SET+3, SET+11, SET1+3
$$FMTE^XLFDT	DATE+5, DATE+7
$$HL7TFM^XLFDT	DATE+5, DATE+7
DISP^XQORM1	HELP+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+3
Routine Call	VALM Line Location: EN+6

FileNo	Call Tags
^IBA(364.9 - [#364.9]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^IBA(364.9 - [#364.9]	INIT+15
^TMP("IBACCWLVE"	EXIT+6!

Label References

Name	Line Occurrences
$$DATE	DMG+1, FRM+4, PAT+10
$$DOL	AMT+1, CN1+10, MOA+2, MOA+8, MOA+9, PS1+2
$$PHONE	PER+6, PER+7
$$YN	DN1+3, FRM+2, OI+1
$$ZIP	N4+1
@(	INIT+24
DATEQ	DATE+3, DATE+4
SET	INIT+10, INIT+11, INIT+12, AMT+1, CL1+1, CL1+2, CL1+3, CN1+1, CN1+10, CN1+11 , CN1+12, CN1+13, CN1+14, CR1+1, CR1+2, CR1+9, CR1+10, CR1+11, CR2+1, CR2+10 , CR2+11, CR3+1, CR3+6, CTP+2, DMG+1, DMG+2, DMG+3, DMG+4, DN1+1, DN1+2 , DN1+3, DN2+1, DN2+2, DN2+5, FRM+1, FRM+2, FRM+3, FRM+4, FRM+5, HL+3 , LIN+1, LIN+10, LQ+1, LQ+4, LX+1, MEA+1, MEA+5, MOA+1, MOA+2, MOA+3 , MOA+4, MOA+5, MOA+6, MOA+7, MOA+8, MOA+9, NTE+1, N3+1, N3+2, N4+1 , OI+1, OI+2, OI+3, PAT+1, PAT+10, PAT+11, PAT+12, PER+2, PER+4, PER+5 , PER+6, PER+7, PRV+1, PRV+7, PS1+1, PS1+2, QTY+2, TOO+2, TOO+4, TOO+5
SET1	SET+16, SET+19
SETQ	SET+4

Naked Globals

Name	Field # of Occurrence
^(	INIT+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADD	QTY+1~, QTY+2, QTY+3, QTY+4, QTY+5*
BLANK	SET~, SET+3
CLM	INIT+1~, INIT+7, INIT+9
CLMCNT	INIT+1~, INIT+7, INIT+9, INIT+15*
CNT	TOO+1~, TOO+5*
CODE	INIT+1~, AMT+1, AMT+2, AMT+3, AMT+4, AMT+5, AMT+6, AMT+7, AMT+8, AMT+9* , AMT+10, CN1+1, CN1+2, CN1+3, CN1+4, CN1+5, CN1+6, CN1+7, CN1+8, CN1+9 , CR1+2, CR1+3, CR1+4, CR1+5, CR1+6, CR1+7, CR1+8, CR2+1, CR2+2, CR2+3 , CR2+4, CR2+5, CR2+6, CR2+7, CR2+8, CR2+9, CR3+1, CR3+2, CR3+3, CR3+4 , CR3+5, DN1+1, DN1+2, DN1+3, DN2+2, DN2+3, DN2+4, DN2+5, DN2+6, FRM+2 , FRM+3, FRM+4, FRM+5, HL+1, HL+2, LIN+1, LIN+2, LIN+3, LIN+4, LIN+5* , LIN+6, LIN+7, LIN+8, LIN+9, LQ+1, LQ+2, LQ+3, MEA+1, MEA+2, MEA+3 , MEA+4, MEA+5, MEA+6, MEA+7, MEA+8, MEA+9, MEA+10, MEA+11, MOA+1, MOA+2 , MOA+3, MOA+4, MOA+5, MOA+6, MOA+7, MOA+8, MOA+9, NTE+1, NTE+2, NTE+3 , NTE+4, NTE+5, NTE+6, NTE+7, NTE+8, NTE+9, NTE+10, NTE+11, NTE+12, NTE+13 , NTE+14, NTE+15, NTE+16, NTE+17, NTE+18, OI+2, OI+3, OI+4, OI+5, PAT+1 , PAT+2, PAT+3, PAT+4, PAT+5, PAT+6, PAT+7, PAT+8, PAT+9, PRV+1, PRV+2 , PRV+3, PRV+4, PRV+5, PRV+6, QTY+2, QTY+3, QTY+4, TOO+2, TOO+3, TOO+5
COL	SET+1~, SET+7*, SET+9, SET+10
D	EN+1~, INIT+1~, INIT+4*, INIT+16, AMT+1, CL1+1, CL1+2, CL1+3, CN1+1, CN1+10 , CN1+11, CN1+12, CN1+13, CN1+14, CR1+1, CR1+2, CR1+9, CR1+10, CR1+11, CR2+1 , CR2+10, CR2+11, CR3+1, CR3+6, CTP+2, DMG+1, DMG+2, DMG+3, DMG+4, DN1+1 , DN1+2, DN1+3, DN2+1, DN2+2, DN2+5, FRM+1, FRM+2, FRM+3, FRM+4, FRM+5 , HL+1, LIN+1, LIN+10, LQ+1, LQ+4, LX+1, MEA+1, MEA+5, MOA+1, MOA+2 , MOA+3, MOA+4, MOA+5, MOA+6, MOA+7, MOA+8, MOA+9, NTE+1, N3+1, N3+2 , N4+1, OI+1, OI+2, OI+3, PAT+1, PAT+10, PAT+11, PAT+12, PER+2, PER+4 , PER+5, PER+6, PER+7, PRV+1, PRV+7, PS1+1, PS1+2, QTY+2, TOO+2, TOO+4 , TOO+5, NAME+2
D1	EN+1~, INIT+1~, INIT+4, CTP+2, TOO+5, DATE+1~, DATE+3, DATE+5, DATE+6, DATE+7* , DATEQ+1
DATA	INIT+15, INIT+16, AMT+1, CL1+1, CL1+2, CL1+3, CN1+1, CN1+10, CN1+11, CN1+12 , CN1+13, CN1+14, CR1+1, CR1+2, CR1+9, CR1+10, CR1+11, CR2+1, CR2+10, CR2+11 , CR3+1, CR3+6, CTP+2, DMG+1, DMG+2, DMG+3, DMG+4, DN1+1, DN1+2, DN1+3 , DN2+1, DN2+2, DN2+5, FRM+1, FRM+2, FRM+3, FRM+4, FRM+5, HL+1, LIN+1 , LIN+10, LQ+1, LQ+4, LX+1, MEA+1, MEA+5, MOA+1, MOA+2, MOA+3, MOA+4 , MOA+5, MOA+6, MOA+7, MOA+8, MOA+9, NTE+1, N3+1, N3+2, N4+1, OI+1 , OI+2, OI+3, PAT+1, PAT+10, PAT+11, PAT+12, PER+2, PER+4, PER+5, PER+6 , PER+7, PRV+1, PRV+7, PS1+1, PS1+2, QTY+2, TOO+2, TOO+4, TOO+5, DOL~ , DOL+1, DOL+2, NAME~, NAME+2
DATE	DATE~, DATE+3, DATE+5, DATE+6, DATE+7
DIAGPTRARR	INIT+2~
FIRST	NAME+1~, NAME+2*, NAME+3
HEADER	SET~, SET+4
HI	INIT+1~, INIT+7, INIT+9
HL	INIT+1~, INIT+7, INIT+9
>> IBACCWLVELEV	EN+4, EXIT+2, EXIT+4*
>> IBENCIFN	INIT+3, INIT+14, INIT+15, INIT+27, INIT+29, INIT+30
IBFORM	INIT+2~, INIT+3*
IBIFN	INIT+28~, INIT+30*, INIT+31
IBPARENT	EN+3~*
IOD	INIT+1~, INIT+14*
IOM	SET+7
>> IORVOFF	SET+9
>> IORVON	SET+9
J	SET+14~, SET+16*, SET+17
LAST	NAME+1~, NAME+2*, NAME+3
LINEVAR	INIT+1~, HL+2, HL+3, SET+12, SET1+1, SET1+2, SET1+3
MI	NAME+1~, NAME+2*, NAME+3
NODE	INIT+1~, INIT+16, INIT+18, INIT+19, INIT+21, INIT+22, INIT+23*, INIT+24
NUM	PHONE~, PHONE+1
PCE	PER+1~, PER+3*, PER+4, PER+5, PER+6, PER+7, SET+14~
SBR	EN+1~, INIT+1~, INIT+7, INIT+9
SUF	NAME+1~, NAME+2*, NAME+3
T1	SET+1~, SET+15, SET+16, SET+17
TAX	INIT+1~
TITLE	QTY+1~, QTY+2, QTY+3, QTY+4, SET~, SET+2, SET+5, SET+7, SET+8, SET+10 , SET+11, SET+13, SET+16, SET+17, SET+18*, SET+19, SET1~, SET1+1
TSC	TOO+1~, TOO+5, TOO+6, TOO+7, TOO+8, TOO+9, TOO+10, TOO+11, TOO+12
TYPE	DATE~, DATE+2*, DATE+3, DATE+4, DATE+6
UNIT	CTP+1~, CTP+2, CTP+3, CTP+4, CTP+5, CTP+6, CTP+7, CTP+8*
VALMAR	EN+1~, INIT+27, INIT+29, INIT+31, INITQ+1
VALMCNT	EN+1~, INIT+7, SET+3, SET+6, SET+9, SET+11, SET1+3
VALMHDR	EN+1~
VALMHDR(1	HDR+2*
>> VALMQUIT	EXIT+2*
VALMSG	EN+1~
VALUE	SET~, SET+2*, SET+19, SET1~, SET1+2
WIDTH	SET+1~, SET+8*, SET+9, SET+10
X	HELP+2~, HELP+3*
YN	YN~, YN+1
ZIP	ZIP~, ZIP+1

Customize PDF page

Package: Integrated Billing