Routine: HBHCTXT

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

HBHCTXT ; LR VAMC(IRMS)/MJT-HBHC MFH Rate Paid delimited text file; user selects: pt or MFH; active only, indiv, or all pts or MFHs; current rate paid only or entire rate paid history, entry: TXT called by ^HBHCUTL5; calls ^HBHCUTL5;Dec 2007

Source Information

Source file <HBHCTXT.m>

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
Kernel	2	^%ZIS ^%ZTLOAD
Hospital Based Home Care	1	(EN,EXIT,MFH,PRTMFH,PRTPT,PT)^HBHCUTL5

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: 2

Package	Total	Caller Graph
Hospital Based Home Care	2	HBHCTXT HBHCUTL5

Entry Points

Name	Comments	DBIA/ICR reference
DQ	; De-queue
TXT	; Output to delimited text file format

External References

Name	Field # of Occurrence
^%ZIS	HBHCTXT+6
^%ZTLOAD	HBHCTXT+7
EN^HBHCUTL5	HBHCTXT+5
EXIT^HBHCUTL5	HBHCTXT+6, HBHCTXT+7, DQ+7
MFH^HBHCUTL5	DQ+5
PRTMFH^HBHCUTL5	DQ+6
PRTPT^HBHCUTL5	DQ+6
PT^HBHCUTL5	DQ+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: "Patient Name"_HBHCDLMT_"Last Four"_HBHCDLMT_"Rate Paid"_HBHCDLMT_"Start Date" Line Location: DQ+3
Function Call: WRITE	Prompt: HBHCDLMT_"Medical Foster Home (MFH) Name" Condition for execution: HBHCXREF="AK" Line Location: DQ+3
Function Call: WRITE	Prompt: !,HBHCM_HBHCDLMT_$P(HBHCINFO,U,2)_HBHCDLMT_$P(HBHCINFO,U)_HBHCDLMT_$E(HBHCJ,4,5)_"-"_$E(HBHCJ,6,7)_"-"_$S($E(HBHCJ)=3:20,1:19)_$E(HBHCJ,2,3) Line Location: TXT+1
Function Call: WRITE	Prompt: HBHCDLMT_HBHCL Condition for execution: HBHCXREF="AK" Line Location: TXT+1
Routine Call	%ZIS Line Location: HBHCTXT+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP("HBHC"	DQ+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	HBHCTXT+6*
>> HBHCCC	HBHCTXT+6*
>> HBHCCNT	HBHCTXT+3*
>> HBHCDLMT	HBHCTXT+3*, DQ+3, TXT+1
>> HBHCINFO	TXT+1
>> HBHCJ	TXT+1
>> HBHCL	TXT+1
>> HBHCM	TXT+1
>> HBHCTXT	HBHCTXT+3*
>> HBHCXREF	DQ+3, DQ+4, DQ+5, DQ+6, TXT+1
IO	DQ+1
IO("Q"	HBHCTXT+7
IOP	HBHCTXT+6!
>> POP	HBHCTXT+6
U	HBHCTXT+3, TXT+1
>> ZTDESC	HBHCTXT+7*
ZTIO	HBHCTXT+6!
>> ZTRTN	HBHCTXT+7*
ZTSAVE	HBHCTXT+6!
ZTSAVE("HBHC*"	HBHCTXT+7*