XMAPHOST ;ISC-SF/GMB-Print to Message (P-MESSAGE) ;07/29/2003 14:36
Source file <XMAPHOST.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| GET() | ; Read a record from the file | |
| KSETS | ; | |
| 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. | |
| EOF | ; | |
| SETUP(XMAPHOST,XMABORT) | ; Entry during close-execute (called from READ^XMAPHOST) | |
| PUT(XMZZ,XMREC,XMI) | ; Put data into message. | |
| 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. | |
| GETSUBJ(XMSUBJ,XMAPHOST,XMABORT) | ; | |
| EOFERR | ; | |
| CLEANUP | ; | |
| CHKSUBJ(XMSUBJ) | ; | |
| SENDMSG(XMDUZ,XMZ,XMINSTR) | ; Here, send the message to recipient. | 
 
 | 
| FROMWHOM(XMDUZ,XMINSTR,XMABORT) | ; | 
 
 | 
| ADDRMSG(XMDUZ,XMINSTR,XMABORT) | ; | |
| INIT(XMDUZ,XMAPHOST,XMINSTR,XMABORT) | ; | 
| 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 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| 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* | 
| 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 | 
| >> | 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 |