Routine: ABMM2PVH

Call Graph Total: 15

Package	Total	Call Graph
Third Party Billing	10	^ABMDRDBQ PAZ^ABMDRUTL (MET,NOTMET,PATIENT,PTHSTFL)^ABMM2PH1 (CALC,ENROLL)^ABMM2PH2 (OTHERVST,PTDATA,TRANS,ZEROPD)^ABMM2PH3 CALCDTS^ABMM2PV1 HDR^ABMM2PV3 PRIMPOV^ABMM2PV7 COMPUTE^ABMM2PVH (90DAY,FAC,PARTYR,RFORMAT,SELINS,SUMMARY)^ABMM2PVP
VA Fileman	3	C^%DTC $$GET1^DIQ ^DIR
IHS Accounts Receivable	1	$$VALI^BARVPM
IHS VA Utilities	1	^XBFMK

Package

Total

Call Graph

^ABMDRDBQ PAZ^ABMDRUTL (MET,NOTMET,PATIENT,PTHSTFL)^ABMM2PH1 (CALC,ENROLL)^ABMM2PH2 (OTHERVST,PTDATA,TRANS,ZEROPD)^ABMM2PH3 CALCDTS^ABMM2PV1 HDR^ABMM2PV3 PRIMPOV^ABMM2PV7
COMPUTE^ABMM2PVH (90DAY,FAC,PARTYR,RFORMAT,SELINS,SUMMARY)^ABMM2PVP

VA Fileman

C^%DTC $$GET1^DIQ ^DIR

IHS Accounts Receivable

$$VALI^BARVPM

IHS VA Utilities

^XBFMK

Package	Total	Caller Graph
Third Party Billing	2	ABMM2PH2 ABMM2PVH

Package

Total

Caller Graph

Third Party Billing

ABMM2PH2 ABMM2PVH

Name	Comments	DBIA/ICR reference
TRANS	;EP
EN	;
VISITCK	;EP
ARBILLS	;EP
ZEROPD	;EP
ENROLL	;EP
VISITS	;
OTHERVST	;EP
XIT	;EP - exit option for report
PRINT	;EP
COMPUTE	;EP - gather data
PTDATA	;EP
BILLS	;EP
CALC	;EP

External References

Name	Field # of Occurrence
C^%DTC	COMPUTE+5, VISITCK+29, ARBILLS+29
^ABMDRDBQ	EN+50
PAZ^ABMDRUTL	PRINT+3
MET^ABMM2PH1	PRINT+11
NOTMET^ABMM2PH1	PRINT+12
PATIENT^ABMM2PH1	PRINT+10
PTHSTFL^ABMM2PH1	PRINT+1
CALC^ABMM2PH2	CALC+1
ENROLL^ABMM2PH2	ENROLL+1
OTHERVST^ABMM2PH3	OTHERVST+1
PTDATA^ABMM2PH3	PTDATA+1
TRANS^ABMM2PH3	TRANS+1
ZEROPD^ABMM2PH3	ZEROPD+1
CALCDTS^ABMM2PV1	VISITCK+11, ARBILLS+20
HDR^ABMM2PV3	PRINT+7
PRIMPOV^ABMM2PV7	BILLS+22
COMPUTE^ABMM2PVH	EN+45
90DAY^ABMM2PVP	EN+19
FAC^ABMM2PVP	EN+8
PARTYR^ABMM2PVP	EN+17
RFORMAT^ABMM2PVP	EN+21
SELINS^ABMM2PVP	EN+18
SUMMARY^ABMM2PVP	EN+22
$$VALI^BARVPM	ARBILLS+11
$$GET1^DIQ	VISITS+7, VISITS+8, VISITS+9, VISITS+10, VISITS+11, VISITS+12, VISITS+21, VISITS+22, VISITS+23, VISITS+24 , VISITS+25, VISITCK+6, VISITCK+8, VISITCK+9, BILLS+15, ARBILLS+8, PRINT+8
^DIR	EN+3, EN+29, EN+36, EN+42
^XBFMK	EN+23, EN+32, EN+39, XIT+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"In order for an Eligible Hospital (EH) to participate in the Medicaid EHR" Line Location: EN+11
Function Call: WRITE	Prompt: !,"Incentive program EHs have to meet a minimum patient volume requirement of 10%." Line Location: EN+12
Function Call: WRITE	Prompt: !!,"For EHs the participation year is based on a federal fiscal year, this is the" Line Location: EN+13
Function Call: WRITE	Prompt: !,"same year that the EH would be demonstrating Meaningful use. (Federal Fiscal" Line Location: EN+14
Function Call: WRITE	Prompt: !,"Year is October 1 - September 30.)" Line Location: EN+15
Function Call: WRITE	Prompt: "." Line Location: VISITCK+23
Function Call: WRITE	Prompt: "." Line Location: VISITCK+24
Function Call: WRITE	Prompt: "." Line Location: ARBILLS+24
Routine Call	DIR Line Location: EN+3 EN+29 EN+36 EN+42

