Routine: FBAAMST

Package	Total	Call Graph
Kernel	4	(,HOME)^%ZIS ^%ZISC (,$$S)^%ZTLOAD ($$FMADD,$$FMTE)^XLFDT
VA FileMan	4	DD^%DT NOW^%DTC $$GET1^DIQ ^DIR
Fee Basis	3	DAYS^FBAAUTL1 $$POV^FBAAUTL3 $$MODL^FBAAUTL4
Registration	1	(DEM,KVA)^VADPT

Package	Total	Caller Graph
Fee Basis	1	FBAA MST REPORT

Name	Comments	DBIA/ICR reference
QEN	; queued entry
GATHER	; collect and sort data
PRINT	; report data
EXIT	;
HD	; page header
HDPAT	; page header for continued Patient
HDAUT	; page header for continued Authorization
RSUM	; report summary
RSUML(FBI)	; report summary number line

Name	Field # of Occurrence
DD^%DT	PRINT+1
NOW^%DTC	PRINT+1
^%ZIS	FBAAMST+31
HOME^%ZIS	FBAAMST+35
^%ZISC	PRINT+56
^%ZTLOAD	FBAAMST+35
$$S^%ZTLOAD	GATHER+10, HD+2
$$GET1^DIQ	GATHER+26, PRINT+36, PRINT+42, PRINT+43
^DIR	FBAAMST+12, FBAAMST+18, FBAAMST+27, PRINT+55, HD+3
DAYS^FBAAUTL1	FBAAMST+16
$$POV^FBAAUTL3	FBAAMST+4
$$MODL^FBAAUTL4	PRINT+37
DEM^VADPT	GATHER+29
KVA^VADPT	GATHER+37
$$FMADD^XLFDT	FBAAMST+11
$$FMTE^XLFDT	FBAAMST+11, FBAAMST+17, PRINT+6, PRINT+26, PRINT+27, PRINT+39

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!,"Purpose of Visit Code 55 (MST) not found. Can't print the MST report." Line Location: FBAAMST+6
Function Call: WRITE	Prompt: !,"No MST authorizations found during period." Line Location: PRINT+10
Function Call: WRITE	Prompt: !!,FBPNAME,?40,"Patient ID: ",$P(FBX,U),?67,"Gender: ",$P(FBX,U,2) Line Location: PRINT+18
Function Call: WRITE	Prompt: !!,?2,"Authorization #: ",FBDFN,"-",FBAU Line Location: PRINT+25
Function Call: WRITE	Prompt: ?32,"FR: ",$$FMTE^XLFDT($P(FBA,U),"2DF") Line Location: PRINT+26
Function Call: WRITE	Prompt: ?47,"TO: ",$$FMTE^XLFDT($P(FBA,U,2),"2DF") Line Location: PRINT+27
Function Call: WRITE	Prompt: !!,?4,"No finalized payments on file." Line Location: PRINT+29
Function Call: WRITE	Prompt: !!,?4,"Svc Date: ",$$FMTE^XLFDT($P(FBPAY,U),"2DF") Line Location: PRINT+39
Function Call: WRITE	Prompt: ?24,"CPT-MOD: " Line Location: PRINT+40
Function Call: WRITE	Prompt: FBAACPT_$S($G(FBMODLE)]"":"-"_$P(FBMODLE,","),1:"") Line Location: PRINT+41
Function Call: WRITE	Prompt: ?43,"DIAG: ",$$GET1^DIQ(162.03,FBIENS,28) Line Location: PRINT+42
Function Call: WRITE	Prompt: ?58,"AMT PAID: ",$J($$GET1^DIQ(162.03,FBIENS,2,"I"),9,2) Line Location: PRINT+43
Function Call: WRITE	Prompt: !,?38,"-",FBMOD Line Location: PRINT+48
Function Call: WRITE	Prompt: !,?4,"Vendor: ",$E($P(FBVY,U),1,30) Line Location: PRINT+49
Function Call: WRITE	Prompt: ?44,"Vendor ID: ",$P(FBVY,U,2) Line Location: PRINT+50
Function Call: WRITE	Prompt: !!,"REPORT STOPPED AT USER REQUEST" Line Location: PRINT+52
Function Call: WRITE	Prompt: @IOF Line Location: HD+4
Function Call: WRITE	Prompt: !,"MST "_$S(FBDETAIL:"Detailed",1:"Summary")_" Report" Line Location: HD+6
Function Call: WRITE	Prompt: ?49,FBDTR,?72,"page ",FBPG Line Location: HD+7
Function Call: WRITE	Prompt: !,FBHDT(FBI) Line Location: HD+8
Function Call: WRITE	Prompt: !,FBDL Line Location: HD+9
Function Call: WRITE	Prompt: !,"Patient: ",FBPNAME," (continued)" Line Location: HDPAT+1
Function Call: WRITE	Prompt: !," Authorization: ",FBDFN,"-",FBAU," (continued)" Line Location: HDAUT+1
Function Call: WRITE	Prompt: !!,"REPORT SUMMARY" Line Location: RSUM+2
Function Call: WRITE	Prompt: !!,"Gender",?8,"# Unique",?18,"# Visits" Line Location: RSUM+3
Function Call: WRITE	Prompt: ?28," Total",?44,"Average Paid",?58,"Average Paid" Line Location: RSUM+4
Function Call: WRITE	Prompt: !,?8,"Patients" Line Location: RSUM+5
Function Call: WRITE	Prompt: ?28," Payments",?44," Per Patient",?58," Per Visit" Line Location: RSUM+6
Function Call: WRITE	Prompt: !,"------",?8,"--------",?18,"--------" Line Location: RSUM+7
Function Call: WRITE	Prompt: ?28,"--------------",?44,"------------",?58,"------------" Line Location: RSUM+8
Function Call: WRITE	Prompt: !,?8,"--------",?18,"--------" Line Location: RSUM+10
Function Call: WRITE	Prompt: ?28,"--------------",?44,"------------",?58,"------------" Line Location: RSUM+11
Function Call: WRITE	Prompt: !!,"Notes: (1) # Unique Patients represents patients having one or more MST" Line Location: RSUM+14
Function Call: WRITE	Prompt: !," authorizations that overlap the period being reported." Line Location: RSUM+15
Function Call: WRITE	Prompt: !," (2) # Visits and Total Payments are obtained from any finalized" Line Location: RSUM+16
Function Call: WRITE	Prompt: !," payment(s) that are linked to the MST authorizations and have a" Line Location: RSUM+17
Function Call: WRITE	Prompt: !," date of service within the period being reported." Line Location: RSUM+18
Function Call: WRITE	Prompt: !,FBTX,?8,$J($FN(FBT("PATIENT",FBI),","),8) Line Location: RSUML+5
Function Call: WRITE	Prompt: ?18,$J($FN(FBT("VISIT",FBI),","),8) Line Location: RSUML+6
Function Call: WRITE	Prompt: ?28,$J($FN(FBT("AMTPAID",FBI),",",2),14) Line Location: RSUML+7
Function Call: WRITE	Prompt: ?44,$J($FN(FBT("AMTPAID",FBI)/FBT("PATIENT",FBI),",",2),12) Line Location: RSUML+8
Function Call: WRITE	Prompt: ?58,$J($FN(FBT("AMTPAID",FBI)/FBT("VISIT",FBI),",",2),12) Line Location: RSUML+9
Routine Call	DIR Line Location: FBAAMST+12 FBAAMST+18 FBAAMST+27 PRINT+55 HD+3
Routine Call	%ZIS Line Location: FBAAMST+31
Routine Call	%ZIS Line Location: FBAAMST+35

