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

Package: MailMan

Routine: XMAPHOST


Information

XMAPHOST ;ISC-SF/GMB-Print to Message (P-MESSAGE) ;07/29/2003 14:36

Source Information

Source file <XMAPHOST.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
MailMan 11 ERROR^XM  (CHKBSKT,SETFROM)^XMD  SUBJ^XMJMS  TOWHOM^XMJMT  (FWD,SEND)^XMKP  CHECK^XMKPL  INITAPI^XMVVITAE  (CHKADDR,CLEANUP,INIT)^XMXADDR  
$$XMSUBJ^XMXPARM  (CRE8XMZ,MOVEPART)^XMXSEND  $$CTRL^XMXUTIL1  
VA FileMan 2 ($$EZBLD,BLD)^DIALOG  ^DIR  
Kernel 1 UNWIND^%ZTER  

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

Package Total Caller Graph
Kernel 4 ZISFVXD  ZISPL  ^%ZIS(1  ^%ZIS(2  

Entry Points

Name Comments DBIA/ICR reference
EN ; Entry from pre-open execute of P-MESSAGE entry in DEVICE file.
; If the user chooses to queue the print, we don't want this code
; (the pre-open execute of the DEVICE file entry) to execute when
; the task starts up.
SETUP(XMAPHOST,XMABORT) ; Entry during close-execute (called from READ^XMAPHOST)
INIT(XMDUZ,XMAPHOST,XMINSTR,XMABORT) ;
GETSUBJ(XMSUBJ,XMAPHOST,XMABORT) ;
CHKSUBJ(XMSUBJ) ;
FROMWHOM(XMDUZ,XMINSTR,XMABORT) ;
  • ICR #4036
    • Status: Active
    • Usage: Private
    ADDRMSG(XMDUZ,XMINSTR,XMABORT) ;
    READ ; Entry from close-execute of P-MESSAGE entry in TERMINAL TYPE file.
    ; Read the host file into a message, send it, erase it.
    ; Read record from file.
    ; Each time <CR> is found in record it ends a message line.
    GET() ; Read a record from the file
    PUT(XMZZ,XMREC,XMI) ; Put data into message.
    EOFERR ;
    EOF ;
    SENDMSG(XMDUZ,XMZ,XMINSTR) ; Here, send the message to recipient.
  • ICR #4036
    • Status: Active
    • Usage: Private
    CLEANUP ;
    KSETS ;

    External References

    Name Field # of Occurrence
    UNWIND^%ZTER EOFERR+2
    $$EZBLD^DIALOG GETSUBJ+3, FROMWHOM+7, FROMWHOM+8, FROMWHOM+9, ADDRMSG+10, READ+20, EOF+5, EOF+8, EOF+9, SENDMSG+1
    , SENDMSG+8
    BLD^DIALOG FROMWHOM+12
    ^DIR FROMWHOM+13
    ERROR^XM INIT+8
    CHKBSKT^XMD ADDRMSG+6
    SETFROM^XMD INIT+3
    SUBJ^XMJMS GETSUBJ+4
    TOWHOM^XMJMT ADDRMSG+10
    FWD^XMKP SENDMSG+5
    SEND^XMKP SENDMSG+7
    CHECK^XMKPL SENDMSG+9
    INITAPI^XMVVITAE INIT+7
    CHKADDR^XMXADDR ADDRMSG+7
    CLEANUP^XMXADDR EN+12, SETUP+8, CLEANUP+2
    INIT^XMXADDR ADDRMSG+2
    $$XMSUBJ^XMXPARM CHKSUBJ+5
    CRE8XMZ^XMXSEND READ+17
    MOVEPART^XMXSEND SENDMSG+2
    $$CTRL^XMXUTIL1 PUT+1

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,$$EZBLD^DIALOG(34234)
    • Line Location: READ+20
    Function Call: WRITE
    • Prompt: !,"."
    • Line Location: READ+21
    Function Call: WRITE
    • Prompt: "."
    • Line Location: PUT+2
    Function Call: WRITE
    • Prompt: !,$$EZBLD^DIALOG(34235,XMLIMIT),!
    • Line Location: EOF+8
    Function Call: WRITE
    • Prompt: !,$$EZBLD^DIALOG(34236)
    • Line Location: EOF+9
    Function Call: WRITE
    • Prompt: !,$$EZBLD^DIALOG(34217,XMZ)
    • Line Location: SENDMSG+1
    Function Call: WRITE
    • Prompt: !,$$EZBLD^DIALOG(34213)
    • Line Location: SENDMSG+8
    Routine Call
    • DIALOG
    • Line Location:
      • GETSUBJ+3
      • FROMWHOM+7
      • FROMWHOM+8
      • FROMWHOM+9
      • ADDRMSG+10
      • READ+20
      • EOF+5
      • EOF+8
      • EOF+9
      • SENDMSG+1
      • SENDMSG+8
    Routine Call
    • DIALOG
    • Line Location:
      • FROMWHOM+12
    Routine Call
    • DIR
    • Line Location:
      • FROMWHOM+13

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^TMP("XM-MESS" EN+4!, EN+9*, EN+10*, EN+11*, READ+5, READ+8, READ+9, READ+10, READ+11!
    ^TMP("XMERR" CHKSUBJ+2!, CHKSUBJ+6!, ADDRMSG+3!, CLEANUP+4!
    ^TMP("XMY" EN+9, READ+8*
    ^TMP("XMY0" EN+10, READ+9*
    ^XMB(1 - [#4.3] READ+15
    ^XMB(3.7 - [#3.7] FROMWHOM+3
    ^XMB(3.9 - [#3.9] READ+30!, PUT+1*, EOF+3*, EOF+4*, EOF+5*, EOF+6*, EOF+10*, SENDMSG+3*

    Label References

    Name Line Occurrences
    $$GET READ+25, READ+37
    ADDRMSG SETUP+6
    CHKSUBJ GETSUBJ+1
    CLEANUP EOF+12
    EOF READ+38, EOFERR+1
    FROMWHOM SETUP+5
    GETSUBJ SETUP+4
    INIT SETUP+3
    KSETS EN+13, SETUP+9, CLEANUP+3
    PUT READ+34
    SENDMSG EOF+11
    SETUP EN+8, READ+6

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    %H EN+5~
    >> %ZISQUIT EN+8*
    >> DDS EN+6
    DIR FROMWHOM+6~
    DIR("A" FROMWHOM+7*
    DIR("B" FROMWHOM+11*
    DIR(0 FROMWHOM+10*
    >> DIRUT FROMWHOM+13
    >> DUOUT EN+8*
    DUZ INIT+1, SENDMSG+3
    IO READ+22, PUT+2
    IO("Q" EN+8!
    IO(0 READ+19, PUT+2, EOF+8, EOF+9
    >> IONOFF CLEANUP+1*
    >> POP EN+8*
    U FROMWHOM+3, READ+15, SENDMSG+3
    X FROMWHOM+6~, READ+4~, GET+1~
    XMABORT EN+7~, EN+8, SETUP~, SETUP+2*, SETUP+3, SETUP+4, SETUP+5, SETUP+6, SETUP+7, INIT~
    , INIT+3*, INIT+5, INIT+8*, GETSUBJ~, GETSUBJ+4, FROMWHOM~, FROMWHOM+13*, ADDRMSG~, ADDRMSG+9, ADDRMSG+10
    , READ+4~, READ+5, READ+6
    XMAPHOST EN+7~, EN+8, EN+11, SETUP~, SETUP+3, SETUP+4, INIT~, GETSUBJ~, READ+4~, READ+6
    , READ+10*
    XMAPHOST("CHG XMDUZ" , INIT+2*, INIT+4!, ADDRMSG+5, KSETS+3
    XMAPHOST("EOF" READ+25, READ+26, READ+29*, READ+33
    XMAPHOST("SET XMDUZ" , INIT+1*, KSETS+1,  XMV" , INIT+6*, KSETS+2
    XMAPHOST("XMDUZ" INIT+10*, READ+12
    XMAPHOST("XMINSTR" SETUP+7*, READ+14
    XMAPHOST("XMSUB" GETSUBJ+5*, READ+17
    XMAPHOST("XMV" INIT+11*, READ+13
    XMAPHOST("XMZBACK" INIT+9*, CLEANUP+5
    >> XMAPSUBJ SETUP+4
    XMDISPI KSETS+2!
    XMDUN KSETS+2!
    XMDUZ SETUP+3, SETUP+5, SETUP+6, INIT~, INIT+1*, INIT+2, INIT+3, INIT+10, FROMWHOM~, FROMWHOM+1
    , FROMWHOM+3, ADDRMSG~, ADDRMSG+5, ADDRMSG+7, ADDRMSG+10, READ+12*, EOF+11, SENDMSG~, SENDMSG+2, SENDMSG+5
    , SENDMSG+7, KSETS+1!, KSETS+3*
    XMERR CHKSUBJ+2!, CHKSUBJ+6!, ADDRMSG+3!, CLEANUP+4!
    XMFROM FROMWHOM+2~, FROMWHOM+3*, FROMWHOM+5, FROMWHOM+11
    XMI READ+4~, READ+23*, READ+25, READ+30*, READ+34, PUT~, PUT+1*, PUT+2, EOF+2, EOF+3*
    , EOF+4*, EOF+5*, EOF+6*, EOF+10
    XMINSTR SETUP+1~, SETUP+3, SETUP+5, SETUP+6, SETUP+7, INIT~, INIT+3, FROMWHOM~, ADDRMSG~, ADDRMSG+6
    , ADDRMSG+7, ADDRMSG+10, READ+4~, READ+14*, EOF+11, SENDMSG~, SENDMSG+2, SENDMSG+5, SENDMSG+7
    XMINSTR("FROM" INIT+4, FROMWHOM+1, FROMWHOM+5*, FROMWHOM+14*, SENDMSG+3, SENDMSG+4
    XMINSTR("SELF BSKT" , SENDMSG+4
    XMLEN READ+4~, READ+32*, READ+37*
    XMLIMIT READ+4~, READ+15*, READ+16*, READ+25, EOF+2, EOF+5, EOF+8
    XMME FROMWHOM+6~, FROMWHOM+8*, FROMWHOM+10, FROMWHOM+11
    >> XMMG INIT+3
    XMNOSEND KSETS+2!
    XMNULCNT READ+4~, READ+23*, READ+27*, READ+28, READ+31*
    XMPOST FROMWHOM+6~, FROMWHOM+9*, FROMWHOM+10, FROMWHOM+11, FROMWHOM+14
    XMPRIV KSETS+2!
    >> XMQUIET EN+6, GETSUBJ+2, FROMWHOM+4, ADDRMSG+4, READ+18, PUT+2, EOF+7, EOF+9, SENDMSG+1, SENDMSG+8
    XMREC READ+4~, READ+23*, READ+25*, READ+26, READ+32, READ+33, READ+34, READ+35*, READ+36, READ+37*
    , PUT~, PUT+1
    >> XMSUB SETUP+4
    XMSUBJ GETSUBJ~, GETSUBJ+1, GETSUBJ+3*, GETSUBJ+4, GETSUBJ+5, CHKSUBJ~, CHKSUBJ+1!, CHKSUBJ+3*, CHKSUBJ+4*, CHKSUBJ+5*
    , CHKSUBJ+6!
    XMV INIT+1!, INIT+8, INIT+11, READ+13*, KSETS+2!
    XMV("ERROR" INIT+8
    XMV("NAME" INIT+5, GETSUBJ+3
    XMY ADDRMSG+6, ADDRMSG+7, ADDRMSG+8!
    XMY( ADDRMSG+5*
    XMZ SENDMSG~, SENDMSG+1, SENDMSG+2, SENDMSG+3, SENDMSG+5, SENDMSG+7, CLEANUP+5*
    XMZBACK INIT+9!
    XMZZ READ+4~, READ+17, READ+30, READ+34, PUT~, PUT+1, EOF+3, EOF+4, EOF+5, EOF+6
    , EOF+10, EOF+11, CLEANUP+5
    Y FROMWHOM+6~, FROMWHOM+14, GET+1~, GET+3*, GET+4
    >> ZTQUEUED EN+6, INIT+8, GETSUBJ+2, FROMWHOM+4, ADDRMSG+4, READ+18, PUT+2, EOF+7, EOF+9, SENDMSG+1
    , SENDMSG+8
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All