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  | All
Print Page as PDF
Routine: XULMU

Package: Kernel

Routine: XULMU


Information

XULMU ;IRMFO-ALB/CJM/SWO/RGG - KERNEL LOCK MANAGER ;11/16/2012

Source Information

Source file <XULMU.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 ($$NXTLOCK,$$OSUSER,LOCKQRY)^%ZLMLIB  $$VERSION^%ZOSV  ($$FMADD,$$FMTE,$$NOW)^XLFDT  $$BASE^XLFUTL  
VA FileMan 3 (FILE,UPDATE)^DIE  ($$IENS,CLEAN)^DILF  ^DIR  

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

Package Total Caller Graph
Kernel 11 XU8P608  XULM  XULM EDIT PARAMETERS  XULM1  XULMLD  XULMLOG  XULMP  XULMRPC  
XULMUI  XULMUI1  XUMF IMF EDIT  

Entry Points

Name Comments DBIA/ICR reference
GETLOCKS(LOCKS) ;
OWNER(PID,SYSTEM) ;Return the DUZ^<name> of owner of this process
PAT(DFN) ;
  • ICR #5832
    • Status: Active
    • Usage: Supported
    ADDPAT(DFN) ;
  • ICR #5832
    • Status: Active
    • Usage: Supported
    PAUSE(MSG) ;
    PAUSE2(MSG) ;
    ASKYESNO(PROMPT,DEFAULT) ;
    IFSYSTEM(LOCK) ;returns 1 if system lock, 0 otherwise
    NODE() ;Get Cache' instance name for this process
    VOLUME() ;Returns the namespace of current environment
    SAMENODE(NODE) ;Is the current process running on the indicated node?
    OS() ;Get OS
    HEX(DEC) ;Convert decimal number to hexidecimal
    ADD(FILE,DA,DATA,ERROR,IEN) ;
    DELETE(FILE,DA,ERROR) ;
    UPD(FILE,DA,DATA,ERROR) ;File data into an existing record.
    ; Input:
    ; FILE - File or sub-file number
    ; DA - Traditional DA array, with same meaning.
    ; Pass by reference.
    ; DATA - Data array to file (pass by reference)
    SETCLEAN(RTN,VAR) ;
  • ICR #5832
    • Status: Active
    • Usage: Supported
    CLEANUP(XULAST,DOLLARJ) ;
  • ICR #5832
    • Status: Active
    • Usage: Supported
    UNCLEAN(LAST,DOLLARJ) ;
  • ICR #5832
    • Status: Active
    • Usage: Supported
    TEMPLATE(IEN) ;Returns the lock template, with the "^" prefix if it is on a global

    External References

    Name Field # of Occurrence
    $$NXTLOCK^%ZLMLIB GETLOCKS+9
    $$OSUSER^%ZLMLIB OWNER+6
    LOCKQRY^%ZLMLIB GETLOCKS+6
    $$VERSION^%ZOSV OS+2
    FILE^DIE UPD+26
    UPDATE^DIE ADD+38
    $$IENS^DILF ADD+33, UPD+22
    CLEAN^DILF ADD+45, UPD+32
    ^DIR PAUSE+6, PAUSE2+8, ASKYESNO+12
    $$FMADD^XLFDT SETCLEAN+25
    $$FMTE^XLFDT ADDPAT+7
    $$NOW^XLFDT SETCLEAN+25, SETCLEAN+26
    $$BASE^XLFUTL HEX+1

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,MSG,!
    • Line Location: PAUSE+3
    Function Call: WRITE
    • Prompt: !,MSG,!
    • Line Location: PAUSE2+3
    Function Call: WRITE
    • Prompt: !
    • Line Location: PAUSE2+6
    Function Call: WRITE
    • Prompt: !,"DONE"
    • Line Location: ADD+20
    Function Call: WRITE
    • Prompt: !,"DONE"
    • Line Location: ADD+23
    Function Call: WRITE
    • Prompt: !,"DONE"
    • Line Location: UPD+14
    Routine Call
    • DIE
    • Line Location:
      • UPD+26
    Routine Call
    • DIE
    • Line Location:
      • ADD+38
    Routine Call
    • DIR
    • Line Location:
      • PAUSE+6
      • PAUSE2+8
      • ASKYESNO+12

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DPT - [#2] ADDPAT+4
    ^VA(200 - [#200] OWNER+5
    ^XLM(8993 - [#8993] TEMPLATE+2, TEMPLATE+3
    ^XLM(8993.1 - [#8993.1] IFSYSTEM+6, IFSYSTEM+8
    ^XTMP("XULM" SETCLEAN+22, CLEANUP+15, UNCLEAN+16
    ^XUTL("XQ" GETLOCKS+15, OWNER+4

    Label References

    Name Line Occurrences
    $$IFSYSTEM GETLOCKS+13
    $$NODE GETLOCKS+3, SAMENODE+2
    $$OWNER GETLOCKS+16
    $$UPD DELETE+4
    @( CLEANUP+23
    ADDPAT PAT+5

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DA ADD~, ADD+32*, ADD+33, ADD+46*, DELETE~, DELETE+4, UPD~, UPD+21, UPD+22
    DATA ADD~, DELETE+2~, DELETE+4, UPD~
    DATA( ADD+35, ADD+36, DELETE+3*, UPD+24, UPD+25
    DEC HEX~, HEX+1
    DEFAULT ASKYESNO~, ASKYESNO+11
    DFN PAT~, PAT+3, PAT+4, PAT+5, ADDPAT~, ADDPAT+2, ADDPAT+4
    DIERR ADD+25~, ADD+39, UPD+27, UPD+33
    DIR PAUSE+4~, PAUSE2+4~, ASKYESNO+8~
    DIR("A" ASKYESNO+10*
    DIR("B" ASKYESNO+11*
    DIR(0 PAUSE+5*, PAUSE2+7*, ASKYESNO+9*
    DIRUT PAUSE+4~, PAUSE+7, PAUSE2+9, ASKYESNO+13
    DOLLARJ CLEANUP~, CLEANUP+14*, CLEANUP+15, UNCLEAN~, UNCLEAN+15*, UNCLEAN+16
    DUZ OWNER+3
    ENTRY UNCLEAN+14~, UNCLEAN+19*, UNCLEAN+20*
    ERROR ADD~, ADD+40*, ADD+44*, DELETE~, DELETE+4, UPD~, UPD+21*, UPD+28*, UPD+30*
    ERRORS ADD+25~, UPD+16~
    ERRORS(1 ADD+40, UPD+28
    FDA ADD+25~, UPD+16~
    FDA( ADD+36*, UPD+25*
    FIELD ADD+25~, ADD+34*, ADD+35*, ADD+36, UPD+16~, UPD+23*, UPD+24*, UPD+25
    FILE ADD~, ADD+36, DELETE~, DELETE+4, UPD~, UPD+25
    FOUND IFSYSTEM+1~, IFSYSTEM+3*, IFSYSTEM+5, IFSYSTEM+6*, IFSYSTEM+11
    GBL SETCLEAN+21~, SETCLEAN+22*, SETCLEAN+24, SETCLEAN+25, SETCLEAN+26, SETCLEAN+27, SETCLEAN+28, SETCLEAN+29, UNCLEAN+14~, UNCLEAN+16*
    , UNCLEAN+18, UNCLEAN+20
    I IFSYSTEM+5*, SETCLEAN+21~, SETCLEAN+27*, SETCLEAN+28, SETCLEAN+29, SETCLEAN+30
    ID PAT+2!
    ID( ADDPAT+7*
    ID("IEN" PAT+3*, PAT+4*
    ID(0 PAT+3*, ADDPAT+6*, ADDPAT+7*
    IEN ADD~, ADD+37, ADD+41*, ADD+43*, ADD+46, ADD+47, TEMPLATE~, TEMPLATE+2, TEMPLATE+3
    IENA ADD+25~
    IENA(1 ADD+37*, ADD+43
    IENS ADD+25~, ADD+33*, ADD+36, UPD+16~, UPD+22*, UPD+25
    IOSL PAUSE2+6
    LAST UNCLEAN~, UNCLEAN+17*, UNCLEAN+18, UNCLEAN+20
    LEN IFSYSTEM+1~, IFSYSTEM+4*, IFSYSTEM+5
    LOCK GETLOCKS+8~, GETLOCKS+9, GETLOCKS+10, GETLOCKS+12, GETLOCKS+13, GETLOCKS+14, GETLOCKS+15, GETLOCKS+16, OWNER+8, IFSYSTEM~
    , IFSYSTEM+2, IFSYSTEM+4, IFSYSTEM+5, IFSYSTEM+10, TEMPLATE+1~, TEMPLATE+2*, TEMPLATE+3*, TEMPLATE+4
    LOCK( GETLOCKS+10, GETLOCKS+12
    LOCKS GETLOCKS~, GETLOCKS+4, GETLOCKS+12, GETLOCKS+13, GETLOCKS+14, GETLOCKS+15, GETLOCKS+16
    MSG PAUSE~, PAUSE+3, PAUSE2~, PAUSE2+3
    NEXT IFSYSTEM+7~, IFSYSTEM+8*, IFSYSTEM+9, IFSYSTEM+10
    NODE GETLOCKS+1~, GETLOCKS+3*, GETLOCKS+4, GETLOCKS+12, GETLOCKS+13, GETLOCKS+14, GETLOCKS+15, GETLOCKS+16, ADDPAT+3~, ADDPAT+4*
    , ADDPAT+5, ADDPAT+7, SAMENODE~, SAMENODE+3
    NOTFOUND IFSYSTEM+1~, IFSYSTEM+3*, IFSYSTEM+5, IFSYSTEM+9*, IFSYSTEM+10*
    OWNER OWNER+1~, OWNER+2*, OWNER+5*, OWNER+6*, OWNER+7*, OWNER+8*, OWNER+9
    OWNERDUZ OWNER+1~, OWNER+2*, OWNER+3*, OWNER+4*, OWNER+5, OWNER+9
    PID GETLOCKS+8~, GETLOCKS+10*, GETLOCKS+11, GETLOCKS+14, GETLOCKS+15, GETLOCKS+16, OWNER~, OWNER+3, OWNER+4, OWNER+6
    PROMPT ASKYESNO~, ASKYESNO+10
    QUIT GETLOCKS+1~, GETLOCKS+5*, GETLOCKS+7, GETLOCKS+9*, PAUSE2+4~, PAUSE2+5*, PAUSE2+9*, PAUSE2+10
    RSET GETLOCKS+1~, GETLOCKS+6, GETLOCKS+9
    RTN SETCLEAN~, SETCLEAN+28
    SNODE SAMENODE+1~, SAMENODE+2*, SAMENODE+3
    SUB IFSYSTEM+1~, IFSYSTEM+5*, IFSYSTEM+6, IFSYSTEM+8
    SYSTEM OWNER~, OWNER+6
    VAR SETCLEAN~, SETCLEAN+29
    X PAUSE+4~, PAUSE2+4~, OS+1~, OS+2*, OS+3
    XUENTRY CLEANUP+13~, CLEANUP+17*, CLEANUP+18*, CLEANUP+20, CLEANUP+22, CLEANUP+24
    XUGBL CLEANUP+13~, CLEANUP+15*, CLEANUP+18, CLEANUP+20, CLEANUP+22, CLEANUP+24
    XULAST CLEANUP~, CLEANUP+16*, CLEANUP+18
    XURTN CLEANUP+19~, CLEANUP+20*, CLEANUP+23
    XUVAR CLEANUP+19~, CLEANUP+21*, CLEANUP+22*~
    Y PAUSE+4~, PAUSE+7, PAUSE2+4~, PAUSE2+9, ASKYESNO+8~, ASKYESNO+14
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All