FileNo	Call Tags
^FBAAA - [#161]	GET1^DIQ
162.03	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^FBAAA - [#161]	GATHER+8, GATHER+15, GATHER+16, GATHER+17, GATHER+50
^FBAAC - [#162]	GATHER+44, GATHER+46, GATHER+47, GATHER+54, GATHER+55
^FBAAV - [#161.2]	PRINT+35
^TMP($J	GATHER+1!, GATHER+35, GATHER+39, GATHER+51, GATHER+57, GATHER+59, GATHER+62, PRINT+10, PRINT+14, PRINT+17 , PRINT+21, PRINT+23, PRINT+29, PRINT+30, EXIT+2!

Name	Line Occurrences
EXIT	FBAAMST+5, FBAAMST+12, FBAAMST+18, FBAAMST+27, FBAAMST+31, FBAAMST+32
HD	PRINT+9, PRINT+24, PRINT+38, PRINT+47, RSUM+1, RSUM+13
HDAUT	PRINT+38, PRINT+47
HDPAT	PRINT+24, PRINT+38, PRINT+47
RSUM	PRINT+53
RSUML	RSUM+9, RSUM+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PRINT+1, EXIT+6!
>> %ZIS	FBAAMST+31*
DFN	GATHER+29*, EXIT+6!
DIC	EXIT+6!
DIR	FBAAMST+12!, FBAAMST+18!, FBAAMST+27!, PRINT+55!, EXIT+6!, HD+3!
DIR("?"	FBAAMST+24, FBAAMST+25, FBAAMST+26*
DIR("A"	FBAAMST+9, FBAAMST+14, FBAAMST+23*
DIR("B"	FBAAMST+11, FBAAMST+17, FBAAMST+23*
DIR(0	FBAAMST+9, FBAAMST+14, FBAAMST+22, PRINT+55, HD+3*
DIROUT	EXIT+6!
DIRUT	FBAAMST+12, FBAAMST+18, FBAAMST+27, EXIT+6!
DT	FBAAMST+11
DTOUT	EXIT+6!
DUOUT	EXIT+6!
FBA	GATHER+16, GATHER+18, GATHER+20, GATHER+21, GATHER+39, PRINT+23, PRINT+26, PRINT+27, EXIT+3!
FBAACPT	PRINT+36*, PRINT+41, EXIT+3!
FBATO	GATHER+50*, GATHER+51, GATHER+57, EXIT+3!
FBAU	GATHER+15, GATHER+16, GATHER+17, GATHER+39, PRINT+22, PRINT+25, EXIT+3!, HDAUT+1
FBAUT	PRINT+20, PRINT+21, PRINT+22, PRINT+23, PRINT+29, PRINT+30, EXIT+3!
FBC	GATHER+7, GATHER+9, GATHER+10, EXIT+3!
FBDETAIL	FBAAMST+28*, PRINT+11, EXIT+3!, HD+6
FBDFN	GATHER+8, GATHER+15, GATHER+16, GATHER+17, GATHER+26, GATHER+29, GATHER+35, GATHER+39, GATHER+44, GATHER+46 , GATHER+47, GATHER+50, GATHER+51, GATHER+54, GATHER+55, GATHER+57, GATHER+59, GATHER+62, PRINT+16, PRINT+25 , PRINT+37, EXIT+3!, HDAUT+1
FBDL	PRINT+2!*, EXIT+3!, HD+9
FBDT1	FBAAMST+13*, FBAAMST+14, FBAAMST+16, FBAAMST+17, GATHER+21, GATHER+48, PRINT+6, EXIT+3!
FBDT2	FBAAMST+19*, GATHER+20, GATHER+49, PRINT+6, EXIT+3!
FBDTR	PRINT+1*, EXIT+4!, HD+7
FBFNDAUT	GATHER+13, GATHER+23, GATHER+36, GATHER+42, EXIT+4!
FBGEN	GATHER+30, GATHER+32, GATHER+34, GATHER+35, GATHER+58, GATHER+61, EXIT+4!
FBHDT	PRINT+5!, EXIT+4!
FBHDT(	HD+8
FBHDT(1	PRINT+6*
FBI	PRINT+45~, PRINT+46, EXIT+4!, HD+1~, HD+8, RSUML~, RSUML+2, RSUML+3, RSUML+4, RSUML+5 , RSUML+6, RSUML+7, RSUML+8, RSUML+9
FBIENS	PRINT+31*, PRINT+32, PRINT+33, PRINT+34, PRINT+36, PRINT+42, PRINT+43, EXIT+4!
FBMOD	PRINT+45~, PRINT+46*, PRINT+48
FBMODLE	PRINT+37*, PRINT+41, PRINT+44, PRINT+46, EXIT+4!
FBPAT	PRINT+13, PRINT+14, PRINT+15, PRINT+16, PRINT+17, PRINT+21, PRINT+23, PRINT+29, PRINT+30, EXIT+4!
FBPAY	PRINT+30*, PRINT+31, PRINT+39, EXIT+4!
FBPG	PRINT+1, EXIT+4!, HD+3, HD+4, HD+5, HD+7
FBPNAME	GATHER+26, GATHER+27, GATHER+35, GATHER+39, GATHER+51, GATHER+57, PRINT+15*, PRINT+18, EXIT+5!, HDPAT+1
FBPOV	FBAAMST+4*, FBAAMST+5, GATHER+18, EXIT+5!
FBQUIT	GATHER+5, GATHER+8, GATHER+10, PRINT+10, PRINT+11, PRINT+14, PRINT+21, PRINT+24, PRINT+30, PRINT+38 , PRINT+44, PRINT+46, PRINT+47, PRINT+52, PRINT+55, EXIT+5!, HD+2, HD+3, RSUM+1, RSUM+13
FBSPI	GATHER+53, GATHER+54, GATHER+55, GATHER+57, PRINT+34*, PRINT+37, EXIT+5!
FBSSN	GATHER+31*, GATHER+35, EXIT+5!
FBT	EXIT+5!
FBT(	GATHER+3, RSUML+4
FBT("AMTPAID"	GATHER+58*, RSUML+7, RSUML+8, RSUML+9
FBT("PATIENT"	GATHER+34*, RSUML+3, RSUML+5, RSUML+8
FBT("VISIT"	GATHER+61*, RSUML+6, RSUML+9
FBTDI	GATHER+46, GATHER+47, GATHER+54, GATHER+55, GATHER+57, PRINT+33, PRINT+37, EXIT+5!
FBTX	RSUML+1~, RSUML+2*, RSUML+5
FBV	GATHER+44, GATHER+46, GATHER+47, GATHER+54, GATHER+55, GATHER+57, PRINT+32, PRINT+35, PRINT+37, EXIT+5!
FBVY	PRINT+35*, PRINT+49, PRINT+50, EXIT+5!
FBX	FBAAMST+34, PRINT+17, PRINT+18, EXIT+5!
FBY2	GATHER+47*, GATHER+48, GATHER+49, GATHER+50, GATHER+51, GATHER+57, GATHER+59, GATHER+62, EXIT+5!
FBY3	GATHER+55*, GATHER+56, GATHER+58, EXIT+5!
I	GATHER+3, EXIT+6!, RSUM+9, RSUML+4*
IO	QEN+1
IO("Q"	FBAAMST+32
IOF	HD+4
IOM	PRINT+2
IOSL	PRINT+24, PRINT+38, PRINT+47, RSUM+1, RSUM+13
IOST	PRINT+55, HD+3, HD+4
J	GATHER+3*, EXIT+6!
POP	FBAAMST+31, EXIT+6!
U	GATHER+17, GATHER+18, GATHER+20, GATHER+21, GATHER+30, GATHER+31, GATHER+32, GATHER+35, GATHER+39, GATHER+48 , GATHER+49, GATHER+50, GATHER+51, GATHER+56, GATHER+57, GATHER+58, GATHER+59, GATHER+62, PRINT+15, PRINT+16 , PRINT+18, PRINT+22, PRINT+26, PRINT+27, PRINT+31, PRINT+39, PRINT+49, PRINT+50, RSUML+4
>> VADM(2	GATHER+31
>> VADM(5	GATHER+30
VAHOW	GATHER+29!
VAPTYP	GATHER+29!
VAROOT	GATHER+29!
X	FBAAMST+16*, FBAAMST+17, EXIT+6!
Y	FBAAMST+13, FBAAMST+19, FBAAMST+28, PRINT+1*, EXIT+6!, HD+3
>> ZTDESC	FBAAMST+33*
>> ZTQUEUED	GATHER+10, EXIT+1, HD+2
>> ZTREQ	EXIT+1*
>> ZTRTN	FBAAMST+33*
>> ZTSAVE(	FBAAMST+34*
ZTSK	FBAAMST+35!
>> ZTSTOP	GATHER+10, HD+2

Customize PDF page

Package: Fee Basis

Routine: FBAAMST

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: