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

Package: Mental Health Social Services

Routine: AMHLETR2


Information

AMHLETR2 ; IHS/CMI/LAB - print report of tps needing resolved ;

Source Information

Source file <AMHLETR2.m>

Call Graph

Call Graph Total: 16

Package Total Call Graph
Mental Health Social Services 5 ^AMHEKL  DONE^AMHLEIN  $$ALLOWTP^AMHLETP  ($$ALLOWP,DBHUSRP)^AMHUTIL  ($$DEMO,DEMOCHK)^AMHUTIL1  
IHS VA Utilities 4 ^XBDBQUE  $$VAL^XBDIQ1  $$EXTSET^XBFUNC  EN^XBVK  
VA Fileman 4 DD^%DT  C^%DTC  ^DIC  ^DIR  
Kernel 2 HOME^%ZIS  $$FMTE^XLFDT  
IHS Patient 1 ^AUPNPAT  

Entry Points

Name Comments DBIA/ICR reference
BD ;get beginning date
SORT ;
HEAD ;
PROC1 ;
ZIS ;
HEAD1 ;EP
ED ;get ending date
PRINT ;EP
PRT2 ;
N ;
P ;
CTR(X,Y) ;EP - Center X in a field Y wide.
GETDATES ;
XIT ;
DEMO ;
PROG ;
DONE
PROC ;EP - entry point for processing
THER ;
D ;

External References

Name Field # of Occurrence
DD^%DT ED+1, ED+4
C^%DTC ED+4
HOME^%ZIS AMHLETR2+6
^AMHEKL DONE
DONE^AMHLEIN DONE
$$ALLOWTP^AMHLETP PROC1+5
$$ALLOWP^AMHUTIL PROC1+3
DBHUSRP^AMHUTIL AMHLETR2+10
$$DEMO^AMHUTIL1 PROC1+4
DEMOCHK^AMHUTIL1 DEMO+1
^AUPNPAT PRT2+4
^DIC THER+5
^DIR BD+2, ED+1, PROG+2, PROG+5, THER+2, SORT+2, HEAD+3
^XBDBQUE ZIS+2
$$VAL^XBDIQ1 PRT2+7
$$EXTSET^XBFUNC HEAD1+8
EN^XBVK XIT+1
$$FMTE^XLFDT PRT2+5, PRT2+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @(IOF),!!
  • Line Location: AMHLETR2+7
Function Call: WRITE
  • Prompt: "********** LIST TREATMENT PLANS **********",!!
  • Line Location: AMHLETR2+8
Function Call: WRITE
  • Prompt: "This report will list all patients who have a treatment plan on file."
  • Line Location: AMHLETR2+9
Function Call: WRITE
  • Prompt: !,"Please enter the date range during which the treatment plan was established.",!
  • Line Location: BD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: BD+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+1
Function Call: WRITE
  • Prompt: !!,"You can limit the report output to treatment plans for one or all Providers",!
  • Line Location: THER+1
Function Call: WRITE
  • Prompt: !
  • Line Location: THER+2
Function Call: WRITE
  • Prompt: !!,"NO DATA TO REPORT"
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: !?13,"********** CONFIDENTIAL PATIENT INFORMATION **********"
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: !,$P(^VA(200,DUZ,0),U,2),?72,"Page 1 ",!
  • Line Location: HEAD1+4
Function Call: WRITE
  • Prompt: ?(80-$L($P(^DIC(4,DUZ(2),0),U))/2),$P(^DIC(4,DUZ(2),0),U),!
  • Line Location: HEAD1+5
Function Call: WRITE
  • Prompt: $$CTR(X),!
  • Line Location: HEAD1+6
Function Call: WRITE
  • Prompt: ?20,"Date Established: ",AMHBDD," to ",AMHEDD,!
  • Line Location: HEAD1+7
Function Call: WRITE
  • Prompt: $$CTR(X),!
  • Line Location: HEAD1+8
Function Call: WRITE
  • Prompt: $$CTR(X),!
  • Line Location: HEAD1+9
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?23,"DOB",?33,"CHART #",?41,"DATE",?54,"REVIEW DATE",?68,"ANTICIPATED"
  • Line Location: HEAD1+10
Function Call: WRITE
  • Prompt: !?41,"ESTABLISHED",?68,"COMPLETION",!?68,"DATE"
  • Line Location: HEAD1+11
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD1+12
Function Call: WRITE
  • Prompt: AMH80D,!
  • Line Location: HEAD1+13
Routine Call
  • %ZIS
  • Line Location:
    • AMHLETR2+6
Routine Call
  • DIC
  • Line Location:
    • THER+5
