Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BCHDL1

Package: IHS RPMS CHR System

Routine: BCHDL1


Information

BCHDL1 ; IHS/TUCSON/LAB - PROCESS CHR RECORD LIST ; [ 06/26/02 5:49 AM ]

Source Information

Source file <BCHDL1.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
IHS VA Utilities 2 $$VAL^XBDIQ1  ^XBGSAVE  
IHS Patient Registration 1 $$UID^AGTXID  
Kernel 1 ($$FMADD,$$FMTE)^XLFDT  
Patient Care Component Reports 1 $$^APCLDF  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS RPMS CHR System 1 BCHDL  

Entry Points

Name Comments DBIA/ICR reference
PS ;
PP ;
END ;
NAME
EOJ ;
TX(DFN) ;create tx record
QU(X) ;quote a string
SCREENS ;
START ;
SINGLE ;
MULTFILE ; information regarding multiple files
COMM ;
LASTVD(P,F) ;PEP - given patient DFN, return pt's last pcc visit date, using
; the data fetcher. Returns date in format specified in F.
FILE ; setup file name(s)
H ;HRN
PRINT ;EP CALLED FROM XBDBQUE
WRITEFX ;
PROC ;
MULT ;
WRITEF ;EP - write out flat file

External References

Name Field # of Occurrence
$$UID^AGTXID H+8
$$^APCLDF LASTVD+6
$$VAL^XBDIQ1 H+5
^XBGSAVE WRITEF+5
$$FMADD^XLFDT START+1
$$FMTE^XLFDT LASTVD+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: MULTFILE+3
Function Call: WRITE
  • Prompt: !?5,"/usr/spool/uucppublic/",BCHFILE(BCHFNUM),?45,"("_BCHFILE(BCHFNUM,"COUNT")_") patients",!
  • Line Location: MULTFILE+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] PROC+1, PROC+2, NAME+4, COMM+1, COMM+3, H+1, H+2
