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

Package: Mental Health Social Services

Routine: AMHLETR1


Information

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

Source Information

Source file <AMHLETR1.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 AMHBHRP1  
Patient Chart 1 BPCBHRP1  

Entry Points

Name Comments DBIA/ICR reference
BD ;get beginning date
HEAD ;
P1
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 AMHLETR1+6
^AMHEKL DONE
DONE^AMHLEIN DONE
$$ALLOWTP^AMHLETP PROC1+4
$$ALLOWP^AMHUTIL PROC1+3
DBHUSRP^AMHUTIL AMHLETR1+10
$$DEMO^AMHUTIL1 PROC1+5
DEMOCHK^AMHUTIL1 DEMO+1
^AUPNPAT PRINT+8
^DIC THER+5
^DIR BD+2, ED+1, PROG+2, PROG+5, THER+2, HEAD+3
^XBDBQUE ZIS+2
$$VAL^XBDIQ1 P1+1
$$EXTSET^XBFUNC HEAD1+8
$$FMTE^XLFDT PRINT+10, P1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @(IOF),!!
  • Line Location: AMHLETR1+7
Function Call: WRITE
  • Prompt: "********** LIST TREATMENT PLANS BY NEXT REVIEW DATE **********",!!
  • Line Location: AMHLETR1+8
Function Call: WRITE
  • Prompt: "This report will list all patients who have a treatment plan which is due",!,"to be reviewed in a date range specified by the user.",!
  • Line Location: AMHLETR1+9
Function Call: WRITE
  • Prompt: !,"Please enter the date range during which the treatment plan is to be reviewed.",!
  • 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+4
Function Call: WRITE
  • Prompt: !,"????",?23,"????",?33,"????"
  • Line Location: PRINT+9
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 REVIEWED",!
  • 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:
    • AMHLETR1+6
Routine Call
  • DIC
  • Line Location:
    • THER+5
Routine Call
  • DIR
  • Line Location:
    • BD+2
    • 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, PROC1+8, PRINT+7
^AUPNPAT - [#9000001] PRINT+10
^DIC(4 - [#4] HEAD1+5
^DPT - [#2] PRINT+10
^VA(200 - [#200] P1+1, HEAD1+4, HEAD1+9
^XTMP("AMHLETR1" PROC1+9*, 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
P1 PRINT+9
PROC1 PROC+2
PROG PROG+6, PROG+7
THER PROG+4, THER+6, THER+7, DEMO+2
XIT BD+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AMH80D XIT+1!, PRINT+2*, HEAD1+13
AMHBD BD+4*, ED+1, ED+4, XIT+1!, PROC1+9, PRINT+1
AMHBDD ED+4*, XIT+1!, PRINT+1*, HEAD1+7
>> AMHBT PROC+1*
AMHBTH XIT+1!, PROC+1*, PROC1+9, PRINT+4, PRINT+5, DONE+1!
>> AMHDEMO DEMO+1, DEMO+2, PROC1+5
AMHED ED+3*, ED+4, XIT+1!, PROC1+9, PRINT+1
AMHEDD ED+4*, XIT+1!, PRINT+1*, HEAD1+7
AMHET XIT+1!, PROC+3*
AMHJOB XIT+1!, PROC+1*, PROC1+9, 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+4, PROC1+8, PROC1+9, PRINT+5*, PRINT+7
, P1+1
AMHTPR XIT+1!, PRINT+7*, PRINT+8, PRINT+9, PRINT+10, P1, P1+1
>> 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+2!, ED+1!, PROG+2!, PROG+5!, THER+2!, HEAD+3!
DIR("A" BD+2*, ED+1*, PROG+2*, PROG+5*, THER+2*
DIR("B" PROG+2*, THER+2*
DIR(0 BD+2*, ED+1*, PROG+2*, PROG+5*, THER+2*, HEAD+3*
>> DIRUT BD+2*, BD+3, ED+1*, ED+2, PROG+3, PROG+6, THER+3
>> DTOUT HEAD+3
>> DUOUT BD+2, ED+1
DUZ PROC1+3, PROC1+4, HEAD1+4
DUZ(2 PRINT+10, HEAD1+5
IO HEAD+3
IO(0 HEAD+3
IOF AMHLETR1+6, AMHLETR1+7, HEAD1+2
IOM CTR+1
IOSL PRINT+6
IOST HEAD+3
U PROC1+2, PROC1+3, PROC1+5, PROC1+6, PROC1+7, PROC1+8, PROC1+9, PRINT+8, PRINT+9, PRINT+10
, P1, P1+1, HEAD1+4, HEAD1+5, HEAD1+9
X ED+4, PROG+7, THER+6, PROC1+1*, PROC1+2, PROC1+3, PROC1+5, PROC1+6, PROC1+7, PROC1+9
, 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+4, ED+1*, ED+3, ED+4*, PROG+4, PROG+8, THER+4, THER+7, THER+8, PRINT+1*
, PRINT+8*, 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