Routine Call
  • DIR
  • Line Location:
    • BD+2
    • ED+1
    • PROG+2
    • PROG+5
    • THER+2
    • SORT+2
    • HEAD+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMHPTXP - [#9002011.56] PROC+2, PROC1+1, N+1, D+1, PRT2+3
^AUPNPAT - [#9000001] PRT2+5
^DIC(4 - [#4] HEAD1+5
^DPT - [#2] N+3, PRT2+5
^VA(200 - [#200] P+2, PRT2+7, HEAD1+4, HEAD1+9
^XTMP("AMHLETR2" PROC1+9*, PRINT+3, PRINT+4, PRT2+1, DONE+1!

Label References

Name Line Occurrences
$$CTR HEAD1+6, HEAD1+8, HEAD1+9
@( PROC1+8
BD ED+2
DONE PRINT+3, PRINT+5
GETDATES PROG+3
HEAD PRINT+2, PRT2+2
HEAD1 HEAD+1
PROC1 PROC+2
PROG PROG+6, PROG+7
PRT2 PRINT+4
SORT THER+4
THER PROG+4, THER+6, THER+7, SORT+3, DEMO+2
XIT BD+3, THER+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AMH80D PRINT+1*, HEAD1+13
>> AMHBD BD+4*, ED+1, ED+4, PROC1+9
>> AMHBDD ED+4*, HEAD1+7
>> AMHBT PROC+1*
AMHBTH PROC+1*, PROC1+9, PRINT+3, PRINT+4, PRT2+1, DONE+1!
>> AMHDEMO DEMO+1, DEMO+2, PROC1+4
>> AMHED ED+3*, ED+4, PROC1+9
>> AMHEDD ED+4*, HEAD1+7
>> AMHET PROC+3*
AMHJOB PROC+1*, PROC1+9, PRINT+3, PRINT+4, PRT2+1, DONE+1!
>> AMHPG PRINT+1*, HEAD+1, HEAD1+1*
>> AMHPROG PROG+1*, PROG+8*, PROC1+7, HEAD1+8
>> AMHQUIT PRINT+1*, PRINT+4, PRT2+1, PRT2+2, HEAD+3*
>> AMHSD ED+4*
>> AMHSORT SORT+1*, SORT+4*, PROC1+8
>> AMHSORTV PROC1+9, P+1*, P+2*, P+3*, N+3*, N+4*, D+1*, D+2*, PRINT+4*, PRT2+1
>> AMHSORVT N+2*
AMHTHER THER+2!, THER+8*, PROC1+6, HEAD1+9
>> AMHTOT PROC+1*
AMHTP PROC+1*, PROC+2*, PROC+4!, PROC1+1, PROC1+5, PROC1+9, N+1, D+1, PRT2+1*, PRT2+3
, PRT2+7
>> AMHTPR PRT2+3*, PRT2+4, PRT2+5, PRT2+6, PRT2+7
>> AUPNDOB PRT2+5
DA PROG+2!, PROG+5!, THER+2!, THER+5!, SORT+2!
DIC THER+5*!
DIC("A" THER+5*
DIC(0 THER+5*
DIR BD+2!, ED+1!, PROG+2!, PROG+5!, THER+2!, SORT+2!, HEAD+3!
DIR("A" BD+2*, ED+1*, PROG+2*, PROG+5*, THER+2*, SORT+2*
DIR("B" PROG+2*, THER+2*, SORT+2*
DIR(0 BD+2*, ED+1*, PROG+2*, PROG+5*, THER+2*, SORT+2*, HEAD+3*
>> DIRUT BD+2*, BD+3, ED+1*, ED+2, PROG+3, PROG+6, THER+3, SORT+3
>> DTOUT HEAD+3
>> DUOUT BD+2, ED+1
DUZ PROC1+3, PROC1+5, HEAD1+4
DUZ(2 PRT2+5, HEAD1+5
IO HEAD+3
IO(0 HEAD+3
IOF AMHLETR2+6, AMHLETR2+7, HEAD1+2
IOM CTR+1
IOSL PRT2+2
IOST HEAD+3
>> P N+1*, N+2, N+3
U PROC1+2, PROC1+3, PROC1+4, PROC1+6, PROC1+7, PROC1+9, P+1, P+2, N+1, N+3
, D+1, PRT2+4, PRT2+5, PRT2+6, PRT2+7, HEAD1+4, HEAD1+5, HEAD1+9
X ED+4, PROG+7, THER+6, PROC1+1*, PROC1+2, PROC1+3, PROC1+4, PROC1+6, PROC1+7, PROC1+9
, P+1, CTR~, CTR+1, HEAD+2~, HEAD1+6*, HEAD1+8*, HEAD1+9*
>> X1 ED+4*
>> X2 ED+4*
>> XBNS ZIS+1*
>> XBRC ZIS+1*
>> XBRP ZIS+1*
>> XBRX ZIS+1*
Y BD+4, ED+1*, ED+3, ED+4*, PROG+4, PROG+8, THER+4, THER+7, THER+8, SORT+4
, PRT2+4*, CTR~, CTR+1, HEAD+3
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All