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

Package: Mental Health Social Services

Routine: AMHEXD


Information

AMHEXD ; IHS/CMI/LAB - MAIN DRIVER FOR PCC EXPORT TX GEN AUGUST 14, 1992 ;

Source Information

Source file <AMHEXD.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Mental Health Social Services 8 RECORD^AMHEXD2  ^AMHEXDI  ERRBULL^AMHEXDI3  (,RUNTIME)^AMHEXEOJ  ^AMHEXERR  ^AMHEXLOG  EN^AMHEXTAP  CALLDIE^AMHLEIN  
VA Fileman 2 NOW^%DTC  ^DIR  
IHS Patient 1 KILL^AUPNPAT  
IHS VA Utilities 1 ^XBFMK  

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
PROCESS ;
EOJ ; EOJ
PURGE2 ;
DRIVER ;called from TSKMN+2
PURGE ; PURGE 'AEX' XREF FOR MHSS RECORDS JUST DONE
START ;
ABORT ; ABNORMAL TERMINATION
TAPE ; COPY TRANSACTIONS TO TAPE
PROCESS3 ;
PROCESS2 ;
CHKLOG ; CHECK LOG FILE

External References

Name Field # of Occurrence
NOW^%DTC DRIVER+2
RECORD^AMHEXD2 PROCESS3+8
^AMHEXDI START+4
ERRBULL^AMHEXDI3 TAPE+3, ABORT+2
^AMHEXEOJ EOJ+1
RUNTIME^AMHEXEOJ DRIVER+11
^AMHEXERR CNTBUILD+1
^AMHEXLOG DRIVER+8
EN^AMHEXTAP TAPE+3
CALLDIE^AMHLEIN DRIVER+3, PROCESS3+13, RESET+2
KILL^AUPNPAT PROCESS3+2
^DIR DRIVER+16, ABORT+4
^XBFMK PROCESS3+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Okay, your request is queued! Bye",!
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !!,"Bye",!!
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: DRIVER+16
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+16
    • ABORT+4

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMHDTER("B" ABORT+1
^AMHREC - [#9002011] PROCESS3+6
^AMHREC("AEX" PROCESS+3, PROCESS2+1, RESET+1!
^AMHSDATA( CNTBUILD+5*
^AMHXLOG - [#9002014] PROCESS3+3, CHKLOG+2
^XTMP("AMH" CNTBUILD+3*
^XTMP("AMHDR" PROCESS3+4*, PURGE+3, PURGE+4!, PURGE2+1, RESET+2

Label References

Name Line Occurrences
ABORT START+7, DRIVER+4, DRIVER+7, DRIVER+9, DRIVER+14
CNTBUILD PROCESS3+9
EOJ START+5, START+6, DRIVER+17, ABORT+2, ABORT+5
PROCESS DRIVER+6
PROCESS2 PROCESS+3
PROCESS3 PROCESS2+1
PURGE DRIVER+10
PURGE2 PURGE+3
RESET PURGE2+1
TAPE DRIVER+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DRIVER+2!
%H DRIVER+2!
%I DRIVER+2!
>> AMH( CNTBUILD+4*
>> AMH("BT" DRIVER+1*
>> AMH("CONTROL DATE" , PROCESS+2*, PROCESS+3*, PROCESS2+1, PROCESS3+4
>> AMH("COUNT" CNTBUILD+2*, CNTBUILD+5
>> AMH("ERROR CO UNT" , CNTBUILD+1*
>> AMH("I" CHKLOG+2*
>> AMH("MAIN TX DATE" , DRIVER+2*, CNTBUILD+3
>> AMH("POSTING DATE" , PROCESS+2*
>> AMH("QFLG" START+6, START+7, DRIVER+7, DRIVER+9, DRIVER+14, PROCESS+3, PROCESS2+1, TAPE+3, ABORT+1, ABORT+3
>> AMH("QFLG1" ABORT+1*
>> AMH("RUN BEGI N" , PROCESS+2
>> AMH("RUN END" , PROCESS+3
>> AMH("RUN LOG" , DRIVER+3, PROCESS3+3, PROCESS3+11, CHKLOG+2, ABORT+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
>> AMHCNT1 DRIVER+5*
>> AMHCNT2 DRIVER+5*
>> AMHCNTR PROCESS+2*, PURGE+2*
AMHE PROCESS3+1!, PROCESS3+8!, CNTBUILD+1
>> AMHO("QUEUE" START+5
>> AMHO("RUN" START+3*, CNTBUILD+3
>> AMHO("SCHEDULED" START+2*
>> AMHR PROCESS2+1*, PROCESS3+3, PROCESS3+4, PROCESS3+6, PROCESS3+11, PURGE2+1*, RESET+1, RESET+2, CNTBUILD+3
>> AMHREC PROCESS3+6*, PROCESS3+7
AMHT PROCESS3+1!
AMHTX PROCESS3+8!, PROCESS3+12, CNTBUILD+4, CNTBUILD+5
AMHV PROCESS3+1!
AMHV("R DATE" , PROCESS3+7*, PURGE+2*, PURGE+3*, PURGE2+1, RESET+1
AMHV("TX GENE RATED" , PROCESS3+4*, PROCESS3+12, CNTBUILD+3*
>> DA DRIVER+3*, PROCESS3+11*, RESET+2*, ABORT+1*
>> DIE DRIVER+3*, PROCESS3+11*, RESET+2*, ABORT+1*
DIR DRIVER+16!, ABORT+4!
DIR("A" DRIVER+16*, ABORT+4*
DIR(0 DRIVER+16*, ABORT+4*
>> DIRUT DRIVER+16*, ABORT+4*
>> DR DRIVER+3*, PROCESS3+11*, RESET+2*, ABORT+1*
>> DR(2 PROCESS3+12*
>> DUOUT DRIVER+16, ABORT+4
>> Y DRIVER+4
>> ZTQUEUED START+2, DRIVER+5, DRIVER+16, PROCESS+1, PURGE+1, TAPE+3, ABORT+2
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