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 |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BPCBHDSP

Package: Patient Chart

Routine: BPCBHDSP


Information

BPCBHDSP ; IHS/OIT/MJL - behavioral health display for GUI ; [ 11/14/2007 10:40 AM ]

Source Information

Source file <BPCBHDSP.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
IHS VA Utilities 2 ^XBKSET  GUIR^XBLM  
Mental Health Social Services 2 EP2^AMHLEFP2  EN^AMHVDSG1  
Text Integration Utility 2 $$CANDO^TIULP  EXTRACT^TIULQ  
Kernel 1 ^%ZTLOAD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Chart 1 BPC15E  

Entry Points

Name Comments DBIA/ICR reference
TESTREC ;
INTAKE(BGUARRAY,BPCIEN) ;EP called to return an INTAKE form in an array
ENCFORM(AMHARRY,AMHR,AMHEFT) ;EP called to get encounter form in array
TSK ;
SUICDSP(BGUARRAY,BPCIEN) ;EP CALL FROM REMOTE PROC: BPCBH SUICIDE FORM DSP
TIUN(BGUARRAY,BPCIEN) ;EP called to return TIU notes in an array
S1 ;
TSKITKF ; Task Intake Form
RECDISP(AMHARRY,AMHR) ;EP - called to display one BH record
TESTSUIC ;
TESTENC ;
ENSFDSP ;
S(Y,F,C,T) ;set up array
KILL ;

External References

Name Field # of Occurrence
^%ZTLOAD ENSFDSP+11, INTAKE+8
EP2^AMHLEFP2 ENCFORM+10
EN^AMHVDSG1 RECDISP+6
$$CANDO^TIULP TIUN+8
EXTRACT^TIULQ TIUN+12
^XBKSET ENSFDSP+7, TSK+1, TSKITKF+1, INTAKE+6
GUIR^XBLM TSK+3, TSKITKF+3

Used in RPC

RPC Name Call Tags
BPCBH RECORD DISPLAY RECDISP
BPCBH ENCOUNTER FORM ENCFORM
BPCBH SUICIDE FORM DSP SUICDSP
BPCBH INTAKE FORM INTAKE
BPCBH TIU NOTES TIUN

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMHREC - [#9002011] TIUN+1, TIUN+7
^TMP("AMHOENPS" TIUN+10, TIUN+13, TIUN+14!
^TMP("AMHS" ENCFORM+7!, ENCFORM+11, ENCFORM+12*!, S1+1*, S1+2*
^TMP("AMHVDSG" RECDISP+5!, RECDISP+7*!, RECDISP+8*
^XTMP("BPCIF" TSKITKF+4*, INTAKE+4!
^XTMP("BPCIFRUN" TSKITKF+2*, TSKITKF+5*, INTAKE+5*, INTAKE+9
^XTMP("BPCSF" ENSFDSP+5!, TSK+4*
^XTMP("BPCSFRUN" ENSFDSP+6*, ENSFDSP+12, TSK+2*, TSK+5*

Label References

Name Line Occurrences
ENCFORM TESTENC+1
KILL ENSFDSP+13, INTAKE+10
RECDISP TESTREC+1
S TIUN+5, TIUN+8, TIUN+15, TIUN+16, TIUN+17, TIUN+18, TIUN+19, TIUN+21, TIUN+22
S1 S+5, S+7, S+10
SUICDSP TESTSUIC+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% S+1~, S+8*, S+9*, S1+1*, S1+2
AMHAR TIUN+6!
AMHARRY ENCFORM~, ENCFORM+6*, RECDISP~, RECDISP+4*, RECDISP+6
>> AMHDOC TIUN+7*, TIUN+8, TIUN+12, TIUN+13
AMHEFT ENCFORM~, ENCFORM+8*, ENCFORM+9
AMHERR TIUN+6!, TIUN+12
>> AMHGBL TIUN+10*, TIUN+11, TIUN+12
>> AMHHLF TIUN+10*
>> AMHPG INTAKE+7*
AMHR ENCFORM~, ENCFORM+10, RECDISP~, RECDISP+6, TIUN+3*, TIUN+7
AMHSF ENSFDSP+4*, KILL+1!
AMHTIU TIUN+6!, TIUN+8!, TIUN+13*, TIUN+24!
AMHTIU( TIUN+15, TIUN+17
AMHTIU("TEXT" TIUN+19
AMHTIU(1202 TIUN+16
AMHTIU(1205 TIUN+18
AMHTIU(1501 TIUN+20, TIUN+22
AMHTIU(1502 TIUN+17
AMHTIU(1503 TIUN+21
>> AMHX TIUN+19*
BGUARRAY SUICDSP~, ENSFDSP+3*, INTAKE~, INTAKE+3*, TIUN~, TIUN+2*, TIUN+4
BPCCTR KILL+1!, ENCFORM+11~*, ENCFORM+12, RECDISP+7~*, RECDISP+8
BPCGUI ENSFDSP+1*, KILL+1!, INTAKE+1*
BPCIEN SUICDSP~, ENSFDSP+4, INTAKE~, INTAKE+7, TIUN~, TIUN+1, TIUN+3
C S~, S+7
>> DFN INTAKE+7*
DIC KILL+1!
DUZ TIUN+8
F S~, S+2*, S+5*
>> I ENSFDSP+12*, INTAKE+9*
IOM TIUN+10
JOB ENSFDSP+1*, ENSFDSP+5, ENSFDSP+6, TSK+2, TSK+4, TSK+5, TSKITKF+2, TSKITKF+4, TSKITKF+5, KILL+1!
, INTAKE+1*, INTAKE+4, INTAKE+5
>> L S+7*
>> RETVAL TESTREC+1, TESTENC+1, TESTSUIC+1
T S~, S+3*, S+7*, S+8, S+9
U TIUN+1, TIUN+7, S1+1
X KILL+1!, ENCFORM+11~*, RECDISP+3~, RECDISP+6!, RECDISP+7*, TIUN+5*, TIUN+8*, S+5*, S+6*, S+8*
, S+9*, S1+2
>> XWBWRAP ENSFDSP+1*, INTAKE+1*
Y KILL+1!, S~, S+6, S+7, S+9
ZTDESC ENSFDSP+11*, KILL+1!, INTAKE+8*
ZTDTH ENSFDSP+11*, KILL+1!, INTAKE+8*
ZTIO ENSFDSP+2*, ENSFDSP+11*, KILL+1!, INTAKE+2*, INTAKE+8*
>> ZTQUEUED ENSFDSP+2*, INTAKE+2*
ZTRTN ENSFDSP+11*, KILL+1!, INTAKE+8*
ZTSAVE KILL+1!
ZTSAVE("AMHPG" INTAKE+8*
ZTSAVE("AMHSF" ENSFDSP+11*
ZTSAVE("DFN" INTAKE+8*
ZTSAVE("JOB" ENSFDSP+11*, INTAKE+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Local Variables |  All