^AUPNVSIT("AC" LASTVD+4
^AUTTCOM - [#9999999.05] COMM+3
^AUTTLOC - [#9999999.06] H+8
^AUTTSITE(1 H+8
^AUTTTRI - [#9999999.03] NAME+5
^BCHSORT - [#90002.41] SCREENS+3, SINGLE+2, MULT+2
^BCHTRPT - [#90002.42] SCREENS+2, SINGLE+4, MULT+4
^DIBT( PS+1
^DPT - [#2] PP+1, PS+1, NAME, H+3, H+4, H+6, H+7
^TMP($J PRINT+4!, PRINT+9*, WRITEFX+2!
^VA(200 - [#200] WRITEF+2
^XTMP("BCHDL" START+1*, PROC+6*, PRINT+7, PRINT+8, PRINT+9, WRITEFX+3!

Label References

Name Line Occurrences
$$TX PROC+6
@( START+4
END START+6
EOJ PS+1, END+1
MULT SCREENS+4
PRINT START+5
PROC PP+1, PS+1
SCREENS PROC+4
SINGLE SCREENS+3
WRITEF PRINT+13
WRITEFX PRINT+15

Naked Globals

Name Field # of Occurrence
^(0 PS+1, NAME
^(1 SINGLE+2, MULT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% TX+1~, COMM+1*
%1 TX+1~, COMM+1*, COMM+2, COMM+3*
A TX+1~
BCHBTH START+2*, PROC+6, PRINT+7, PRINT+8, PRINT+9, WRITEFX+3!
BCHC START+2*, EOJ+2!
>> BCHCHR WRITEF+2
BCHCOUNT EOJ+1!, PRINT+6*, FILE+4, FILE+6*
BCHD START+2*, EOJ+2!
BCHFAC EOJ+2!, PROC+1, PROC+2, H+1, H+8
>> BCHFILE FILE+2*, FILE+3, WRITEF+2
>> BCHFILE( FILE+3*, FILE+4*, MULTFILE+6
BCHFNUM EOJ+2!, PRINT+6*, FILE+1*, FILE+2, FILE+3, FILE+4, FILE+5, MULTFILE+5*, MULTFILE+6*, MULTFILE+8!
, WRITEFX+5!
BCHFOUN EOJ+1!, MULT+1!, MULT+4*, MULT+5*, MULT+6
>> BCHI SCREENS+2*, SCREENS+3, SINGLE+2, SINGLE+4, MULT+2, MULT+4
BCHJD EOJ+1!
BCHJOB START+2*, PROC+6, PRINT+7, PRINT+8, PRINT+9, WRITEFX+3!
BCHMULTI PRINT+6*, FILE+5*, MULTFILE+2, WRITEFX+1, WRITEFX+5!
BCHN MULTFILE+6*, MULTFILE+8!, WRITEFX+5!
BCHPCNT EOJ+1!
BCHPROC START+3*, START+4, EOJ+1!
>> BCHPTVS START+3, PROC+3
BCHR PP+1*, PS+1*, EOJ+1!
BCHRORD EOJ+2!, PRINT+6*, PRINT+7*, WRITEFX+5!
>> BCHRPT SCREENS+2, SINGLE+4, MULT+4
>> BCHSEAT PS+1
BCHSKIP EOJ+1!, PROC+5, SCREENS+1!, SCREENS+2, SINGLE+3*, SINGLE+4*, MULT+1!, MULT+3*, MULT+6*
BCHSPEC SINGLE+1!, SINGLE+4, MULT+1!, MULT+4, MULT+5
BCHTOTAL EOJ+1!, PRINT+6*, PRINT+12*, MULTFILE+4, WRITEFX+1
>> BCHTYPE START+3
BCHX EOJ+1!, SINGLE+1*, MULT+1*, PRINT+6*, PRINT+8*, PRINT+9, WRITEFX+3!
C TX+1~, COMM+1*, COMM+3*, H+8
CTY TX+1~, H+4*, H+8
D EOJ+3!
D0 EOJ+3!
DFN PP+1*, PS+1*, EOJ+3!, PROC+1, PROC+2, PROC+3, PROC+6, TX~, NAME, NAME+4
, COMM+1, COMM+3, H+1, H+2, H+3, H+4, H+5, H+6, H+7, H+8
DI EOJ+3!
DIC EOJ+3!
DOB TX+1~, NAME*, NAME+3*, H+8
DQ EOJ+3!
DT START+1
ERR LASTVD+5~, LASTVD+6*
F LASTVD~, LASTVD+3*, LASTVD+11
FN TX+1~, NAME+1*, H+8
H TX+1~, H+1*, H+8
HPH TX+1~, H+7*, H+8
IOF MULTFILE+3
J EOJ+3!
LN TX+1~, NAME+1*, H+8
LVD LASTVD+5~, LASTVD+7
LVD(1 LASTVD+7, LASTVD+8
>> M H+2*, H+8
MN TX+1~, NAME+1*, H+8
N TX+1~, NAME*, NAME+1
P LASTVD~, LASTVD+2, LASTVD+4, LASTVD+6
R TX+1~, H+8*, H+9
S TX+1~, NAME*, H+8
SA TX+1~, H+3*, H+8
SSN TX+1~, NAME*, H+8
ST TX+1~, H+5*, H+8
T TX+1~, NAME+4*, NAME+5*, H+8
U START+1, PP+1, PS+1, PROC+2, SCREENS+3, NAME, NAME+4, NAME+5, COMM+3, H+1
, H+2, H+3, H+4, H+6, H+7, H+8, LASTVD+8, WRITEF+2
X SINGLE+1!*, SINGLE+3, SINGLE+4, MULT+1!*, MULT+5, QU~, QU+1*, QU+2
X( MULT+4
X("" MULT+3
>> XBE WRITEF+3*
XBF WRITEF+3*, WRITEFX+4!
XBFLG EOJ+3!
XBFLT WRITEF+3*, WRITEFX+4!
XBFN WRITEF+2*, WRITEFX+4!
XBGL WRITEF+1*, WRITEFX+4!
XBMED WRITEF+2*, WRITEFX+4!
XBQ WRITEF+3*, WRITEFX+4!
XBTLE WRITEF+2*, WRITEFX+4!
Y EOJ+3!, MULT+4*, LASTVD+5~, LASTVD+8*, LASTVD+11
ZIP TX+1~, H+6*, H+8
>> ZTQUEUED MULTFILE+1, MULTFILE+4, MULTFILE+7, WRITEF+4, WRITEFX+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All