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 |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AMHSC1

Package: Mental Health Social Services

Routine: AMHSC1


Information

AMHSC1 ; IHS/CMI/LAB - SPECIAL X-REF ROUTINES - ;

Source Information

Source file <AMHSC1.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 ^%DT  C^%DTC  DT^DILF  
GUI Generic Tools 1 FIELDS^BGULIST  

Entry Points

Name Comments DBIA/ICR reference
PAT ; Get PATIENT Data
; Set BGUCRFS1 to the cross-reference to be used for lookup.
; If the file is not the same as the primary file, prefix BGUCRFS1
; with the file number or name followed by a semicolan and then the
; cross-reference node.
PCCMED1 ;
MIC ; Get V MICROBIOLOGY data
MED2 ;
MED1 ;
PCCMED2 ;SORT BY INVERSE VISIT DATE
RAD1 ;
MEAS ;
EDP1 ;
POV ; Get purpose of visits
RXMED1 ;
MEDP
RXMED ; Get PRESCRIPTION RX DATA
MEAS1 ;
RAD ; Get RADIOLOGY PCC data
MEDP2 ;
MEDP1 ;
MED
PCCMED ; Get PRESCRIPTION PCC DATA
MIC2 ;SORT BY PARENT
MIC1 ;
EDP ; Get EDUCATION PROTOCOLS
POV1 ;

External References

