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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AMHCDBL

Package: Mental Health Social Services

Routine: AMHCDBL


Information

AMHCDBL ; IHS/CMI/LAB - backload pcc visits ;

Source Information

Source file <AMHCDBL.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
VA Fileman 5 ^%DT  ^DIC  FILE^DICN  ^DIE  ^DIR  
IHS VA Utilities 3 $$VAL^XBDIQ1  ^XBFMK  EN^XBVK  
Mental Health Social Services 3 (IN,TD)^AMHCDBL1  PCCLINK^AMHLE2  ^AMHLEIN  
Kernel 1 $$VERSION^XPDUTL  
Patient Care Component Reports 1 $$CLINIC^APCLV  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Mental Health Social Services 1 AMHCDBL1  

Entry Points

Name Comments DBIA/ICR reference
CONT ;
D ;date range
TOC(X) ;
CDVISIT ;
DE
CDPREV ;
START ;
XIT ;
PCCLINK ;EP
IN ;
VIS(P,D) ;
PCC ;
C1
PROC ;
EP ;
PROBCONV ;

External References

Name Field # of Occurrence
^%DT C1+6
IN^AMHCDBL1 IN+1
TD^AMHCDBL1 DE+14
PCCLINK^AMHLE2 PCCLINK+8
^AMHLEIN CDVISIT+1
$$CLINIC^APCLV VIS+4
^DIC D+10, D+15, C1+10
FILE^DICN EP+2, C1+20, C1+30, C1+35, C1+39
^DIE C1+22, C1+23
^DIR CONT+1, D+3, D+5, PCC+3
$$VAL^XBDIQ1 D+10, D+15, DE+1, DE+3, CDPREV+9, C1
^XBFMK EP+4, PROC+10, C1+11, C1+32, C1+37, C1+41, XIT+3
EN^XBVK PROC+9, XIT+2
$$VERSION^XPDUTL START+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"CDMIS IS NOT UP TO VERSION 4.1, CANNOT CONTINUE"
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !!,"This routine is used to backload CDMIS data into the BH package."
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !!,"This option should be only by those sites that have discontinued"
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !,"the use of the CDMIS module.",!
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !,"Only visits in a date range you specify will be transferred."
  • Line Location: START+7
Function Call: WRITE
  • Prompt: !,"You should decide ahead of time how far back you want to go"
  • Line Location: START+8
Function Call: WRITE
  • Prompt: !,"in backloading data. It might be wise to just backload the past"
  • Line Location: START+9
Function Call: WRITE
  • Prompt: !,"1 or 2 years worth of data first and then decide if older data"
  • Line Location: START+10
Function Call: WRITE
  • Prompt: !,"should be moved.",!!
  • Line Location: START+11
Function Call: WRITE
  • Prompt: !
  • Line Location: D+2
Function Call: WRITE
  • Prompt: !!,$C(7),"Sorry, Ending Date MUST not be earlier than Beginning Date."
  • Line Location: D+8
Function Call: WRITE
  • Prompt: !,"Please enter the location to be used as a default for Prevention Activities."
  • Line Location: D+9
Function Call: WRITE
  • Prompt: !,"Please enter the community to be used as a default for all records created."
  • Line Location: D+14
Function Call: WRITE
  • Prompt: !!,"These CDMIS visits do not need to pass to PCC because they are old visits."
  • Line Location: PCC+1
Function Call: WRITE
  • Prompt: !!,"Please be patient while the conversion process takes place..."
  • Line Location: PROC+1
Function Call: WRITE
  • Prompt: !,"Moving CDMIS Prevention Activities"
  • Line Location: PROC+2
Function Call: WRITE
  • Prompt: !,"Moving CDMIS visits"
  • Line Location: PROC+4
Function Call: WRITE
  • Prompt: !!,"all done"
  • Line Location: PROC+6
Function Call: WRITE
  • Prompt: !,"Cannot map component: ",AMHCOMP," ",AMHIEN," Using Other"
  • Line Location: DE+2
Function Call: WRITE
  • Prompt: !,"moved ",AMHCDVS," cdmis visits"
  • Line Location: DE+16
Function Call: WRITE
  • Prompt: !,AMHCIN," initial"
  • Line Location: DE+17
Function Call: WRITE
  • Prompt: !,AMHCRE," reopen"
  • Line Location: DE+18
Function Call: WRITE
  • Prompt: !,AMHCFU," follow up"
  • Line Location: DE+19
Function Call: WRITE
  • Prompt: !,AMHCIR," info/referral"
  • Line Location: DE+20
Function Call: WRITE
  • Prompt: !,AMHCOT," other"
  • Line Location: DE+21
Function Call: WRITE
  • Prompt: !,AMHCTD," trans/disc"
  • Line Location: DE+22
Function Call: WRITE
  • Prompt: !,"Cannot map component: ",AMHCOMP," ",AMHIEN," Using Other"
  • Line Location: CDPREV+11
Function Call: WRITE
  • Prompt: !,"NO prevention activity, skipping"
  • Line Location: C1+8
Function Call: WRITE
  • Prompt: !,"Could not map prevention activity: ",AMHPRA
  • Line Location: C1+10
