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 |  Label References |  Local Variables  | All
Print Page as PDF
Routine: EASMTL1

Package: Enrollment Application System

Routine: EASMTL1


Information

EASMTL1 ;MIN/TCM ALB/SCK/AEG/PHH - AUTOMATED MEANS TEST LETTER - PATIENT SEARCH ; 07/2/01

Source Information

Source file <EASMTL1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 3 (,$$S)^%ZTLOAD  ($$DT,$$FMADD,$$FMTE,$$NOW)^XLFDT  $$VERSION^XPDUTL  
VA FileMan 3 ^DIE  $$GET1^DIQ  ^DIR  
Enrollment Application System 2 EN60^EASMTL2  ($$LOCK,$$SUBLEAP,ALERT,PAUSE)^EASMTUTL  
MailMan 1 ^XMD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Enrollment Application System 2 EAS MT LETTERS BG SEARCH  EAS MT LETTERS SEARCH  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
QUEUE ; Main entry point for tasked (background) letter search
SETDT(EASRUN) ;
; Input
; EASRUN - Default start date for processing
EN ; Main entry point for processing
BLDLST(FRDT,TODT) ; Build processing date list
; Input
; FRDT - Beginning date for processing list
; TODT - Ending date for processing list
PROCESS ; Get anniversary and threshold dates
UPDPARAM(EASDT) ; Update the EAS Parameter file, #713
; Input
; EASDT - Today's date
STATS(EASLAST,EAS6CNT,EASDT) ;Gather and print statistics
; Input
; EASLAST - Last date processed (Beginning date)
; EAS6CNT - Array of 60 day letters
; EASDT - Ending date of processing

External References

Name Field # of Occurrence
^%ZTLOAD QUEUE+7
$$S^%ZTLOAD PROCESS+19
^DIE UPDPARAM+8
$$GET1^DIQ EN+4
^DIR SETDT+15, SETDT+23
EN60^EASMTL2 PROCESS+17
$$LOCK^EASMTUTL EN+18, EN+26
$$SUBLEAP^EASMTUTL PROCESS+11
ALERT^EASMTUTL EN+20, EN+32
PAUSE^EASMTUTL EN+10, EN+22
$$DT^XLFDT EN+5
$$FMADD^XLFDT EN+12, EN+14, BLDLST+8, PROCESS+11, PROCESS+12, PROCESS+13, PROCESS+14
$$FMTE^XLFDT SETDT+12, SETDT+19, EN+20, EN+31, PROCESS+8, STATS+17, STATS+18, STATS+30, STATS+32
$$NOW^XLFDT QUEUE+5, EN+31
^XMD STATS+36
$$VERSION^XPDUTL STATS+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$CHAR(7),">> The Means Test Letter search has been run for today.",!
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !!,$CHAR(7),"This process is already running, please try again later"
  • Line Location: EN+21
Function Call: WRITE
  • Prompt: !?5,">> Processing date "_$$FMTE^XLFDT(EASPRCDT)_" in progress <<",!
  • Line Location: PROCESS+8
Routine Call
  • DIE
  • Line Location:
    • UPDPARAM+8
Routine Call
  • DIR
  • Line Location:
    • SETDT+15
    • SETDT+23

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^EAS(713 - [#713] Classic Fileman Calls,  GET1^DIQ

Label References

Name Line Occurrences
$$SETDT EN+15
BLDLST EN+24
PROCESS EN+25
STATS EN+28
UPDPARAM EN+27

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA UPDPARAM+4~, UPDPARAM+6*
DIE UPDPARAM+4~, UPDPARAM+6*, UPDPARAM+8!
DIR SETDT+9~, SETDT+15!, SETDT+23!
DIR("?" SETDT+20*
DIR("A" SETDT+11*, SETDT+12*, SETDT+13*, SETDT+21*, SETDT+22*
DIR("B" SETDT+14*, SETDT+19*
DIR(0 SETDT+14*, SETDT+19*
DIRUT SETDT+9~, SETDT+16, SETDT+24
DR UPDPARAM+4~, UPDPARAM+6*, UPDPARAM+7*
DT EN+14, STATS+12
EADT EN+1~, EN+5*, EN+7, EN+20, EN+24, EN+27, EN+28
EAS0CNT EN+1~, PROCESS+3*
EAS3CNT EN+1~, PROCESS+3*
EAS6CNT EN+1~, EN+28, PROCESS+3*, STATS~, STATS+20
EAS6CNT( STATS+27, STATS+28, STATS+30
EASABRT EN+1~, EN+13, EN+15*
EASD STATS+6~, STATS+26*, STATS+27*, STATS+28, STATS+30
EASDT EN+1~, PROCESS+7!, UPDPARAM~, STATS~, STATS+18, STATS+32
EASDT("0" PROCESS+14*
EASDT("30" PROCESS+13*
EASDT("60" PROCESS+12*
EASDT("ANV" PROCESS+11*, PROCESS+12, PROCESS+13, PROCESS+14
EASDTFLG EN+1~
EASLAST EN+1~, EN+12*, EN+14*, EN+15, EN+24, EN+28, STATS~, STATS+17
EASLST EN+1~
EASLST( BLDLST+7*, BLDLST+8*, PROCESS+6
EASN EN+1~, BLDLST+5~, BLDLST+7*, BLDLST+8*
EASPRCDT PROCESS+1~, PROCESS+5*, PROCESS+6*, PROCESS+8, PROCESS+11
EASRUN SETDT~, SETDT+12, SETDT+19, SETDT+25*
EASX EN+1~, EN+4*, EN+7, EN+12, EN+13, EN+26*
FRDT BLDLST~, BLDLST+7
LINE STATS+6~, STATS+22*, STATS+24*, STATS+25, STATS+29*, STATS+30
MSG EN+1~, EN+31*, EN+32, STATS+6~
MSG( STATS+14*, STATS+15*, STATS+16*, STATS+17*, STATS+18*, STATS+19*, STATS+25*, STATS+30*
MSG(11 STATS+20*
MSG(16 STATS+21*
RSLT SETDT+9~
TODT BLDLST~, BLDLST+7, BLDLST+8
TOT STATS+6~
X EN+1~
XMDUZ STATS+6~, STATS+35*
XMSUB STATS+6~, STATS+32*
XMTEXT STATS+6~, STATS+33*
XMY STATS+6~
XMY("G.EAS MT LETTERS" , STATS+34*
>> Y SETDT+17, SETDT+25
ZDATE QUEUE+1~, QUEUE+5*
ZDCD STATS+6~, STATS+9*, STATS+12*, STATS+20, STATS+25
ZTDESC QUEUE+1~, QUEUE+4*
ZTDTH QUEUE+1~, QUEUE+5*
ZTIO QUEUE+1~, QUEUE+6*
>> ZTQUEUED EN+8, EN+15, EN+19, EN+30, PROCESS+8, PROCESS+19, UPDPARAM+7
ZTRTN QUEUE+1~, QUEUE+3*
ZTSK QUEUE+1~
>> ZTSTOP PROCESS+6, PROCESS+19*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables  | All