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: AMHLETR

Package: Mental Health Social Services

Routine: AMHLETR


Information

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

Source Information

Source file <AMHLETR.m>

Call Graph

Call Graph Total: 15

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

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Mental Health Social Services 1 AMHBHR1  
Patient Chart 1 BPCBHR1  

Entry Points

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

External References

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @(IOF),!!
  • Line Location: AMHLETR+7
Function Call: WRITE
  • Prompt: "********** LIST TREATMENT PLANS BY RESOLVED BY DATE **********",!!
  • Line Location: AMHLETR+8
Function Call: WRITE
  • Prompt: "This report will list all patients who have a treatment plan with an anticipated"
  • Line Location: AMHLETR+9
Function Call: WRITE
  • Prompt: !,"completion date within a date range specified by the user."
  • Line Location: AMHLETR+10
Function Call: WRITE
  • Prompt: !,"Please enter the desired date range.",!
  • Line Location: BD+2
Function Call: WRITE
  • Prompt: !
  • Line Location: BD+3
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+4
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: ?13,"LISTING OF TREATMENT PLANS DUE TO BE RESOLVED",!
  • Line Location: HEAD1+6
Function Call: WRITE
  • Prompt: ?20,"Date Range: ",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:
    • AMHLETR+6
Routine Call
  • DIC
  • Line Location:
    • THER+5
Routine Call
  • DIR
  • Line Location:
    • BD+3
    • ED+1
    • PROG+2
    • PROG+5
    • THER+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, PRINT+7
^AUPNPAT - [#9000001] PRINT+10
^DIC(4 - [#4] HEAD1+5
^DPT - [#2] PRINT+10
^VA(200 - [#200] PRINT+12, HEAD1+4, HEAD1+9
^XTMP("AMHLETR" PROC1+8*, PRINT+4, PRINT+5, DONE+1!

Label References

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AMH80D XIT+1!, PRINT+2*, HEAD1+13
AMHBD BD+5*, ED+1, ED+4, XIT+1!, PROC1+8, PRINT+1
AMHBDD ED+4*, XIT+1!, PRINT+1*, HEAD1+7
>> AMHBT PROC+1*
AMHBTH XIT+1!, PROC+1*, PROC1+8, PRINT+4, PRINT+5, DONE+1!
>> AMHDEMO DEMO+1, DEMO+2, PROC1+4
AMHED ED+3*, ED+4, XIT+1!, PROC1+8, PRINT+1
AMHEDD ED+4*, XIT+1!, PRINT+1*, HEAD1+7
AMHET XIT+1!, PROC+3*
AMHJOB XIT+1!, PROC+1*, PROC1+8, PRINT+4, PRINT+5, DONE+1!
>> AMHPG PRINT+2*, HEAD+1, HEAD1+1*
>> AMHPROG PROG+1*, PROG+8*, PROC1+7, HEAD1+8
>> AMHQUIT PRINT+2*, PRINT+5, PRINT+6, HEAD+3*
>> AMHSD ED+4*
AMHTHER THER+2!, THER+8*, XIT+1!, PROC1+6, HEAD1+9
>> AMHTOT PROC+1*
AMHTP XIT+1!, PROC+1*, PROC+2*, PROC+4!, PROC1+1, PROC1+5, PROC1+8, PRINT+5*, PRINT+7, PRINT+12
AMHTPR XIT+1!, PRINT+7*, PRINT+8, PRINT+9, PRINT+10, PRINT+11, PRINT+12
>> AUPNDOB PRINT+10
DA PROG+2!, PROG+5!, THER+2!, THER+5!
DIC THER+5*!
DIC("A" THER+5*
DIC(0 THER+5*
DIR BD+1!, BD+3!, ED+1!, PROG+2!, PROG+5!, THER+2!, HEAD+3!
DIR("A" BD+3*, ED+1*, PROG+2*, PROG+5*, THER+2*
DIR("B" PROG+2*, THER+2*
DIR(0 BD+3*, ED+1*, PROG+2*, PROG+5*, THER+2*, HEAD+3*
>> DIRUT BD+3*, BD+4, ED+1*, ED+2, PROG+3, PROG+6, THER+3
>> DTOUT HEAD+3
>> DUOUT BD+3, ED+1
DUZ PROC1+3, PROC1+5, HEAD1+4
DUZ(2 PRINT+10, HEAD1+5
IO HEAD+3
IO(0 HEAD+3
IOF AMHLETR+6, AMHLETR+7, HEAD1+2
IOM CTR+1
IOSL PRINT+6
IOST HEAD+3
U PROC1+2, PROC1+3, PROC1+4, PROC1+6, PROC1+7, PROC1+8, PRINT+8, PRINT+9, PRINT+10, PRINT+11
, PRINT+12, 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+8
, CTR~, CTR+1, HEAD+2~, HEAD1+8*, HEAD1+9*
>> X1 ED+4*
>> X2 ED+4*
>> XBNS ZIS+1*
>> XBRC ZIS+1*
>> XBRP ZIS+1*
>> XBRX ZIS+1*
Y BD+5, ED+1*, ED+3, ED+4*, PROG+4, PROG+8, THER+4, THER+7, THER+8, PRINT+1*
, PRINT+9*, CTR~, CTR+1, HEAD+3
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