Function Call: WRITE
  • Prompt: !,"no time on prevention.. skipping ",AMHIEN," ",AMHMIEN
  • Line Location: C1+16
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"Error creating Behavioral Health Record!! Deleting Record.",!
  • Line Location: C1+21
Function Call: WRITE
  • Prompt: !!,"error editing MHSS Record entry ",AMHIEN," ",AMHMIEN
  • Line Location: C1+24
Function Call: WRITE
  • Prompt: !!,"Creating Primary Provider entry failed!!!",$C(7),$C(7)
  • Line Location: C1+31
Function Call: WRITE
  • Prompt: !!,"Creating POV entry failed!!!",$C(7),$C(7)
  • Line Location: C1+36
Function Call: WRITE
  • Prompt: !!,"Creating PREVENTION ACTIVITY entry failed!!!",$C(7),$C(7)
  • Line Location: C1+40
Function Call: WRITE
  • Prompt: !!,"A total of ",AMHCDPRC," CDMIS prevention activities moved to BH."
  • Line Location: C1+44
Function Call: WRITE
  • Prompt: !!,"ALL DONE",!
  • Line Location: XIT+1
Routine Call
  • DIE
  • Line Location:
    • C1+22
    • C1+23
Routine Call
  • DIC
  • Line Location:
    • D+10
    • D+15
    • C1+10