FileNo	Call Tags
^AUPNVSIT - [#9000010]	GET1^DIQ
^AUPNVINP - [#9000010.02]	GET1^DIQ
^BARBL(2906 - [#90050.01]	GET1^DIQ
^AUTTLOC - [#9999999.06]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	BILLS+4, BILLS+5, BILLS+9, BILLS+12, BILLS+13, BILLS+14, BILLS+16, BILLS+17, BILLS+18, BILLS+19 , BILLS+20
^ABMDPARM(	EN+35
^ABMMUPRM(1	EN+1, PRINT+8
^AUPNVINP("B"	VISITS+4, VISITS+6
^AUPNVSIT("B"	VISITS+17, VISITS+19
^BARBL(	ARBILLS+3, ARBILLS+7, ARBILLS+14
^XTMP("ABM-PVH2"	EN+5!, XIT+2!, VISITS+20, VISITCK+16, VISITCK+17, VISITCK+18, VISITCK+19, VISITCK+20, VISITCK+21, VISITCK+22* , VISITCK+24, BILLS+7, BILLS+8, BILLS+12, BILLS+28, BILLS+30, BILLS+32, BILLS+34, BILLS+35, BILLS+36! , BILLS+37, BILLS+38, BILLS+39!, BILLS+42, BILLS+44, BILLS+46, BILLS+48, BILLS+49, BILLS+50, BILLS+51! , ARBILLS+3, ARBILLS+7, ARBILLS+17, ARBILLS+18, PRINT+5, PRINT+6, PRINT+11, PRINT+13!

Label References

Name	Line Occurrences
ARBILLS	BILLS+23
BILLS	COMPUTE+8, COMPUTE+16, COMPUTE+26
CALC	COMPUTE+10, COMPUTE+18, COMPUTE+28
EN	EN+20, EN+30
ENROLL	COMPUTE+9, COMPUTE+17, COMPUTE+27
OTHERVST	BILLS+24
PRINT	COMPUTE+11, COMPUTE+19, COMPUTE+30
PTDATA	VISITCK+26, ARBILLS+26
TRANS	ARBILLS+33
VISITCK	VISITS+13, VISITS+26
VISITS	COMPUTE+7, COMPUTE+15, COMPUTE+25

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ABM("PG"	PRINT+4*
>> ABMABILN	ARBILLS+14*
>> ABMARACT	ARBILLS+8*, ARBILLS+10
>> ABMARIEN	ARBILLS+4, ARBILLS+7, ARBILLS+8, ARBILLS+14
ABMBILLN	BILLS+10!, BILLS+13, ARBILLS+1, ARBILLS+3*, ARBILLS+7
ABMCKDT	VISITCK+2!
>> ABMCLNC	VISITS+9, VISITS+22, VISITCK+4
>> ABMCNT	BILLS+1, ARBILLS+24, ARBILLS+25
>> ABMDTFLG	VISITCK+12, VISITCK+14, VISITCK+30, ARBILLS+21, ARBILLS+23, ARBILLS+30
>> ABMDUZ2	BILLS+2, BILLS+4, BILLS+5, BILLS+9, BILLS+12, BILLS+13, BILLS+14, BILLS+17, BILLS+18, BILLS+19 , BILLS+20
ABMDX	EN+6!, VISITCK+25!, BILLS+21!
>> ABMEDT	VISITS+3, VISITS+4, VISITS+15, VISITS+17
ABMF	EN+8, EN+9, EN+20!, EN+30!
ABMF(	VISITCK+10
>> ABMFAC	EN+9*
>> ABMFAC(	PRINT+3
>> ABMFILE	VISITS+1, VISITS+16, VISITCK+3, VISITCK+4, VISITCK+8, VISITCK+9
ABMFLG	VISITCK+2!, VISITCK+3, VISITCK+4, VISITCK+5
>> ABMFN	EN+44*, PRINT+1
>> ABMFOUND	BILLS+3*, BILLS+24
>> ABMGRP	BILLS+29, BILLS+30, BILLS+32, BILLS+34, BILLS+35, BILLS+36, BILLS+37, BILLS+38, BILLS+43, BILLS+44 , BILLS+46, BILLS+48, BILLS+49, BILLS+50, ARBILLS+13*, ARBILLS+17, ARBILLS+18
>> ABMHOLD	ARBILLS+5*, ARBILLS+34
>> ABMI("INS"	ARBILLS+13
>> ABMINS	BILLS+19*, ARBILLS+13
ABMITYP	VISITCK+25!, ARBILLS+11, ARBILLS+12, ARBILLS+13
>> ABMP("BDFN"	BILLS+11, BILLS+12, BILLS+13, BILLS+14, BILLS+16, BILLS+17, BILLS+18, BILLS+19, BILLS+20, BILLS+33* , BILLS+34, BILLS+35, BILLS+36, BILLS+47, BILLS+48*
>> ABMP("BDT"	VISITCK+13, VISITCK+16, VISITCK+17, VISITCK+20, VISITCK+21, VISITCK+27, VISITCK+31, BILLS+27, BILLS+28, BILLS+30 , BILLS+32, BILLS+34, BILLS+35, BILLS+36, BILLS+37, BILLS+38, BILLS+41, BILLS+42, BILLS+44, BILLS+46 , BILLS+48, BILLS+49, BILLS+50, ARBILLS+22, ARBILLS+27, ARBILLS+31
>> ABMP("BEDT"	VISITCK+30, ARBILLS+30
>> ABMP("BSDT"	VISITCK+13, VISITCK+15, ARBILLS+22
>> ABMP("VDFN"	BILLS+31, BILLS+32, BILLS+34, BILLS+35, BILLS+36, BILLS+45, BILLS+46, BILLS+48
>> ABMP("VDT"	VISITS+12, VISITS+25, VISITCK+15, BILLS+18*
>> ABMPAR	ARBILLS+3, ARBILLS+6
>> ABMPATH	EN+38*
>> ABMPMET	PRINT+6, PRINT+9
>> ABMPT	VISITS+11, VISITS+24, VISITCK+18, BILLS+20*
>> ABMQ("NS"	EN+48*
>> ABMQ("RP"	EN+49*
>> ABMQ("RX"	EN+47*
ABMSAV	BILLS+10!, BILLS+13, ARBILLS+2, ARBILLS+3
>> ABMSCAT	VISITS+8, VISITS+21, VISITCK+3, VISITCK+4
>> ABMSDT	VISITS+2, VISITS+4, VISITS+6, VISITS+14, VISITS+17, VISITS+19, VISITCK+18, BILLS+15, BILLS+16, PRINT+5*
ABMTRAMT	ARBILLS+9!
ABMTRIEN	ARBILLS+9!
>> ABMVDFN	VISITS+7, VISITS+8, VISITS+9, VISITS+10, VISITS+11, VISITS+18, VISITS+19, VISITS+20, VISITS+21, VISITS+22 , VISITS+23, VISITS+24, VISITS+25, VISITCK+6, VISITCK+8, VISITCK+9, VISITCK+18, VISITCK+19, VISITCK+21, BILLS+6 , BILLS+7*, BILLS+8, BILLS+9, BILLS+12, BILLS+15, ARBILLS+3, ARBILLS+7, ARBILLS+17, ARBILLS+18
>> ABMVIEN	VISITS+5, VISITS+6, VISITS+7, VISITS+12
>> ABMVLOC	VISITCK+6, VISITCK+10, VISITCK+17, BILLS+17, BILLS+38, BILLS+49, PRINT+2, PRINT+3, PRINT+5, PRINT+6 , PRINT+8, PRINT+11
ABMY	EN+20!, EN+30!
ABMY("90"	EN+20, COMPUTE+2, COMPUTE+14, COMPUTE+22
ABMY("EDT"	COMPUTE+6, COMPUTE+24, VISITS+3, VISITS+15
ABMY("QYR"	COMPUTE+23, COMPUTE+24
ABMY("RFMT"	EN+26, PRINT+1, PRINT+10
ABMY("RTYP"	EN+7*
ABMY("SDT"	COMPUTE+3, COMPUTE+23*, VISITS+2, VISITS+14
>> D0	ARBILLS+10*
DIR	EN+3!, EN+29!, EN+36!, EN+42!
DIR("A"	EN+3, EN+25, EN+28, EN+34, EN+41*
DIR("B"	EN+35*
DIR(0	EN+3, EN+24, EN+27, EN+33, EN+40*
>> DIROUT	EN+8, EN+17, EN+19, EN+21, EN+22, EN+29, PRINT+3
>> DIRUT	EN+8, EN+17, EN+19, EN+21, EN+22, EN+29
>> DTOUT	EN+8, EN+17, EN+19, EN+21, EN+22, EN+29, PRINT+3
>> DUOUT	EN+8, EN+17, EN+19, EN+21, EN+22, EN+29, PRINT+3
DUZ(2	EN+35, BILLS+16, ARBILLS+5, ARBILLS+6, ARBILLS+7, ARBILLS+14, ARBILLS+34
IO(0	VISITCK+24
IOST	VISITCK+24, ARBILLS+24
>> POP	EN+37, EN+43
U	EN+1, EN+30, EN+31, BILLS+13, BILLS+14, BILLS+16, BILLS+17, BILLS+18, BILLS+19, BILLS+20 , ARBILLS+14, PRINT+5
>> X	COMPUTE+6, VISITCK+30, VISITCK+31, ARBILLS+30, ARBILLS+31
>> X1	COMPUTE+3, VISITCK+27, ARBILLS+27*
>> X2	COMPUTE+4, VISITCK+28, ARBILLS+28*
>> Y	EN+30, EN+31, EN+37, EN+38, EN+43, EN+44

Customize PDF page

Package: Third Party Billing

Routine: ABMM2PVH

Information

Source Information