Routine: ABMPTPOP

Package	Total	Call Graph
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD
Third Party Billing	3	$$SDT^ABMDUTL GETFACS^ABMMUMUP $$EN^ABMVDF
VA Fileman	3	NOW^%DTC $$GET1^DIQ ^DIR
IHS VA Utilities	1	^XBFMK

Entry Points

Name	Comments	DBIA/ICR reference
WHD	;EP
REGLOC	;EP - registration location
PI	;EP
RR	;EP
MCD	;EP
VSTCK	;EP
COMPILE	;EP
PROMPTS	;EP
QUE	;TASKMAN
ELGCK	;EP
PRINT	;EP
DT	;EP visit dates for report
SEL	;Select device
PTSTAT	;EP patient status
MCR	;EP

External References

Name	Field # of Occurrence
NOW^%DTC	WHD+3
^%ZIS	SEL+3, SEL+5
HOME^%ZIS	SEL+4
^%ZISC	PRINT+14, QUE+6
^%ZTLOAD	QUE+5
$$SDT^ABMDUTL	COMPILE+22, COMPILE+28, WHD+5
GETFACS^ABMMUMUP	REGLOC+2
$$EN^ABMVDF	PRINT+13, WHD+1
$$GET1^DIQ	COMPILE+26, COMPILE+29, COMPILE+35, REGLOC+5, REGLOC+6, PI+9, PI+10, PI+12
^DIR	SEL+4, PRINT+12, REGLOC+18, DT+4, DT+9, PTSTAT+5
^XBFMK	REGLOC+14, PTSTAT+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?5,"PATIENT COUNT: ",+$G(ABMT("PT")) Line Location: PRINT+10
Function Call: WRITE	Prompt: !?7,"VISIT COUNT: ",+$G(ABMT("VST")) Line Location: PRINT+11
Function Call: WRITE	Prompt: $$EN^ABMVDF("IOF") Line Location: PRINT+13
Function Call: WRITE	Prompt: !! Line Location: REGLOC+11
Function Call: WRITE	Prompt: !!," ============ Entry of Visit Date Range =============",! Line Location: DT+1
Function Call: WRITE	Prompt: ! Line Location: DT+7
Function Call: WRITE	Prompt: !!,*7,"INPUT ERROR: Start Date is Greater than than the End Date, TRY AGAIN!",!! Line Location: DT+13
Function Call: WRITE	Prompt: $$EN^ABMVDF("IOF"),! Line Location: WHD+1
Function Call: WRITE	Prompt: ABM("LINE"),! Line Location: WHD+2
Function Call: WRITE	Prompt: ABM("HD",0),?$S($D(ABM(132)):103,1:48) Line Location: WHD+4
Function Call: WRITE	Prompt: Y Line Location: WHD+4
Function Call: WRITE	Prompt: !,"Billing Location(s): " Line Location: WHD+9
Function Call: WRITE	Prompt: ", " Line Location: WHD+13
Function Call: WRITE	Prompt: !?40,"* - AGE AS OF REPORT DATE" Line Location: WHD+17
Function Call: WRITE	Prompt: !,ABM("LINE") Line Location: WHD+18
Function Call: WRITE	Prompt: !,"REG LOC"_U_"HRN"_U_"NAME"_U_"DEC"_U_"BIRTH DATE"_U_"SEX"_U_"AGE*"_U_"BEN"_U_"MCR"_U_"MCD"_U_"PVT"_U_"VET"_U_"CHS"_U_"RESIDENCE"_U_"VET Y/N"_U_"DATE OF LAST UPD"_U_"EMPL STATUS"_U_"BILL VISIT"_U_"UNBILL VISIT" Line Location: WHD+20
Routine Call	%ZIS Line Location: SEL+4
Routine Call	DIR Line Location: SEL+4 PRINT+12 REGLOC+18 DT+4 DT+9 PTSTAT+5
Routine Call	%ZIS Line Location: SEL+3 SEL+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^AUPNPAT - [#9000001]	GET1^DIQ
^AUTTCOM - [#9999999.05]	GET1^DIQ
^AUTTLOC - [#9999999.06]	GET1^DIQ
^AUTNINS - [#9999999.18]	GET1^DIQ
^AUTTINTY - [#9999999.181]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMMUPRM(1	REGLOC+7
^AUPNMCD - [#9000004]	MCD+5, MCD+6, MCD+7
^AUPNMCD("B"	MCD+3
^AUPNMCR - [#9000003]	MCR+3, MCR+4, MCR+5
^AUPNPAT - [#9000001]	COMPILE+13, COMPILE+20, COMPILE+28, COMPILE+30, COMPILE+31, COMPILE+34, COMPILE+35
^AUPNPRVT - [#9000006]	PI+3, PI+4, PI+5, PI+6
^AUPNRR(	RR+3, RR+4, RR+5
^AUPNVSIT - [#9000010]	COMPILE+8, COMPILE+12, VSTCK+4
^AUPNVSIT("B"	COMPILE+5, COMPILE+7
^AUTTBEN - [#9999999.25]	COMPILE+30
^AUTTLOC - [#9999999.06]	COMPILE+16
^DD("DD"	WHD+4
^DIC(4 - [#4]	WHD+15
^DPT - [#2]	COMPILE+21, COMPILE+22, COMPILE+23, COMPILE+25, COMPILE+27
^XTMP("ABM-PTPOP"	PRINT+6, PRINT+8, PRINT+9, COMPILE+1!, COMPILE+17, COMPILE+18, COMPILE+19, COMPILE+38, COMPILE+40, COMPILE+41 , COMPILE+43, COMPILE+44, COMPILE+45, COMPILE+46

Label References

Name	Line Occurrences
COMPILE	PRINT+1
DT	DT+11, DT+13
ELGCK	COMPILE+42
MCD	ELGCK+2
MCR	ELGCK+1
PI	ELGCK+3
PROMPTS	ABMPTPOP+5
QUE	SEL+4
RR	ELGCK+1
VSTCK	COMPILE+39
WHD	PRINT+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	WHD+4
>> %ZIS	SEL+1*
>> %ZIS("A"	SEL+2*
ABM	PRINT+15!
ABM("HD"	PRINT+2, WHD+4, WHD+5, WHD+6, WHD+7
ABM("LINE"	WHD+2!*, WHD+18!
ABM("PG"	PRINT+3*
ABM(132	WHD+2, WHD+4
>> ABMAGE	COMPILE+26*, COMPILE+37
>> ABMBEN	COMPILE+30*, COMPILE+37
>> ABMC	WHD+11, WHD+13, WHD+14
>> ABMCHS	COMPILE+31*, COMPILE+37
>> ABMCNT	REGLOC+3, REGLOC+4, REGLOC+5, REGLOC+6, REGLOC+7, REGLOC+8, REGLOC+9, REGLOC+10, REGLOC+23, REGLOC+24
>> ABMDEC	COMPILE+24, COMPILE+25, COMPILE+37
>> ABMDIR	REGLOC+3, REGLOC+5, REGLOC+6, REGLOC+10, REGLOC+15, REGLOC+16
>> ABMDOB	COMPILE+22*, COMPILE+37
>> ABMEDT	COMPILE+4*, COMPILE+5
>> ABMELG	VSTCK+2*
>> ABMEMPLS	COMPILE+29*, COMPILE+37
ABMF	REGLOC+12!, REGLOC+16, REGLOC+26
ABMF(	REGLOC+21, REGLOC+24
ABMFANS	REGLOC+12!, REGLOC+20*, REGLOC+21, REGLOC+22
>> ABMFLIST(	REGLOC+4, REGLOC+5, REGLOC+6, REGLOC+7, REGLOC+21, REGLOC+24
>> ABMFLIST(99999	REGLOC+8
ABMFQHC	REGLOC+3, REGLOC+7, REGLOC+10, REGLOC+25!
>> ABMHRN	COMPILE+20*, COMPILE+37
>> ABMI	MCR+2, MCR+3, MCR+4, MCR+5, RR+2, RR+3, RR+4, RR+5, MCD+2, MCD+3 , MCD+5, MCD+6, MCD+7, PI+2, PI+3, PI+4, PI+5, PI+6
>> ABMIEDT	MCR+5, MCR+6, MCR+8, MCR+9, RR+5, RR+6, RR+8, RR+9, MCD+7, MCD+8 , MCD+10, MCD+11, PI+6, PI+7, PI+9, PI+10, PI+11
>> ABMII	MCD+4, MCD+5, MCD+6, MCD+7
>> ABMISDT	MCR+4, MCR+6, MCR+7, RR+4, RR+6, RR+7, MCD+6, MCD+8, MCD+9, PI+5 , PI+7, PI+8
>> ABML	VSTCK+2*
>> ABMLSUF	PRINT+5, PRINT+6, PRINT+8, PRINT+9, COMPILE+16*, COMPILE+19, COMPILE+37, COMPILE+38, COMPILE+40, COMPILE+41 , COMPILE+43, COMPILE+44, COMPILE+45, COMPILE+46
>> ABMLUPDT	COMPILE+28*, COMPILE+37
>> ABMMCD	COMPILE+44, MCD+1, MCD+3, MCD+5, MCD+10, MCD+12*
>> ABMMCR	COMPILE+43, MCR+1, MCR+3, MCR+8, MCR+10, RR+1, RR+3, RR+10
>> ABMP("INS"	PI+4*, PI+9, PI+10, PI+12
>> ABMPDFN	PRINT+7, PRINT+8, PRINT+9, COMPILE+12*, COMPILE+13, COMPILE+17, COMPILE+18, COMPILE+19, COMPILE+20, COMPILE+21 , COMPILE+22, COMPILE+23, COMPILE+25, COMPILE+26, COMPILE+27, COMPILE+28, COMPILE+29, COMPILE+30, COMPILE+31, COMPILE+34 , COMPILE+35, COMPILE+38, COMPILE+40, COMPILE+41, COMPILE+43, COMPILE+44, COMPILE+45, COMPILE+46, MCR+3, MCR+4 , MCR+5, RR+3, RR+4, RR+5, MCD+3, PI+3, PI+4, PI+5, PI+6
>> ABMPI	COMPILE+45, PI+1, PI+3, PI+10, PI+13*
>> ABMPTNM	COMPILE+23*, COMPILE+37
>> ABMRDT	COMPILE+34*, COMPILE+35
>> ABMREC	COMPILE+37*, COMPILE+38
>> ABMRES	COMPILE+33, COMPILE+35, COMPILE+37
>> ABMRL	WHD+10, WHD+12, WHD+15
>> ABMRR	RR+8*
>> ABMSDT	COMPILE+3, COMPILE+5, COMPILE+7
>> ABMSEX	COMPILE+21*, COMPILE+37
ABMT	COMPILE+2!
ABMT("PT"	PRINT+10, COMPILE+17*
ABMT("VST"	PRINT+11, COMPILE+11*
>> ABMTOT	REGLOC+9*, REGLOC+13, REGLOC+21, REGLOC+22
>> ABMTYP	PRINT+4*
>> ABMVDFN	COMPILE+6, COMPILE+7, COMPILE+8, COMPILE+12, VSTCK+4
>> ABMVET	COMPILE+27, COMPILE+37, COMPILE+46, PI+1, PI+9, PI+12
>> ABMVFLG	COMPILE+40, COMPILE+41, VSTCK+1, VSTCK+6
>> ABMVLOC	COMPILE+8*, COMPILE+9, COMPILE+10, COMPILE+13, COMPILE+16, COMPILE+20
ABMY	ABMPTPOP+4!, REGLOC+27
ABMY("DT"	ABMPTPOP+6, COMPILE+3, COMPILE+4, DT+6, DT+11!, DT+12, DT+13, MCR+7, MCR+8, MCR+9 , RR+7, RR+8, RR+9, MCD+9, MCD+10, MCD+11, PI+8, PI+9, PI+10, PI+11 , WHD+5
ABMY("PTSTAT"	ABMPTPOP+6, PTSTAT+7*
ABMY("RLOC"	ABMPTPOP+6, COMPILE+10, REGLOC+26*, WHD+12
DIR	SEL+4!, PRINT+12!, REGLOC+18!, DT+10!, PTSTAT+5!
DIR("A"	REGLOC+17, DT+2, DT+8, PTSTAT+3
DIR("B"	PTSTAT+4*
DIR(0	SEL+4, PRINT+12, REGLOC+15, REGLOC+16, DT+3, PTSTAT+2
>> DIROUT	REGLOC+13, REGLOC+19, DT+5, PTSTAT+6
>> DIRUT	REGLOC+13, REGLOC+19, DT+5, DT+11, PTSTAT+6
>> DTOUT	REGLOC+13, REGLOC+19, DT+5, PTSTAT+6
>> DUOUT	REGLOC+13, REGLOC+19, DT+5, PTSTAT+6
IO	SEL+4
IO(0	SEL+4
ION	SEL+5
>> IOP	SEL+5*
IOST	PRINT+12, PRINT+13
>> POP	SEL+3
>> SERVCAT	VSTCK+4*, VSTCK+5
U	COMPILE+8, COMPILE+12, COMPILE+13, COMPILE+16, COMPILE+20, COMPILE+21, COMPILE+22, COMPILE+23, COMPILE+25, COMPILE+27 , COMPILE+28, COMPILE+30, COMPILE+31, COMPILE+35, COMPILE+37, COMPILE+40, COMPILE+41, COMPILE+43, COMPILE+44, COMPILE+45 , COMPILE+46, VSTCK+4, MCR+4, MCR+5, RR+4, RR+5, MCD+6, MCD+7, PI+4, PI+5 , PI+6, WHD+15, WHD+20
>> Y	REGLOC+13, REGLOC+20, DT+6, DT+12, PTSTAT+7, WHD+4*
>> ZTDESC	QUE+2*
>> ZTRTN	QUE+1*
>> ZTSAVE("ABM*"	QUE+3*
ZTSK	QUE+4!, QUE+7

Customize PDF page

Package: Third Party Billing

Routine: ABMPTPOP

Information

Source Information

Call Graph

Call Graph Total: 10

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: