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

Package: Mental Health Social Services

Routine: AMHEYD


Information

AMHEYD ; IHS/CMI/LAB - MAIN DRIVER FOR PCC EXPORT TX GEN AUGUST 14, 1992 ; 22 Jun 2017 12:04 PM

Source Information

Source file <AMHEYD.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Mental Health Social Services 7 RECORD^AMHEYD2  ^AMHEYDI  ERRBULL^AMHEYDI3  (,RUNTIME)^AMHEYEOJ  ^AMHEYLOG  EN^AMHEYTAP  CALLDIE^AMHLEIN  
VA Fileman 2 NOW^%DTC  ^DIR  
IHS Patient 1 KILL^AUPNPAT  
IHS VA Utilities 1 ^XBFMK  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Mental Health Social Services 1 AMHEYRE  

Entry Points

Name Comments DBIA/ICR reference
RESET ; kill MHSS xref and set flag if tx 23 or 24 generated
CNTBUILD ;count and build tx
PURGESF ; PURGE 'AEX' XREF FOR MHSS RECORDS JUST DONE
ERRLOG ;EP
PROCESS ;
EOJ ; EOJ
PURGE2 ;
DRIVER ;called from TSKMN+2
PURGE ; PURGE 'AEX' XREF FOR MHSS RECORDS JUST DONE
START ;
PURGE2SF ;
ABORT ; ABNORMAL TERMINATION
TAPE ; COPY TRANSACTIONS TO TAPE
RESETSF ; kill MHSS xref and set flag if tx 23 or 24 generated
PROCESS3 ;
PROCESS2 ;
CHKLOG ; CHECK LOG FILE
ERR ;
VERSION() ;EP

External References

Name Field # of Occurrence
NOW^%DTC DRIVER+2
RECORD^AMHEYD2 PROCESS3+9
^AMHEYDI START+3
ERRBULL^AMHEYDI3 TAPE+1, ABORT+2, ERR+3
^AMHEYEOJ EOJ+1
RUNTIME^AMHEYEOJ DRIVER+11
^AMHEYLOG DRIVER+8
EN^AMHEYTAP TAPE+1
CALLDIE^AMHLEIN DRIVER+3, PROCESS+25, PROCESS3+15, RESET+2, RESETSF+2, ERR+2
KILL^AUPNPAT PROCESS3+2
^DIR DRIVER+14, ABORT+4
^XBFMK PROCESS3+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Okay, your request is queued! Bye",!
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !!,"Bye",!!
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: DRIVER+14
Function Call: WRITE
  • Prompt: !,"-->There are more than twelve generations of MHSS RECORDs stored in the LOG file.",!,"-->Time to do a purge."
  • Line Location: CHKLOG+3
Function Call: WRITE
  • Prompt: !!,"Abnormal termination!! QFLG=",AMH("QFLG")
  • Line Location: ABORT+3
Routine Call
  • DIR
  • Line Location:
    • DRIVER+14
    • ABORT+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AMHREC - [#9002011] Classic Fileman Calls
^AMHPSUIC - [#9002011.65] Classic Fileman Calls
^AMHXLOG - [#9002014] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMHDTER("B" ABORT+1
^AMHERR - [#9002014.3] ERRLOG+2
^AMHERR("B" ERRLOG+1
^AMHPSUIC - [#9002011.65] PROCESS+9, PROCESS+10
^AMHPSUIC("AEX" PROCESS+7, PROCESS+8, PROCESS+9!, RESETSF+1!
^AMHREC - [#9002011] PROCESS3+7
^AMHREC("AEX" PROCESS+3, PROCESS2+1, RESET+1!
^AMHRECD - [#9002014.1] PROCESS+14, PROCESS+16, PROCESS+17, PROCESS+18
^AMHRECD("B" PROCESS+12
^AMHXLOG - [#9002014] PROCESS+24, PROCESS3+3, PROCESS3+12, CHKLOG+2
^BHSXDATA PROCESS+23*, CNTBUILD+4*
^XTMP("AMH" CNTBUILD+3*
^XTMP("AMHDR" PROCESS3+4*, PURGE+3, PURGE+4!, PURGE2+1, RESET+2
^XTMP("AMHSF" PROCESS+22*, PURGESF+3, PURGESF+4!, PURGE2SF+1, RESETSF+2

Label References

Name Line Occurrences
ABORT START+6, DRIVER+4, DRIVER+7, DRIVER+9, DRIVER+13
CNTBUILD PROCESS3+10
EOJ START+4, START+5, DRIVER+15, ABORT+2, ABORT+5
ERR ERRLOG+1
ERRLOG CNTBUILD+1
PROCESS DRIVER+6
PROCESS2 PROCESS+3
PROCESS3 PROCESS2+1
PURGE DRIVER+10
PURGE2 PURGE+3
PURGE2SF PURGESF+3
PURGESF DRIVER+10
RESET PURGE2+1
RESETSF PURGE2SF+1
TAPE DRIVER+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DRIVER+2!
%H DRIVER+2!
%I DRIVER+2!
>> AMH("BT" DRIVER+1*
>> AMH("CONTROL DATE" , PROCESS+2*, PROCESS+3*, PROCESS+6*, PROCESS+7*, PROCESS+8, PROCESS+9, PROCESS+22, PROCESS2+1, PROCESS3+4
>> AMH("COUNT" PROCESS+21*, PROCESS+23, CNTBUILD+2*, CNTBUILD+4
>> AMH("ERROR CO UNT" , CNTBUILD+1*
>> AMH("I" CHKLOG+2*
>> AMH("MAIN TX DATE" , DRIVER+2*, PROCESS+22, CNTBUILD+3
>> AMH("POSTING DATE" , PROCESS+2*
>> AMH("QFLG" START+5, START+6, DRIVER+7, DRIVER+9, DRIVER+13, PROCESS+3, PROCESS2+1, TAPE+1, ABORT+1, ABORT+3
, ERR+3*
>> AMH("QFLG1" ABORT+1*
>> AMH("RUN BEGI N" , PROCESS+2
>> AMH("RUN END" , PROCESS+3, PROCESS+7
>> AMH("RUN LOG" , DRIVER+3, PROCESS+24, PROCESS+25, PROCESS3+3, PROCESS3+12, PROCESS3+13, CHKLOG+2, ABORT+1, ERR+1
>> AMH("RUN STAR T" , DRIVER+2*, DRIVER+3
>> AMH("T-INIT" PROCESS+2*
>> AMH("X" CHKLOG+2*, CHKLOG+3
>> AMHCNT DRIVER+5*, PROCESS3+5, RESET+3, RESETSF+3
>> AMHCNT1 DRIVER+5*
>> AMHCNT2 DRIVER+5*
>> AMHCNTR PROCESS+2*, PROCESS+6*, PURGE+2*, PURGESF+2*
AMHE PROCESS3+1!, PROCESS3+9!, CNTBUILD+1, ERRLOG+1, ERRLOG+2
AMHE("ERR DFN " , ERRLOG+1*, ERRLOG+2
AMHE("MSG" ERRLOG+1*, ERRLOG+2*, ERR+1
>> AMHO("QUEUE" START+4
>> AMHO("RUN" START+2*, CNTBUILD+3
>> AMHO("SCHEDULED" START+1*
>> AMHR PROCESS2+1*, PROCESS3+3, PROCESS3+4, PROCESS3+7, PROCESS3+12, PROCESS3+13, PURGE2+1*, RESET+1, RESET+2, PURGE2SF+1*
, RESETSF+1, RESETSF+2, CNTBUILD+3, ERR+1
>> AMHRACE PROCESS+11*
>> AMHREC PROCESS3+7*, PROCESS3+8
>> AMHRIEN PROCESS+12*, PROCESS+13, PROCESS+14, PROCESS+16, PROCESS+17, PROCESS+18
>> AMHSFC PROCESS+21*
>> AMHSFIEN PROCESS+8*, PROCESS+9, PROCESS+10, PROCESS+22, PROCESS+24, PROCESS+25
>> AMHSFR PROCESS+6*
>> AMHSREC PROCESS+10*, PROCESS+11
AMHT PROCESS3+1!
>> AMHTOTV PROCESS+2*, PROCESS3+6*
AMHTX PROCESS+14*, PROCESS+19*, PROCESS+23, PROCESS3+9!, CNTBUILD+4
AMHV PROCESS3+1!
AMHV("R DATE" , PROCESS3+8*, PURGE+2*, PURGE+3*, PURGE2+1, RESET+1, PURGESF+2*, PURGESF+3*, PURGE2SF+1, RESETSF+1
, RESETSF+2
AMHV("TX GENE RATED" , PROCESS3+4*, PROCESS3+14, CNTBUILD+3*
>> AMHY PROCESS+14*, PROCESS+16, PROCESS+19
>> AMHZ PROCESS+16*, PROCESS+17, PROCESS+18
>> DA DRIVER+3*, PROCESS+25*, PROCESS3+13*, RESET+2*, RESETSF+2*, ABORT+1*, ERR+1*
>> DFN PROCESS+11*
DIE DRIVER+3*, PROCESS+25*, PROCESS3+13*, RESET+2*, RESETSF+2*, ABORT+1*, ERR+1!*
DIR DRIVER+14!, ABORT+4!
DIR("A" DRIVER+14*, ABORT+4*
DIR(0 DRIVER+14*, ABORT+4*
>> DIRUT DRIVER+14*, ABORT+4*
DR DRIVER+3*, PROCESS+25*, PROCESS3+13*, RESET+2*, RESETSF+2*, ABORT+1*, ERR+1!*
DR(2 PROCESS3+14*, ERR+1*
>> DUOUT DRIVER+14, ABORT+4
U PROCESS+11, PROCESS+19, ERRLOG+2
>> X PROCESS+15*, PROCESS+19
>> Y DRIVER+4, ERR+3
>> ZTQUEUED START+1, DRIVER+5, DRIVER+14, PROCESS+1, PROCESS+5, PURGE+1, PURGESF+1, TAPE+1, ABORT+2, ERR+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