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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: HLEVAPI0

Package: Health Level Seven

Routine: HLEVAPI0


Information

HLEVAPI0 ;O-OIFO/LJA - Event Monitor APIs ;02/04/2004 14:42

Source Information

Source file <HLEVAPI0.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Health Level Seven 7 $$BTE^HLCSMON  $$YN^HLCSRPT4  $$NEWEVENT^HLEVAPI  DEBUG^HLEVAPI2  EVENTONE^HLEVAPI3  ($$ASKIEN,HDR,RUNS7761,VIEW7769)^HLEVREP  ($$SDT,$$STAT2M)^HLEVX001  
Kernel 3 ^%ZTLOAD  ($$FMADD,$$FMTH,$$NOW)^XLFDT  ($$CJ,$$REPEAT,$$UP)^XLFSTR  
VA FileMan 1 ^DIE  

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

Package Total Caller Graph
Health Level Seven 6 HLEV EDIT MASTER ON-OFF  HLEV EDIT MONITOR ON-OFF  HLEVAPI1  HLEVAPI3  HLEVMST  HLEVSRV2  

Entry Points

Name Comments DBIA/ICR reference
ONOFFM(HLEVIENE,STATUS) ;Turn on/off event monitor...
  • ICR #4226
    • Status: Withdrawn
    • Usage: Controlled Subscription
    ONOFFS(HLEVIEN,STATUS) ; Turn on/off system...
    ONOFF(FILE,HLEVIENE,STATUS) ; Turn on/off event monitor or system...
    ; FILE can = 776.1 or 776.999
    ; Actually, HLEVIENE can be the IEN of the monitor, or the system.
    ; If STATUS="A", sets status to ACTIVE.
    ; If STATUS="I", sets status to INACTIVE.
    ; If STATUS=null or undefined (not passed), present status returned...
    ONOFFEV ; Turn on/off event monitor
    S7761
    VIEW7761(IEN) ; Actual display code for entry...
    SH7761(TAG,VAL) ;
    ONOFFPAR ; Turn on/off parameters...
    ACTINACT(FILE,IEN,FLD,TAG) ; Turn on/off status fields...
    EVENTCHK(HLEVIENM) ; Loop thru all MONITORs...
    ; NOEVCHK,ZTSKMST -- req
    EVRES(HLEVIENM,HLEVIENE,RES,HLEVIENJ) ; Record result of queued task...
    ; ZTSK -- req
    RUNEV(LASTRUN,LAPSE) ; Is LASTRUN (FM) LAPSE(min) before NOW?
    OKMCODE(MREF) ; Is this a valid M subrtn^rtn reference?
    Q1TIME(HLEVIENE,OVERRIDE,QTIME,XTMP) ; Start a one-time run of event monitor (w/no master job)
    EOR ;HLEVAPI0 - Event Monitor APIs ;5/16/03 14:42

    External References

    Name Field # of Occurrence
    ^%ZTLOAD Q1TIME+28
    ^DIE ONOFF+37, ONOFF+50, ACTINACT+6, Q1TIME+33
    $$BTE^HLCSMON ONOFFPAR+15
    $$YN^HLCSRPT4 ACTINACT+3
    $$NEWEVENT^HLEVAPI Q1TIME+18
    DEBUG^HLEVAPI2 ONOFFM+1
    EVENTONE^HLEVAPI3 EVENTCHK+11
    $$ASKIEN^HLEVREP S7761+2
    HDR^HLEVREP ONOFFEV+4, S7761+3, S7761+18
    RUNS7761^HLEVREP S7761+5
    VIEW7769^HLEVREP ONOFFPAR+3, ONOFFPAR+11
    $$SDT^HLEVX001 S7761+14
    $$STAT2M^HLEVX001 S7761+14
    $$FMADD^XLFDT RUNEV+3
    $$FMTH^XLFDT Q1TIME+22
    $$NOW^XLFDT EVRES+20, RUNEV+3
    $$CJ^XLFSTR VIEW7761+14
    $$REPEAT^XLFSTR S7761+8, S7761+10
    $$UP^XLFSTR ONOFF+14, ONOFF+22, EVRES+6

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !
    • Line Location: S7761+1
    Function Call: WRITE
    • Prompt: !!,"Recent Checks of the Monitor by Master Job"
    • Line Location: S7761+7
    Function Call: WRITE
    • Prompt: !,$$REPEAT^XLFSTR("-",IOM)
    • Line Location: S7761+8
    Function Call: WRITE
    • Prompt: !,"Check-time",?18,"Results"
    • Line Location: S7761+9
    Function Call: WRITE
    • Prompt: !,$$REPEAT^XLFSTR("-",IOM)
    • Line Location: S7761+10
    Function Call: WRITE
    • Prompt: !,$$SDT^HLEVX001($P(DATA,U,2)),?18,$$STAT2M^HLEVX001($P(DATA,U))
    • Line Location: S7761+14
    Function Call: WRITE
    • Prompt: !
    • Line Location: S7761+15
    Function Call: WRITE
    • Prompt: !
    • Line Location: S7761+20
    Function Call: WRITE
    • Prompt: !,$$CJ^XLFSTR(" Parameter ""Variable"" Descriptors ",IOM,"-")
    • Line Location: VIEW7761+14
    Function Call: WRITE
    • Prompt: !,?25,"Parameter - "_PCE_" = ",PAR(PCE)
    • Line Location: VIEW7761+16
    Function Call: WRITE
    • Prompt: !,?(35-$L(TAG)-2),TAG,":",?45,VAL
    • Line Location: SH7761+1
    Function Call: WRITE
    • Prompt: !
    • Line Location: ONOFFPAR+5
    Function Call: WRITE
    • Prompt: !
    • Line Location: ONOFFPAR+13
    Function Call: WRITE
    • Prompt: !
    • Line Location: ONOFFPAR+14
    Function Call: WRITE
    • Prompt: " ... nothing changed ..."
    • Line Location: ACTINACT+4
    Function Call: WRITE
    • Prompt: " changed!"
    • Line Location: ACTINACT+7
    Routine Call
    • DIE
    • Line Location:
      • ONOFF+37
      • ONOFF+50
      • ACTINACT+6
      • Q1TIME+33

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^HLEV( ONOFF+20, ONOFF+22, ONOFF+26, ACTINACT+2
    ^HLEV(776 - [#776] EVRES+5, EVRES+9, EVRES+11*, Q1TIME+30
    ^HLEV(776.1 - [#776.1] VIEW7761+3, VIEW7761+7, EVENTCHK+8, EVENTCHK+10, Q1TIME+10
    ^HLEV(776.2 - [#776.2] EVRES+17, EVRES+18, EVRES+21*
    ^HLEV(776.999 - [#776.999] EVENTCHK+5
    ^TMP("HLEVFLAG" ONOFFM+4
    ^TMP($J S7761+6, S7761+12, S7761+13
    ^XMB(3.8 - [#3.8] VIEW7761+12

    Label References

    Name Line Occurrences
    $$ACTINACT S7761+16, ONOFFPAR+8, ONOFFPAR+9
    $$ONOFF ONOFFM+6, ONOFFS+1
    S7761 S7761+22
    SH7761 VIEW7761+9, VIEW7761+10, VIEW7761+11, VIEW7761+12, VIEW7761+13
    VIEW7761 S7761+4, S7761+19

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    CHG ONOFFEV+1~, S7761+16*, S7761+17, ONOFFPAR+1~, ONOFFPAR+7*, ONOFFPAR+8*, ONOFFPAR+9*, ONOFFPAR+11
    DA ONOFF+7~, ONOFF+36*, ONOFF+49*, ACTINACT+1~, ACTINACT+5*, Q1TIME+31~, Q1TIME+32*
    DATA ONOFF+7~, ONOFF+26*, ONOFF+29, ONOFFEV+3~, S7761!, S7761+13*, S7761+14, Q1TIME+1~, Q1TIME+10*, Q1TIME+11
    , Q1TIME+14
    DIC ONOFFEV+3~, S7761!
    DIE ONOFF+7~, ONOFF+36*, ONOFF+49*, ACTINACT+1~, ACTINACT+5*, Q1TIME+31~, Q1TIME+32*
    DR ONOFF+7~, ONOFF+36*, ONOFF+49*, ACTINACT+1~, ACTINACT+5*, Q1TIME+31~, Q1TIME+32*
    FILE ONOFF~, ONOFF+10*, ONOFF+12, ONOFF+20, ONOFF+22, ONOFF+26, ONOFF+36, ONOFF+49, ACTINACT~, ACTINACT+2
    , ACTINACT+5
    FLD ACTINACT~, ACTINACT+2, ACTINACT+5
    HLEVIEN ONOFFS~, ONOFFS+1
    HLEVIENE ONOFFM~, ONOFFM+6, ONOFF~, ONOFF+11*, ONOFF+12*, ONOFF+18, ONOFF+19, ONOFF+20, ONOFF+22, ONOFF+23*
    , ONOFF+26, ONOFF+36, ONOFF+49, EVENTCHK+2~, EVENTCHK+9*, EVENTCHK+10*, EVENTCHK+11, EVRES~, EVRES+17, Q1TIME~
    , Q1TIME+10, Q1TIME+18, Q1TIME+23
    HLEVIENE(1 ONOFF+20*, ONOFF+21, ONOFF+22*, ONOFF+23
    HLEVIENJ EVRES~, EVRES+5, EVRES+9, EVRES+11, Q1TIME+1~, Q1TIME+18*, Q1TIME+19, Q1TIME+30, Q1TIME+32, Q1TIME+35
    HLEVIENM EVENTCHK~, EVENTCHK+11, EVRES~, EVRES+14, EVRES+17, EVRES+18, EVRES+21, Q1TIME+15*
    HLEVNM EVENTCHK+2~, EVENTCHK+7*, EVENTCHK+8*, EVENTCHK+10, EVENTCHK+11, Q1TIME+1~, Q1TIME+14*
    IEN ONOFFEV+3~, S7761!, S7761+2*, S7761+3, S7761+4, S7761+5, S7761+16, S7761+18, S7761+19, VIEW7761~
    , VIEW7761+3, VIEW7761+7, ACTINACT~, ACTINACT+2, ACTINACT+5
    IENR ONOFFEV+3~, S7761!, S7761+11*, S7761+12*, S7761+13
    IOM S7761+8, S7761+10, VIEW7761+14
    IOSL S7761+20, ONOFFPAR+14
    LAPSE RUNEV~, RUNEV+3
    LASTRUN RUNEV~, RUNEV+2, RUNEV+4
    MIEN EVRES+2~, EVRES+17*, EVRES+18, EVRES+21
    MREF OKMCODE~, OKMCODE+2
    >> NO EVENTCHK+5*
    NODE VIEW7761+1~, VIEW7761+3*, VIEW7761+4, EVRES+2~, EVRES+18*, EVRES+20*, EVRES+21
    >> NOEVCHK EVENTCHK+12*
    OVERRIDE Q1TIME~, Q1TIME+4*, Q1TIME+11
    P1 VIEW7761+1~
    P2 VIEW7761+1~, VIEW7761+10
    P3 VIEW7761+1~, VIEW7761+9
    P4 VIEW7761+1~, VIEW7761+11
    P5 VIEW7761+1~, VIEW7761+12
    P6 VIEW7761+1~, VIEW7761+13
    PAR VIEW7761+1~
    PAR( VIEW7761+7*, VIEW7761+15, VIEW7761+16
    PCE VIEW7761+1~, VIEW7761+4*, VIEW7761+7*, VIEW7761+15*, VIEW7761+16
    QTIME Q1TIME~, Q1TIME+7*, Q1TIME+18, Q1TIME+22
    RES EVRES~, EVRES+6*, EVRES+11, EVRES+14, EVRES+20
    STAT ONOFF+7~, ONOFF+29*, ONOFF+32, ONOFF+34*, ONOFF+38*, ONOFF+41, ONOFF+46, ACTINACT+1~, ACTINACT+2*, ACTINACT+3
    , ACTINACT+5
    STATUS ONOFFM~, ONOFFM+6, ONOFFS~, ONOFFS+1, ONOFF~, ONOFF+13, ONOFF+14*, ONOFF+15, ONOFF+34, ONOFF+36
    , ONOFF+38, ONOFF+41, ONOFF+46, ONOFF+49, ONOFF+52, EVRES+2~, EVRES+5*, EVRES+11
    TAG SH7761~, SH7761+1, ACTINACT~, ACTINACT+3
    TXT OKMCODE+1~, OKMCODE+3*, OKMCODE+4
    U ONOFF+29, S7761+14, VIEW7761+4, VIEW7761+7, VIEW7761+12, ACTINACT+2, EVENTCHK+5, EVRES+5, EVRES+11, EVRES+20
    , Q1TIME+11, Q1TIME+14, Q1TIME+35
    VAL SH7761~, SH7761+1
    WHENRUN RUNEV+1~, RUNEV+3*, RUNEV+4
    X ONOFF+7~, ONOFFPAR+8*, ONOFFPAR+9*, ONOFFPAR+15*, ACTINACT+1~, ACTINACT+3*
    XTMP Q1TIME~, Q1TIME+27
    Y ONOFF+7~, ACTINACT+1~
    ZTDESC Q1TIME+1~, Q1TIME+23*
    ZTDTH Q1TIME+1~, Q1TIME+22*
    ZTIO Q1TIME+1~, Q1TIME+22*
    ZTRTN Q1TIME+1~, Q1TIME+24*
    ZTSAVE Q1TIME+1~
    ZTSAVE("HLEVIENE" Q1TIME+25*
    ZTSAVE("HLEVIENJ" Q1TIME+25*
    ZTSAVE("HLEVIENM" Q1TIME+26*
    ZTSAVE("HLEVNM" Q1TIME+26*
    ZTSAVE("XTMP" Q1TIME+27*
    ZTSK Q1TIME+1~, Q1TIME+30, Q1TIME+32, Q1TIME+35

    Marked Items

    Name Field # of Occurrence
    $T(@MREF OKMCODE+3
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All