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

Package: Alcohol Chemical Dependency

Routine: ACDPVH1M


Information

ACDPVH1M ;IHS/ADC/EDE/KML - DISPLAY PATIENT VISITS FOR 1 MO;

Source Information

Source file <ACDPVH1M.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMADD^XLFDT  
Alcohol Chemical Dependency 3 (CONF,DEV,DSPCSH,DSPHIST,DSPV,GETVSITS,PAUSE)^ACDDEU  DIC^ACDFMC  ^ACDKILL  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
EOJ ;
GETPAT ; GET PATIENT
DSPHIST ; DISPLAY VISIT HISTORY TO HELP USER SELECT
START ;
DISPLAY2 ; DISPLAY VISIT FOR SELECTED MONTH
GETMONTH ; GET MONTH
DISPLAY ; EP - FOR TASKMAN
PATLOOP ; DISPLAY PATIENTS UNTIL DONE

External References

Name Field # of Occurrence
^%ZIS DISPLAY+1
^%ZISC DISPLAY+5, EOJ+1
^%ZTLOAD PATLOOP+14
CONF^ACDDEU DISPLAY2+1
DEV^ACDDEU PATLOOP+18
DSPCSH^ACDDEU DISPLAY2+5
DSPHIST^ACDDEU DSPHIST+3
DSPV^ACDDEU DISPLAY2+5
GETVSITS^ACDDEU PATLOOP+3
PAUSE^ACDDEU PATLOOP+17
DIC^ACDFMC GETPAT+3
^ACDKILL EOJ+2
^DIR GETMONTH+2
$$FMADD^XLFDT PATLOOP+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No CDMIS VISIT history for patient ",ACDDFN,!
  • Line Location: PATLOOP+5
Function Call: WRITE
  • Prompt: !!,"No CDMIS VISITs during selected month for patient ",ACDDFN,!
  • Line Location: PATLOOP+11
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISPLAY+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPLAY2+1
Function Call: WRITE
  • Prompt: "CDMIS VISIT history for client ",ACDDFN,!!
  • Line Location: DISPLAY2+2
Function Call: WRITE
  • Prompt: "----------",!
  • Line Location: DISPLAY2+3
Function Call: WRITE
  • Prompt: "----------",!
  • Line Location: DISPLAY2+6
Routine Call
  • DIR
  • Line Location:
    • GETMONTH+2
Routine Call
  • %ZIS
  • Line Location:
    • DISPLAY+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACDVIS - [#9002172.1] DISPLAY2+5
^DPT - [#2] GETPAT+6
^TMP("ACD" PATLOOP+5, PATLOOP+10, DISPLAY2+5

Label References

Name Line Occurrences
DISPLAY PATLOOP+16, PATLOOP+19
DISPLAY2 DISPLAY+3
DSPHIST PATLOOP+6
EOJ START+2, DISPLAY+7
GETMONTH PATLOOP+7
GETPAT PATLOOP+1
PATLOOP START+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACDDFN PATLOOP+5, PATLOOP+11, DISPLAY2+2, GETPAT+6*
>> ACDDFNP GETPAT+6*
>> ACDMONTH PATLOOP+9, PATLOOP+11, DISPLAY2+5, GETMONTH+5*
>> ACDQ START+1, PATLOOP+2, PATLOOP+4, PATLOOP+8, PATLOOP+18, GETPAT+1*, GETPAT+7*, GETMONTH+1*, GETMONTH+6*
ACDSLAVE PATLOOP+17, PATLOOP+19, PATLOOP+20!, DISPLAY+1, DISPLAY+5
>> ACDSTART PATLOOP+9*, PATLOOP+10, DISPLAY2+4
>> ACDVIEN DISPLAY2+5*
>> ACDX DISPLAY2+4*, DISPLAY2+5*
>> ACDY DISPLAY2+5*
>> AUPNLK("ALL" GETPAT+2*, GETPAT+4!
DA GETMONTH+2!
>> DIC GETPAT+3*
>> DIC("S" GETPAT+3*
>> DIC(0 GETPAT+3*
DIR GETMONTH+2!
DIR("A" GETMONTH+2*
DIR(0 GETMONTH+2*
>> DIRUT GETMONTH+3
IO PATLOOP+19, PATLOOP+20*, DISPLAY+2
IO("Q" PATLOOP+12
IO(0 PATLOOP+19, PATLOOP+20
IOF DISPLAY+4
>> IOP DISPLAY+1*
IOST PATLOOP+17, DSPHIST+1~, DSPHIST+2*, DISPLAY+4
U DISPLAY2+5, GETPAT+6
>> X PATLOOP+10*, PATLOOP+11
>> Y GETPAT+5, GETPAT+6, GETMONTH+4, GETMONTH+5
>> ZTDESC PATLOOP+13*
>> ZTDTH PATLOOP+13*
>> ZTQUEUED DISPLAY+7
>> ZTREQ DISPLAY+7*
>> ZTRTN PATLOOP+13*
>> ZTSAVE("ACD*" PATLOOP+13*
>> ZTSAVE("^TMP(""ACD"",$J,""VISITS""," PATLOOP+13*
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