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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: XMPG

Package: MailMan

Routine: XMPG


Information

XMPG ;(WASH ISC)/THM/CAP-PackMan Global List/Load ;10/07/2003 12:16

Source Information

Source file <XMPG.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
MailMan 3 NEW^XMP  INIT^XMVVITAE  (ADDRNSND,CRE8XMZ)^XMXSEND  
Kernel 2 (,HOME)^%ZIS  ^%ZISC  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
IHS RPMS CHR System 1 BCHEXTAP  
MailMan 1 XMPGLO  
SAGG Project 1 KMPSGE  

Entry Points

Name Comments DBIA/ICR reference
LOAD ;LOAD GLOBAL INTO MESSAGE DEFINED IN <DIE>
EN
GP
K
MOVE ;MOVE GLOBAL INTO MESSAGE
POP
N ;GET NAME OF GLOBAL
S
R
ENT ;LOAD UP GLOBAL ENTRY POINT FROM OUTSIDE ROUTINES
; Input:
; DUZ Sender's DUZ
; XMSUB Message subject
; XMY Recipient array
; XMTEXT String of open global roots separated by semicolon
; Output:
; XMZ Message number
; XMMG Error message, if error
; Kills:
; XMY
  • ICR #10071
    • Status: Active
    • Usage: Supported
    L1
    PUSH
    SET
    DISK
    N1

    External References

    Name Field # of Occurrence
    ^%ZIS XMPG+11
    HOME^%ZIS XMPG+14
    ^%ZISC XMPG+13
    NEW^XMP ENT+22
    INIT^XMVVITAE ENT+15
    ADDRNSND^XMXSEND ENT+32
    CRE8XMZ^XMXSEND ENT+18

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: " Loading..."
    • Line Location: L1+1
    Function Call: READ
    • Prompt: "Global: "
    • Formatting: !
    • Timeout: DTIME
    • Variable: %G
    • Line Location: N+1
    Function Call: WRITE
    • Prompt: !,"MUST BEGIN WITH % OR LETTER"
    • Line Location: N+4
    Function Call: WRITE
    • Prompt: !,"DO NOT END GLOBAL REFERENCE WITH ')'"
    • Line Location: N+7
    Function Call: WRITE
    • Prompt: $C(7),!,"EACH SUBSCRIPT MUST HAVE A VALUE"
    • Line Location: N+8
    Function Call: WRITE
    • Prompt: $C(7),!,"Invalid entry ! Please enter the EXACT values of the subscripts."
    • Line Location: N+9
    Function Call: WRITE
    • Prompt: !,"GLOBAL NAME MUST BEGIN WITH '%' OR LETTER"
    • Line Location: N1+0
    Routine Call
    • %ZIS
    • Line Location:
      • XMPG+14
    Routine Call
    • %ZIS
    • Line Location:
      • XMPG+11

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^XMB(3.9 - [#3.9] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^TMP("XMERR" ENT+12!, ENT+20, ENT+21!, ENT+33!
    ^XMB(3.9 - [#3.9] ENT+31

    Label References

    Name Line Occurrences
    % LOAD+1, ENT+23
    DISK DISK+4
    EN R, MOVE+2
    GP EN
    K XMPG+11, R, EN, L1, ENT+30
    L1 L1, L1+1
    MOVE L1+1, ENT+28
    N R, L1
    N1 N+3, N+6
    POP DISK+3
    PUSH DISK+3
    R XMPG+12, R
    S EN+2, DISK+3
    SET MOVE+1, MOVE+2

    Naked Globals

    Name Field # of Occurrence
    ^( DISK

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % K!
    %0 EN*, DISK*, K!
    %1 XMPG+10*, EN+1, K!, %+1*
    %2 XMPG+10*, DISK+3, K!, %+2*
    %D K!, SET, MOVE+1*, MOVE+2*
    %G R, EN, EN+1, DISK, DISK+3*, PUSH, POP*, K!, L1, GP*
    , GP+1*, N+1*, N+2*, N+4*, N+5*, N+6, N+7*, N+8, N+9, N1*
    , ENT+26*, ENT+27, MOVE+1, MOVE+2
    %GQ K!
    %T DISK*, K!
    D EN+1*, DISK*, DISK+3, K!
    >> DIE LOAD+1*, L1, SET, ENT+24*, MOVE+3*
    >> DIF LOAD+1*, ENT+24*
    DTIME N+1
    I EN!, S*, DISK, DISK+1*, DISK+2*, DISK+3, PUSH, POP*, K!, N+1*
    , N+2, N+3, N+4, N+5, N+8*, N+9*
    I( PUSH*, POP
    IO XMPG+13, R
    IO(0 XMPG+13, N+1
    >> J DISK+1*, N+8*, N+9*
    K R, K!, L1, N+1*, N+4*, N+7*, N+8*, N+9*, N1*
    POP XMPG+11, K!
    Q EN*, S, DISK+1, K!
    R EN!*, PUSH*, POP*, K!, GP*
    R( PUSH*, POP
    U L1, MOVE+3
    XCNP LOAD+1*, L1, SET*, ENT+29!, MOVE+3
    XMDF ENT+11~, ENT+13*
    >> XMDUZ ENT+32
    XMERR ENT+12!, ENT+19, ENT+21!, ENT+33!
    XMINSTR ENT+11~, ENT+32
    XMINSTR("ADDR FLAGS" , ENT+14*
    XMMG ENT+12!, ENT+17*, ENT+20*
    XMPIECE ENT+11~, ENT+25*, ENT+26
    >> XMSUB ENT+18
    >> XMTEXT ENT+25, ENT+26
    XMV ENT+11~
    XMV("ERROR" ENT+16, ENT+17
    XMY ENT+32, ENT+34!
    >> XMZ ENT+18, ENT+31, ENT+32
    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 |  Naked Globals |  Local Variables |  All