Name Field # of Occurrence
^%DT MED2+8, MEDP2+8, PAT+10
C^%DTC MED2+7, MEDP2+7
FIELDS^BGULIST MED1+27, POV1+20, MEAS1+21, EDP1+20, RAD1+20, MIC1+22, PCCMED1+22, MEDP1+27, RXMED1+22
DT^DILF MED1+4, MED1+7, MED1+8, MED1+11, POV1+4, POV1+7, POV1+8, POV1+11, MEAS1+4, MEAS1+7
, MEAS1+8, MEAS1+11, EDP1+4, EDP1+7, EDP1+8, EDP1+11, RAD1+4, RAD1+7, RAD1+8, RAD1+11
, MIC1+4, MIC1+7, MIC1+8, MIC1+11, PCCMED1+4, PCCMED1+7, PCCMED1+8, PCCMED1+11, MEDP1+4, MEDP1+7
, MEDP1+8, MEDP1+11, RXMED1+4, RXMED1+7, RXMED1+8, RXMED1+11

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVMED - [#9000010.14] PCCMED2+2
^AUPNVMED("AD" MED1+19, PCCMED1+19, MEDP1+19
^AUPNVMIC - [#9000010.25] MIC2+1, MIC2+2, MIC2+3, MIC2+4
^AUPNVMIC("AD" MIC1+19
^AUPNVMSR("AD" MEAS1+20
^AUPNVPED("AD" EDP1+19
^AUPNVPOV("AD" POV1+19
^AUPNVRAD("AD" RAD1+19
^AUPNVSIT - [#9000010] MED1+16, POV1+16, MEAS1+16, EDP1+16, RAD1+16, MIC1+16, PCCMED1+16, MEDP1+16
^AUPNVSIT("AA" MED1+13, MED1+15, POV1+13, POV1+15, MEAS1+13, MEAS1+15, EDP1+13, EDP1+15, RAD1+13, RAD1+15
, MIC1+13, MIC1+15, PCCMED1+13, PCCMED1+15, MEDP1+13, MEDP1+15
^FJBGU( RXMED1+19*
^FJBGU(1 RXMED1+13*, RXMED1+16*
^LAB(61.2 - [#61.2] MIC2+3
^LAB(62.06 - [#62.06] MIC2+4
^PS(55 - [#55] RXMED1+14, RXMED1+15
^PSDRUG - [#50] PCCMED2+2
^PSRX - [#52] MED1+25, MED2+2, MED2+3, MEDP1+25, MEDP2+2, MEDP2+3, RXMED1+17, RXMED1+18
^PSRX("APCC" MED1+21, MED1+22, MED1+23, MEDP1+21, MEDP1+22, MEDP1+23
^TMP($J MIC+2!, MIC2+5*, PCCMED+2!, PCCMED2+3*, RXMED+2!

Label References

Name Line Occurrences
EDP1 EDP+10
MEAS1 MEAS+9
MED1 MED+8
MEDP1 MEDP+8
MIC1 MIC+11
MIC2 MIC1+20
PCCMED1 PCCMED+11
PCCMED2 PCCMED1+20
POV1 POV+10
RAD1 RAD+10
RXMED1 RXMED+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AMHACCN MIC2+2*, MIC2+5
>> AMHANTIB MIC2+4*, MIC2+5
>> AMHC MED1+12*, MED1+13, MED1+15, MED1+18*, POV1+12*, POV1+13, POV1+15, POV1+18*, MEAS1+12*, MEAS1+13
, MEAS1+15, MEAS1+19*, EDP1+12*, EDP1+13, EDP1+15, EDP1+18*, RAD1+12*, RAD1+13, RAD1+15, RAD1+18*
, MIC1+12*, MIC1+13, MIC1+15, MIC1+18*, PCCMED1+12*, PCCMED1+13, PCCMED1+15, PCCMED1+18*, MEDP1+12*, MEDP1+13
, MEDP1+15, MEDP1+18*, RXMED1+12*, RXMED1+14
>> AMHCK MED1+23*, MED1+24, MEDP1+23*, MEDP1+24
>> AMHCKD MED1+16*, MED1+17, POV1+16*, POV1+17, MEAS1+16*, MEAS1+17, EDP1+16*, EDP1+17, RAD1+16*, RAD1+17
, MIC1+16*, MIC1+17, PCCMED1+16*, PCCMED1+17, PCCMED2+1, MEDP1+16*, MEDP1+17, RXMED1+20*, RXMED1+21
>> AMHDTA MED1+16*, POV1+16*, MEAS1+16*, EDP1+16*, RAD1+16*, MIC1+16*, PCCMED1+16*, MEDP1+16*
>> AMHEDAT MED1+8, MED1+9, MED1+11, MED1+17, POV1+8, POV1+9, POV1+11, POV1+17, MEAS1+8, MEAS1+9
, MEAS1+11, MEAS1+17, EDP1+8, EDP1+9, EDP1+11, EDP1+17, RAD1+8, RAD1+9, RAD1+11, RAD1+17
, MIC1+8, MIC1+9, MIC1+11, MIC1+17, PCCMED1+8, PCCMED1+9, PCCMED1+11, PCCMED1+17, MEDP1+8, MEDP1+9
, MEDP1+11, MEDP1+17, RXMED1+8, RXMED1+9, RXMED1+11, RXMED1+21
>> AMHEDATE MED+2*, MED1+2*, MED1+8, MED1+10*, MED1+11, POV+4*, POV1+2*, POV1+8, POV1+10*, POV1+11
, MEAS+3*, MEAS1+2*, MEAS1+8, MEAS1+10*, MEAS1+11, EDP+4*, EDP1+2*, EDP1+8, EDP1+10*, EDP1+11
, RAD+4*, RAD1+2*, RAD1+8, RAD1+10*, RAD1+11, MIC+5*, MIC1+2*, MIC1+8, MIC1+10*, MIC1+11
, PCCMED+5*, PCCMED1+2*, PCCMED1+8, PCCMED1+10*, PCCMED1+11, MEDP+2*, MEDP1+2*, MEDP1+8, MEDP1+10*, MEDP1+11
, RXMED+5*, RXMED1+2*, RXMED1+8, RXMED1+10*, RXMED1+11
>> AMHIDT PCCMED2+1*, PCCMED2+3
>> AMHJ MIC1+21*, MIC1+22, PCCMED1+21*, PCCMED1+22
>> AMHLBONL MED+3*, MED1+3*, POV+5*, POV1+3*, MEAS+4*, MEAS1+3*, EDP+5*, EDP1+3*, RAD+5*, RAD1+3*
, MIC+6*, MIC1+3*, PCCMED+6*, PCCMED1+3*, MEDP+3*, MEDP1+3*, RXMED+6*, RXMED1+3*
>> AMHLIM MED1+12*, MED1+13, MED1+15, POV1+12*, POV1+13, POV1+15, MEAS1+12*, MEAS1+13, MEAS1+15, EDP1+12*
, EDP1+13, EDP1+15, RAD1+12*, RAD1+13, RAD1+15, MIC1+12*, MIC1+13, MIC1+15, PCCMED1+12*, PCCMED1+13
, PCCMED1+15, MEDP1+12*, MEDP1+13, MEDP1+15, RXMED1+12*, RXMED1+14
>> AMHMED PCCMED2+2*, PCCMED2+3
>> AMHMI MIC1+21*, MIC1+22
>> AMHMVIEN MEAS1+19*, MEAS1+20*, MEAS1+21
>> AMHORGSM MIC2+3*, MIC2+5
>> AMHPARNT MIC2+1*, MIC2+5
>> AMHPIEN MED+1*, MED+6, MED1+13, MED1+15, POV+3*, POV+8, POV1+13, POV1+15, MEAS+2*, MEAS+7
, MEAS1+13, MEAS1+15, EDP+3*, EDP+8, EDP1+13, EDP1+15, RAD+3*, RAD+8, RAD1+13, RAD1+15
, MIC+4*, MIC+9, MIC1+13, MIC1+15, PCCMED+4*, PCCMED+9, PCCMED1+13, PCCMED1+15, MEDP+1*, MEDP+6
, MEDP1+13, MEDP1+15, RXMED+4*, RXMED+9, RXMED1+13, RXMED1+14, RXMED1+15
>> AMHPMED PCCMED1+21*, PCCMED1+22
>> AMHPMIEN MED1+18*, MED1+19*, MED1+21, MED1+22, MED1+23, MED1+27, MEDP1+18*, MEDP1+19*, MEDP1+21, MEDP1+22
, MEDP1+23, MEDP1+27
>> AMHPVIEN POV1+18*, POV1+19*, POV1+20, EDP1+18*, EDP1+19*, EDP1+20, RAD1+18*, RAD1+19*, RAD1+20, MIC1+18*
, MIC1+19*, MIC1+22*, MIC2+1, MIC2+2, MIC2+3, MIC2+4, MIC2+5, PCCMED1+18*, PCCMED1+19*, PCCMED1+22*
, PCCMED2+2, PCCMED2+3
>> AMHQ MIC1+21*, MIC1+22, PCCMED1+21*, PCCMED1+22
>> AMHRX0 MED2+2*, MED2+4, MEDP2+2*, MEDP2+4, RXMED1+17*
>> AMHRX2 MED2+3*, MEDP2+3*, RXMED1+18*, RXMED1+19, RXMED1+20
>> AMHRXIEN MED1+22*, MED1+23, MED1+25, MED2+2, MED2+3, MEDP1+22*, MEDP1+23, MEDP1+25, MEDP2+2, MEDP2+3
>> AMHSDAT MED1+4, MED1+5, MED1+7, MED1+17, POV1+4, POV1+5, POV1+7, POV1+17, MEAS1+4, MEAS1+5
, MEAS1+7, MEAS1+17, EDP1+4, EDP1+5, EDP1+7, EDP1+17, RAD1+4, RAD1+5, RAD1+7, RAD1+17
, MIC1+4, MIC1+5, MIC1+7, MIC1+17, PCCMED1+4, PCCMED1+5, PCCMED1+7, PCCMED1+17, MEDP1+4, MEDP1+5
, MEDP1+7, MEDP1+17, RXMED1+4, RXMED1+5, RXMED1+7, RXMED1+21
>> AMHSDATE MED+2*, MED1+1*, MED1+4, MED1+6*, MED1+7, POV+4*, POV1+1*, POV1+4, POV1+6*, POV1+7
, MEAS+3*, MEAS1+1*, MEAS1+4, MEAS1+6*, MEAS1+7, EDP+4*, EDP1+1*, EDP1+4, EDP1+6*, EDP1+7
, RAD+4*, RAD1+1*, RAD1+4, RAD1+6*, RAD1+7, MIC+5*, MIC1+1*, MIC1+4, MIC1+6*, MIC1+7
, PCCMED+5*, PCCMED1+1*, PCCMED1+4, PCCMED1+6*, PCCMED1+7, MEDP+2*, MEDP1+1*, MEDP1+4, MEDP1+6*, MEDP1+7
, RXMED+5*, RXMED1+1*, RXMED1+4, RXMED1+6*, RXMED1+7
>> AMHSTAT MED1+20*, MED1+24*, MED1+25*, MED1+27, MED2+2*, MED2+8*, MEDP1+20*, MEDP1+24*, MEDP1+25*, MEDP1+27
, MEDP2+2*, MEDP2+8*
>> AMHU MIC1+21*, MIC1+22, PCCMED1+21*, PCCMED1+22
>> AMHVIEN MED1+14*, MED1+15*, MED1+16, MED1+19, POV1+14*, POV1+15*, POV1+16, POV1+19, MEAS1+14*, MEAS1+15*
, MEAS1+16, MEAS1+20, EDP1+14*, EDP1+15*, EDP1+16, EDP1+19, RAD1+14*, RAD1+15*, RAD1+16, RAD1+19
, MIC1+14*, MIC1+15*, MIC1+16, MIC1+19, MIC2+5, PCCMED1+14*, PCCMED1+15*, PCCMED1+16, PCCMED1+19, PCCMED2+3
, MEDP1+14*, MEDP1+15*, MEDP1+16, MEDP1+19, RXMED1+15*, RXMED1+16, RXMED1+17, RXMED1+18, RXMED1+19, RXMED1+22
>> AMHVWNO MED+3*, MED+4, MED1+1*, MED1+12, POV+5*, POV+6, POV1+1*, POV1+12, MEAS+4*, MEAS+5
, MEAS1+1*, MEAS1+12, EDP+5*, EDP+6, EDP1+1*, EDP1+12, RAD+5*, RAD+6, RAD1+1*, RAD1+12
, MIC+6*, MIC+7, MIC1+1*, MIC1+12, PCCMED+6*, PCCMED+7, PCCMED1+1*, PCCMED1+12, MEDP+3*, MEDP+4
, MEDP1+1*, MEDP1+12, RXMED+6*, RXMED+7, RXMED1+1*, RXMED1+12
>> AMHVWOPT MED+4*, MED+7*, MED1+2*, MED1+12, POV+6*, POV+9*, POV1+2*, POV1+12, MEAS+5*, MEAS+8*
, MEAS1+2*, MEAS1+12, EDP+6*, EDP+9*, EDP1+2*, EDP1+12, RAD+6*, RAD+9*, RAD1+2*, RAD1+12
, MIC+7*, MIC+10*, MIC1+2*, MIC1+12, PCCMED+7*, PCCMED+10*, PCCMED1+2*, PCCMED1+12, MEDP+4*, MEDP+7*
, MEDP1+2*, MEDP1+12, RXMED+7*, RXMED+10*, RXMED1+2*, RXMED1+12
>> AMHX MED1+12*, MED1+13*, MED1+15, POV1+12*, POV1+13*, POV1+15, MEAS1+12*, MEAS1+13*, MEAS1+15, EDP1+12*
, EDP1+13*, EDP1+15, RAD1+12*, RAD1+13*, RAD1+15, MIC1+12*, MIC1+13*, MIC1+15, MIC1+21*, MIC1+22*
, PCCMED1+12*, PCCMED1+13*, PCCMED1+15, PCCMED1+21*, PCCMED1+22*, MEDP1+12*, MEDP1+13*, MEDP1+15, RXMED1+12*, RXMED1+14*
, RXMED1+15, RXMED1+16
>> AMHZ MIC1+21*, PCCMED1+21*
>> BGUBEGIN MED+1, MED+5*, POV+3, POV+7*, MEAS+2, MEAS+6*, EDP+3, EDP+7*, RAD+3, RAD+7*
, MIC+4, MIC+8*, PCCMED+4, PCCMED+8*, MEDP+1, MEDP+5*, PAT+7, PAT+8, PAT+9, PAT+10*
, RXMED+4, RXMED+8*
>> BGUCRFS MED+1*, POV+3*, MEAS+2*, EDP+3*, RAD+3*, MIC+4*, PCCMED+4*, MEDP+1*, RXMED+4*
>> BGUCRFS1 PAT+6*, PAT+7*, PAT+8*, PAT+9*, PAT+10*
>> BGUDRIVR MED, MED+1*, POV+2, POV+3*, MEAS+1, MEAS+2*, EDP+2, EDP+3*, RAD+2, RAD+3*
, MIC+3, MIC+4*, PCCMED+3, PCCMED+4*, MEDP, MEDP+1*, RXMED+3, RXMED+4*
>> BGUEND MED+2, MED+3, MED+4, MED+5*, POV+4, POV+5, POV+6, POV+7*, MEAS+3, MEAS+4
, MEAS+5, MEAS+6*, EDP+4, EDP+5, EDP+6, EDP+7*, RAD+4, RAD+5, RAD+6, RAD+7*
, MIC+5, MIC+6, MIC+7, MIC+8*, PCCMED+5, PCCMED+6, PCCMED+7, PCCMED+8*, MEDP+2, MEDP+3
, MEDP+4, MEDP+5*, PAT+10*, RXMED+5, RXMED+6, RXMED+7, RXMED+8*
>> BGUMAX MED+4*, POV+6*, MEAS+5*, EDP+6*, RAD+6*, MIC+7*, PCCMED+7*, MEDP+4*, RXMED+7*
>> BGUSUB(1 MED1+27*, POV1+20*, MEAS1+21*, EDP1+20*, RAD1+20*, MIC1+22*, PCCMED1+22*, MEDP1+27*, RXMED1+22*
CKDT MED2+1~, MED2+7*, MED2+8, MEDP2+1~, MEDP2+7*, MEDP2+8
DYS MED2+1~, MED2+4*, MED2+5, MEDP2+1~, MEDP2+4*, MEDP2+5
ISUDAT MED2+1~, MED2+4*, MED2+6, MED2+7, MEDP2+1~, MEDP2+4*, MEDP2+6, MEDP2+7
RFLS MED2+1~, MED2+4*, MED2+5, MEDP2+1~, MEDP2+4*, MEDP2+5
U MED1+16, MED2+4, POV1+16, MEAS1+16, EDP1+16, RAD1+16, MIC1+16, MIC2+1, MIC2+2, MIC2+3
, MIC2+4, PCCMED1+16, PCCMED2+2, MEDP1+16, MEDP2+4, RXMED1+15, RXMED1+20
>> X MED2+7, MED2+8*, MEDP2+7, MEDP2+8*, PAT+10*
>> X1 MED2+7*, MEDP2+7*
>> X2 MED2+5*, MEDP2+5*
>> Y MED2+8, MEDP2+8, PAT+10
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All