Routine Call
  • DIR
  • Line Location:
    • CONT+1
    • D+3
    • D+5
    • PCC+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AMHREC - [#9002011] Classic Fileman Calls
^AMHRPRO - [#9002011.01] Classic Fileman Calls
^AMHRPROV - [#9002011.02] Classic Fileman Calls
^AMHRPA - [#9002011.09] Classic Fileman Calls
^AMHTCOMP - [#9002013.7] Classic Fileman Calls
^AMHTPA - [#9002014.8] Classic Fileman Calls
^AUTTCOM - [#9999999.05] Classic Fileman Calls
^AUTTLOC - [#9999999.06] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACDLOT - [#9002170.8] C1+14
^ACDPD - [#9002170.7] CDPREV+4, CDPREV+6, C1+2, C1+3, C1+4, C1+26, C1+27, C1+42*
^ACDPREV(9002170.9 - [#9002170.9] C1+9
^ACDVIS - [#9002172.1] CDVISIT+4, CDVISIT+5, CDVISIT+6, CDVISIT+7*, DE+8
^AMHPROB("B" C1+34
^AMHREC - [#9002011] PCCLINK+3, PCCLINK+9
^AMHTACT - [#9002012] PCCLINK+3
^AMHTCOMP("B" EP+1, DE+2, CDPREV+10, CDPREV+11
^AUPNVSIT("AA" VIS+3, VIS+4
^AUPNVSIT("ABILL" PCCLINK+10!
^AUPNVSIT("ADWO" PCCLINK+10!
^TMP($J START+2!, PROC+8!

Label References

Name Line Occurrences
$$TOC C1+15
$$VIS PCCLINK+7
C1 CDPREV+10
CDPREV PROC+3
CDVISIT PROC+5
D D+5, D+7
IN DE+9, DE+10, DE+11, DE+12, DE+13
START D+3
XIT START+1, CONT+2, CONT+3, D+12, D+17, PCC+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT C1+6*
>> AMHACT DE+9*, DE+10*, DE+11*, DE+12*, DE+13*, DE+14*
>> AMHACTN PCCLINK+5*
AMHBD D+1!, D+3*, D+7, CDVISIT+11, C1+7
>> AMHBL CDVISIT+2*
>> AMHC C1+26*, C1+28*, C1+29
>> AMHCAT C1+14*, C1+15*, C1+23
>> AMHCDPRC CDPREV+3*, C1+43*, C1+44
>> AMHCDVS CDVISIT+3*, DE+16
>> AMHCFU CDVISIT+2*, DE+11*, DE+19
>> AMHCIN CDVISIT+2*, DE+9*, DE+17
>> AMHCIR CDVISIT+2*, DE+12*, DE+20
>> AMHCOMP DE+1*, DE+2*, CDPREV+9*, CDPREV+10*, CDPREV+11*, C1+23
>> AMHCOMPB DE+2*, CDPREV+10*, CDPREV+11*
>> AMHCOMPI DE+1*
>> AMHCOMT DE+3*, C1*, C1+23
>> AMHCOMTI DE+3*
>> AMHCOT CDVISIT+2*, DE+13*, DE+21
>> AMHCRE CDVISIT+2*, DE+10*, DE+18
>> AMHCTD CDVISIT+2*, DE+14*, DE+22
>> AMHDATE CDVISIT+10*, CDVISIT+11, CDVISIT+12, C1+6*, C1+7, C1+19, PCCLINK+7, VIS+3
>> AMHDAY C1+5*, C1+6
>> AMHDCOM D+18*, C1+23
>> AMHDLOC D+13*
AMHED D+1!, D+5*, D+7, CDVISIT+12, C1+7
>> AMHIEN CDVISIT+4*, CDVISIT+5, CDVISIT+6, CDVISIT+7, DE+1, DE+2, DE+3, DE+8, CDPREV+4*, CDPREV+6
, CDPREV+9, CDPREV+11, C1, C1+2, C1+3, C1+4, C1+16, C1+24, C1+26, C1+27
, C1+42
>> AMHIENP C1+26*, C1+27
>> AMHLOC DE+8*, C1+1*, C1+23
>> AMHLPCC PCC+2*, PCC+5*
>> AMHMIEN C1+2*, C1+3, C1+4, C1+16, C1+24, C1+26, C1+27, C1+42
>> AMHMR0 C1+4*, C1+5, C1+8, C1+12, C1+13, C1+14, C1+16
>> AMHMY CDPREV+8*, C1+6
>> AMHNS C1+13*, C1+23
>> AMHPAT DE+6*, PCCLINK+1, PCCLINK+4, PCCLINK+7
>> AMHPCCL PCC+2*, PCC+5*
>> AMHPRA C1+8*, C1+9*, C1+10, C1+35
>> AMHPRAB C1+10*, C1+39
>> AMHPROV DE+4*
>> AMHPS C1+29*, C1+30
>> AMHPTYPE PCCLINK+2*
>> AMHQUIT D+3*, D+5*
>> AMHR C1+22*, C1+23, C1+30, C1+35, C1+39, PCCLINK+3, PCCLINK+9
>> AMHR0 CDVISIT+5*, CDVISIT+9, CDVISIT+10, DE+1, DE+3, DE+4, DE+5, DE+6, CDPREV+6*, CDPREV+7
, CDPREV+8, C1+1
>> AMHTAR C1+12*, C1+23
>> AMHTC DE+5*, DE+9, DE+10, DE+11, DE+12, DE+13, DE+14
>> AMHTIME C1+16*, C1+17*, C1+23
>> APCDOVRR CDVISIT+3*
D VIS~
D0 C1+20!, C1+30!, C1+35!, C1+39!
DA D+11!, D+16!, C1+22*!, C1+23*, C1+30!, C1+35!, C1+39!
DD C1+20!, C1+30!, C1+35!, C1+39!
>> DFN PCCLINK+4*
DG C1+30!, C1+35!, C1+39!
DH C1+30!, C1+35!, C1+39!
DI C1+30!, C1+35!, C1+39!
DIADD EP+2*, EP+3!, C1+19*, C1+20!, C1+30*!, C1+35*!, C1+39*!
DIC EP+2*, D+10*, D+11!, D+15*, D+16!, C1+10*, C1+11!, C1+19!*, C1+20!, C1+30*!
, C1+35*!, C1+39*!
DIC("B" D+10*, D+15*
DIC("DR" EP+2*, C1+19*, C1+30*, C1+35*, C1+39*
DIC(0 EP+2*, D+10*, D+15*, C1+10*, C1+19*, C1+30*, C1+35*, C1+39*
DIE C1+20!, C1+22*!, C1+23*, C1+30!, C1+35!, C1+39!
DIFGLINE START+3*, PROC+11!
DIR CONT+1!, D+2!, D+4!, PCC+3!
DIR("A" CONT+1*, D+2*, D+4*, PCC+3*
DIR("B" CONT+1*, PCC+3*
DIR(0 CONT+1*, D+2*, D+4*, PCC+3*
>> DIRUT CONT+1*, CONT+2, PCC+3*, PCC+4
DIU C1+30!, C1+35!, C1+39!
DIW C1+30!, C1+35!, C1+39!
DLAYGO EP+2*, EP+3!, C1+19*, C1+20!, C1+30*!, C1+35*!, C1+39*!
DO C1+20!, C1+30!, C1+35!, C1+39!
DQ C1+30!, C1+35!, C1+39!
DR C1+20!, C1+22*!, C1+23*
DR(2 C1+22*
DT PCCLINK+10
>> DUOUT CONT+1, PCC+3
DUZ C1+19
DUZ(2 D+10, D+15, DE+8
G VIS+1~, VIS+2*, VIS+4*, VIS+6
P VIS~, VIS+3, VIS+4
U CDVISIT+10, DE+1, DE+3, DE+4, DE+5, DE+6, CDPREV+8, C1+1, C1+5, C1+8
, C1+9, C1+12, C1+13, C1+14, C1+16, C1+27, PCCLINK+3, PCCLINK+9
>> V PCCLINK+9*, PCCLINK+10
X EP+2*, C1+6*, C1+10*, C1+19*, C1+20!, C1+30*, C1+35*, C1+39*, TOC~, TOC+1
, TOC+2, TOC+3, TOC+4, TOC+5, TOC+6, TOC+7, TOC+8, TOC+9, TOC+10, TOC+11
, VIS+1~, VIS+3*, VIS+4
Y CONT+3, D+3, D+5, D+12, D+13, D+17, D+18, PCC+5, C1+6, C1+10
, C1+21, C1+22, C1+24, C1+27*, C1+30, C1+31, C1+34*, C1+35, C1+36, C1+40
, VIS+1~, VIS+3*, VIS+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All