Routine: FBUCLET1

Package	Total	Call Graph
Fee Basis	6	($$SSN,$$SSNL4)^FBAAUTL EDITL^FBUCED AUTHPR^FBUCLET2 ($$ORDER,$$PROG,$$VEN,$$VET)^FBUCUTL ($$LETTER,$$PDATE,ADDRESS,TXT)^FBUCUTL2 $$EXPIRE^FBUCUTL8
Kernel	4	(T0,T1)^%ZOSV $$S^%ZTLOAD $$FMTE^XLFDT $$NAMEFMT^XLFNAME
VA FileMan	3	$$GET1^DIQ ^DIWP ^DIWW

Package	Total	Caller Graph
Fee Basis	3	FBUCLET0 FBUCLET2 FBUCUTL2

Entry Points

Name	Comments	DBIA/ICR reference
PRINT	;print letter, don't update if variable fbnoup exists
GETNAME(FBIEN,FBFILE,FBFMT,FBFLAG)	;
PAGE	;new page
HED	;header to print after address and on each new page
CCADDR	; print CC address at bottom of page ; advance to bottom of page

External References

Name	Field # of Occurrence
T0^%ZOSV	PRINT+110
T1^%ZOSV	PRINT+113
$$S^%ZTLOAD	PRINT+20
$$GET1^DIQ	PRINT+36
^DIWP	PRINT+102
^DIWW	PRINT+104
$$SSN^FBAAUTL	PRINT+54, PAGE+8
$$SSNL4^FBAAUTL	PRINT+54, PAGE+8
EDITL^FBUCED	PRINT+112
AUTHPR^FBUCLET2	PRINT+60
$$ORDER^FBUCUTL	PRINT+20
$$PROG^FBUCUTL	PRINT+22
$$VEN^FBUCUTL	PRINT+23, PRINT+24
$$VET^FBUCUTL	PRINT+23
$$LETTER^FBUCUTL2	PRINT+35
$$PDATE^FBUCUTL2	PRINT+51
ADDRESS^FBUCUTL2	PRINT+21
TXT^FBUCUTL2	PRINT+56, PRINT+58, PRINT+62, PRINT+73, PRINT+81, PRINT+84, PRINT+85, PRINT+105
$$EXPIRE^FBUCUTL8	PRINT+111
$$FMTE^XLFDT	PRINT+33, PRINT+34
$$NAMEFMT^XLFNAME	GETNAME+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Condition for execution: FBFF&(FBFF>1) Line Location: PRINT+47
Function Call: WRITE	Prompt: ! Line Location: PRINT+47
Function Call: WRITE	Prompt: !?(IOM-$L(FBX)/2),FBX Line Location: PRINT+49
Function Call: WRITE	Prompt: ! Line Location: PRINT+50
Function Call: WRITE	Prompt: ?66,FBSTANUM,"/",FBMCODE Line Location: PRINT+52
Function Call: WRITE	Prompt: !?4,FBADD(FBI) Line Location: PRINT+54
Function Call: WRITE	Prompt: ?50,$$SSNL4^FBAAUTL($$SSN^FBAAUTL(+$P(FBUCA,U,4))) Line Location: PRINT+54
Function Call: WRITE	Prompt: ! Line Location: PRINT+56
Function Call: WRITE	Prompt: !?8,"Reason(s) for not approving "_$S($P(FBUCA,U,11)=4:"entire ",1:"")_"claim:" Line Location: PRINT+61
Function Call: WRITE	Prompt: ! Line Location: PRINT+62
Function Call: WRITE	Prompt: ! Line Location: PRINT+83
Function Call: WRITE	Prompt: ?8,FBX,! Line Location: PRINT+83
Function Call: WRITE	Prompt: ! Line Location: PRINT+85
Function Call: WRITE	Prompt: @IOF,!!!!!!! Line Location: PAGE+3
Function Call: WRITE	Prompt: ?66,FBSTANUM,"/",FBMCODE Line Location: PAGE+6
Function Call: WRITE	Prompt: !!!!?8,"REGARDING:",?20,FBRE,?38,FBNAM Line Location: HED+1
Function Call: WRITE	Prompt: !?20,"VENDOR:",?38,FBNAM1 Line Location: HED+1
Function Call: WRITE	Prompt: !?20,"FEE PROGRAM:",?38,FBPROG Line Location: HED+2
Function Call: WRITE	Prompt: !?20,"EPISODE OF CARE:",?38,$P(FBEP,U) Line Location: HED+3
Function Call: WRITE	Prompt: " to ",$P(FBEP,U,2) Condition for execution: $P(FBEP,U,2)]"" Line Location: HED+3
Function Call: WRITE	Prompt: !! Line Location: HED+4
Function Call: WRITE	Prompt: ! Line Location: CCADDR+3
Function Call: WRITE	Prompt: ! Line Location: CCADDR+6
Function Call: WRITE	Prompt: " CC:" Condition for execution: FBI=1 Line Location: CCADDR+6
Function Call: WRITE	Prompt: ?4,FBADDCC(FBI) Line Location: CCADDR+6

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^FBAA(161.4 - [#161.4]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^FB(162.91 - [#162.91]	PRINT+76
^FB(162.93 - [#162.93]	PRINT+83, PRINT+89, PRINT+94, PRINT+99, PRINT+100
^FB583 - [#162.7]	PRINT+61, PRINT+62, PRINT+69
^FBAA(162.8 - [#162.8]	PRINT+82, PRINT+87

Label References

Name	Line Occurrences
$$GETNAME	PRINT+29, PRINT+53, PAGE+7
CCADDR	PRINT+107, PAGE+2
HED	PRINT+55
PAGE	PRINT+56, PRINT+58, PRINT+61, PRINT+62, PRINT+70, PRINT+78, PRINT+82, PRINT+85, PRINT+91, PRINT+101 , PRINT+103

Naked Globals

Name	Field # of Occurrence
^(	PRINT+62

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIWF	PRINT+39~, PRINT+56, PRINT+57, PRINT+58, PRINT+62~, PRINT+66~, PRINT+72, PRINT+73, PRINT+77~, PRINT+80* , PRINT+81, PRINT+84, PRINT+85*, PRINT+105
DIWL	PRINT+39~, PRINT+56, PRINT+57, PRINT+58, PRINT+62, PRINT+66~, PRINT+72, PRINT+73, PRINT+77~, PRINT+80 , PRINT+81, PRINT+84, PRINT+85*, PRINT+105
DT	PRINT+51, PRINT+111, PRINT+112
FBADD	PRINT+18~
FBADD(	PRINT+54
FBADDCC	PRINT+18~
FBADDCC(	CCADDR+6
FBAUTH	PRINT+18~, PRINT+34*
FBC	PRINT+18~, PRINT+38*
FBCC	PRINT+19~, PRINT+42, PRINT+56, PRINT+58, PRINT+61, PRINT+62, PRINT+70, PRINT+73, PRINT+78, PRINT+81 , PRINT+82, PRINT+84, PRINT+85, PRINT+101, PRINT+103, PRINT+105, PRINT+107, PAGE+2, CCADDR+8
FBCCI	PRINT+19~, PRINT+46*, PRINT+56, PRINT+58, PRINT+61, PRINT+62, PRINT+70, PRINT+73, PRINT+78, PRINT+81 , PRINT+82, PRINT+84, PRINT+85, PRINT+101, PRINT+103, PRINT+105, CCADDR+3
>> FBCOPIES	PRINT+37*, PRINT+38
FBCT	PRINT+49~, PRINT+50, PRINT+54*
>> FBDA	PRINT+20, PRINT+61, PRINT+62, PRINT+69, PRINT+73, PRINT+82, PRINT+87, PRINT+111, PRINT+112
FBDL1	PRINT+39~
FBEP	PRINT+18~, PRINT+33*, HED+3
FBEXP	PRINT+39~, PRINT+111*, PRINT+112
>> FBFF	PRINT+47*
FBFILE	GETNAME~, GETNAME+2, GETNAME+4
FBFLAG	GETNAME~, GETNAME+3*, GETNAME+5
FBFMT	GETNAME~, GETNAME+3*, GETNAME+5
FBI	PRINT+39~, PRINT+49~, PRINT+50, PRINT+54, PRINT+62~, PRINT+82, PRINT+87, PRINT+98~, PRINT+99, PRINT+100 , CCADDR+2~, CCADDR+3, CCADDR+5, CCADDR+6
FBIEN	GETNAME~, GETNAME+2, GETNAME+4
FBLETDT	PRINT+18~, PRINT+20*
FBLIEN	PRINT+18~, PRINT+35*, PRINT+38, PRINT+56, PRINT+85
FBMCODE	PRINT+18~, PRINT+36*, PRINT+52, PAGE+6
FBN	PRINT+66~, PRINT+68*, PRINT+69, PRINT+73
FBNAM	PRINT+18~, PRINT+23, PRINT+28, PRINT+29, HED+1
FBNAM1	PRINT+18~, PRINT+24*, HED+1
FBNAMES	GETNAME+1~, GETNAME+5*, GETNAME+6
FBNAMES("FIELD"	GETNAME+4*
FBNAMES("FILE"	GETNAME+4*
FBNAMES("IENS"	GETNAME+4*
>> FBNOUP	PRINT+109
>> FBORDER	PRINT+20*, PRINT+35, PRINT+42, PRINT+58, PRINT+65, PRINT+68, PRINT+82, PRINT+85, PRINT+87, PRINT+111
FBPROG	PRINT+19~, PRINT+22*, HED+2
FBPS	PRINT+88~, PRINT+91*, PAGE+5
FBRE	PRINT+19~, PRINT+32*, HED+1
>> FBSADD(	PRINT+49
>> FBSTANUM	PRINT+52, PAGE+6
FBSUBMIT	PRINT+19~, PRINT+22*, PRINT+23, PRINT+24, PRINT+28, PRINT+32
FBTAMT	PRINT+19~, PRINT+112
FBTXT	PRINT+98~, PRINT+100*, PRINT+104
>> FBUC	PRINT+37, PRINT+46, PRINT+48, PRINT+52, PAGE+6
>> FBUCA	PRINT+21, PRINT+22, PRINT+23, PRINT+24, PRINT+29, PRINT+33, PRINT+34, PRINT+35, PRINT+53, PRINT+54 , PRINT+58, PRINT+60, PRINT+61, PRINT+76, PRINT+81, PRINT+111, PAGE+7, PAGE+8
FBX	PRINT+49~, PRINT+83~, PRINT+88~, PRINT+94*, PRINT+95
FBZ	PRINT+62~, PRINT+82, PRINT+83, PRINT+84, PRINT+87*, PRINT+89, PRINT+94, PRINT+95, PRINT+99, PRINT+100 , PRINT+105
IOF	PRINT+47, PAGE+3
IOM	PRINT+49
IOSL	PRINT+56, PRINT+58, PRINT+61, PRINT+62, PRINT+70, PRINT+78, PRINT+82, PRINT+85, PRINT+101, PRINT+103 , CCADDR+3
U	PRINT+22, PRINT+23, PRINT+24, PRINT+29, PRINT+33, PRINT+34, PRINT+35, PRINT+37, PRINT+46, PRINT+48 , PRINT+52, PRINT+53, PRINT+54, PRINT+58, PRINT+60, PRINT+61, PRINT+76, PRINT+81, PRINT+82, PRINT+83 , PRINT+84, PRINT+87, PRINT+89, PRINT+94, PRINT+95, PRINT+99, PRINT+100, PRINT+105, PAGE+6, PAGE+7 , PAGE+8, HED+3
>> X	PRINT+100*
>> XRT0	PRINT+113
>> XRTL	PRINT+110
>> XRTN	PRINT+113*
>> ZTSTOP	PRINT+20*

Marked Items

Name	Field # of Occurrence
$T(	PRINT+113

Customize PDF page

Package: Fee Basis

Routine: FBUCLET1

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items