XMC1 ;ISC-SF/GMB-Script Interpreter ;07/23/2002 10:15
Source file <XMC1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DI | ; Dial phone | |
| DIAL(XMNUMS) | ; | |
| EN(XMINST,XMSITE,XMSCRN,XMROOT) | ; | |
| RESUME | ; Resume script processing | |
| ERTRAN(XMDIALOG,XM1,XM2,XM3) | ; | |
| INDIR(XMC1) | ; GET INDIRECT REFERENCE | |
| C | ; Call a subroutine | |
| E | ; Set error message to be displayed. | |
| D | ; Dial numbers sucessively (Strip all punctuation not in XMSTRIP string) | |
| F | ; Flush buffer | |
| H | ; Hang up phone | |
| M | ; Send mail | |
| L | ; Look for string | |
| O | ; Open device, protocol, and host | |
| DOTRAN(XMDIALOG,XM1,XM2,XM3) | ; | |
| S | ; Send line | |
| ENT | ; ; Expects as input: ; XMINST Domain IEN ; XMSITE Domain name ; XMB("SCR IEN") Script IEN | |
| T | ; | |
| W | ; Wait a number of seconds | |
| IN | ;To |1| from |2| beginning |3| | |
| X | ; Execute a line of code | |
| USESCR(XMINST,XMB) | ; Function returns 1 if we should use the existing ; script, or 0 if we should build a TCP/IP script. | |
| DIALTRY(XMNUM) | ; | |
| INT(X,XMCI) | ; Interpret the script line ; X script line | |
| TRAN | ; | |
| FLUSH | ; Flush buffer | 
| Name | Field # of Occurrence | 
|---|---|
| ^%ZIS | RESUME+3 | 
| $$NEWERR^%ZTER | ENT+5, EN+1 | 
| $$EZBLD^DIALOG | DI+3, DOTRAN+3, RESUME+7 | 
| ^DIC | C+3 | 
| FILE^DIE | O+11 | 
| ^DIR | DI+4, RESUME+9 | 
| $$FMTE^XLFDT | IN+1 | 
| $$UP^XLFSTR | INT+4 | 
| LOOK^XMC1A | L+1 | 
| CLOSE^XMC1B | IN+20 | 
| OPEN^XMC1B | O+2 | 
| $$RTRAN^XMCU1 | S+7 | 
| GET^XMCXT | ENT+10 | 
| BUFLUSH^XML | F+2 | 
| ENTER^XMS | M+2 | 
| STAT^XMTDR | ENT+11 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: READ | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^XMB(4.6 - [#4.6] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^%ZOSF("TRAP" | ENT+6, EN+2 | 
| ^DIC(3.4 - [#3.4] | IN+10 | 
| ^DIC(4.2 - [#4.2] | ENT+13, ENT+16, USESCR+6, RESUME+5, RESUME+6 | 
| ^TMP("XMC" | TRAN+6* | 
| ^TMP("XMY" | ENT+7! | 
| ^TMP("XMY0" | ENT+7! | 
| ^XMB("NETNAME" | IN+1 | 
| ^XMB(1 - [#4.3] | IN+7, USESCR+4 | 
| ^XMB(4.6 - [#4.6] | IN+13 | 
| ^XMBS(4.2999 - [#4.2999] | ENT+11 | 
| Name | Line Occurrences | 
|---|---|
| $$USESCR | IN+3 | 
| @( | INT+8 | 
| C | IN+15 | 
| DIAL | D+1 | 
| DIALTRY | DIAL+3 | 
| DOTRAN | IN+1, IN+2, IN+9, IN+18, IN+19, C+1, C+7, C+11, DIALTRY+5, E+2 , F+1, H+1, M+1, M+3, O+1, O+3, O+4, O+6, S+5, S+6 , T+3, W+1, X+1, ERTRAN+1, RESUME+11 | 
| EN | IN+4, C+8 | 
| ERTRAN | ENT+14, INT+6, C+5, C+10, DIALTRY+6, DIALTRY+8, INDIR+3, X+5 | 
| FLUSH | O+5 | 
| IN | ENT+15, RESUME+14 | 
| INDIR | S+4 | 
| INT | EN+5 | 
| O | IN+12 | 
| TRAN | IN+17 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | RESUME+5 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DIC | C+2~, C+3* | 
| DIC(0 | C+3* | 
| DIR | DI+1~, RESUME+1~ | 
| DIR("A" | DI+3*, RESUME+7* | 
| DIR("B" | RESUME+8* | 
| DIR(0 | DI+2*, RESUME+6* | 
| >> DIRUT | DI+4, RESUME+9 | 
| DT | IN+1 | 
| >> ER | ENT+9*, IN+12, IN+17, IN+19, EN+5, INT+3*, INT+9*, C+9, DIAL+3, DIALTRY+4* , DIALTRY+8, M+3, O+2, O+3, S+1, S+4, X+3, X+5*, ERTRAN+2* | 
| >> ER("MSG" | IN+17, C+10, E+1*, E+2, M+3, ERTRAN+3* | 
| I | RESUME+1~, RESUME+4*, RESUME+5* | 
| IO | O+10, TRAN+11, RESUME+13 | 
| IO(0 | TRAN+8 | 
| >> IOT | TRAN+11 | 
| >> POP | RESUME+3 | 
| U | IN+2, IN+4, IN+8, IN+10, IN+13, USESCR+2, USESCR+5, C+6 | 
| X | ENT+6*, IN+6~, IN+10*, IN+11, IN+13*, IN+14, EN+2*, INT~, INT+4*, INT+5 , INT+6, INT+7, INT+8, C+1, C+2~, C+3*, C+5, DI+1~, O+1, RESUME+1~ | 
| >> XM | TRAN+7 | 
| XM1 | ERTRAN~, ERTRAN+1, DOTRAN~, DOTRAN+2 | 
| XM2 | ERTRAN~, ERTRAN+1, DOTRAN~, DOTRAN+2 | 
| XM3 | ERTRAN~, ERTRAN+1, DOTRAN~, DOTRAN+2 | 
| XMAUDIT | TRAN+1~, TRAN+3*, TRAN+6, TRAN+9 | 
| XMB | IN+3, USESCR~ | 
| XMB("SCR IEN" | , IN+4, USESCR+6, RESUME+5, RESUME+6 | 
| XMB("SCR REC" | , IN+2, IN+4, IN+8, USESCR+2 | 
| >> XMBFLUSH | FLUSH+1 | 
| >> XMC("AUDIT" | TRAN+6* | 
| >> XMC("DEVICE" | O+6 | 
| >> XMC("SHOW TRA | N" , ENT+9*, S+6 | 
| >> XMC("TALKMODE" | ENT+13, IN+16, T+1 | 
| XMC1 | IN+6~, IN+11*, IN+14*, INT+2~, INT+7*, C+3, DI+1~, DI+5*, D+1, E+1 , S+1, S+3, S+4, S+5, S+6, S+7*, S+8, INDIR~, INDIR+2, INDIR+4* , W+1, W+2, X+1, X+2, X+4 | 
| XMCI | EN+3~, EN+4*, EN+5*, INT~, INT+6, T+2*, RESUME+2*, RESUME+5, RESUME+8, RESUME+10* , RESUME+11, RESUME+12* | 
| >> XMDIAL | DIALTRY+6, DIALTRY+7 | 
| XMDIALOG | ERTRAN~, ERTRAN+1, DOTRAN~, DOTRAN+3 | 
| XMDIGIT | DIALTRY+1~, DIALTRY+3* | 
| XMER | C+2~, C+10 | 
| XMFDA | O+7~ | 
| XMFDA( | O+9*, O+10* | 
| XMFIELD | DIAL+2, DIAL+4! | 
| >> XMHANG | H+2, H+3 | 
| >> XMHOST | X+5 | 
| XMI | DIAL+1~, DIAL+3*, DIALTRY+1~, DIALTRY+3* | 
| XMIENS | O+7~, O+8*, O+9, O+10 | 
| XMINST | ENT+11, ENT+13, ENT+16, IN+3, IN+4, USESCR~, USESCR+6, EN~, C+8, O+8 , RESUME+5, RESUME+6 | 
| XMLER | ENT+8~, TRAN+10 | 
| XMLIN | ENT+8~ | 
| XMLX | FLUSH+2~, FLUSH+3* | 
| XMNETREC | IN+6~, IN+7*, IN+10, IN+13, USESCR+3~, USESCR+4*, USESCR+5 | 
| XMNSCR | C+2~, C+6* | 
| XMNSCRN | C+2~, C+6*, C+7, C+8 | 
| XMNUM | DIAL+1~, DIAL+3*, DIALTRY~, DIALTRY+3 | 
| XMNUMS | DIAL~, DIAL+3 | 
| >> XMOPEN | O+2 | 
| XMPARM | DOTRAN+1~, DOTRAN+3 | 
| XMPARM(1 | DOTRAN+2* | 
| XMPARM(2 | DOTRAN+2* | 
| XMPARM(3 | DOTRAN+2* | 
| XMPHONE | DIALTRY+1~, DIALTRY+2*, DIALTRY+3*, DIALTRY+5 | 
| >> XMPROT | O+6 | 
| XMREF | INDIR+1~, INDIR+2*, INDIR+3, INDIR+4 | 
| XMROOT | EN~, EN+5 | 
| XMSAVE | S+2~, S+3*, S+5 | 
| XMSCRN | IN+6~, IN+8*, EN~, C+11 | 
| XMSEP | DIAL+1~, DIAL+2*, DIAL+3 | 
| XMSITE | IN+1, IN+4, IN+10, EN~, C+8, O+4 | 
| XMSTRIP | DIAL+2, DIAL+4!, DIALTRY+3 | 
| XMTIME | TRAN+1~, TRAN+2*, TRAN+3 | 
| >> XMTRAN | IN+17, ERTRAN+3, DOTRAN+3*, TRAN+3 | 
| Y | C+2~, C+4, C+6, DI+1~, DI+5, DIALTRY+1~, DIALTRY+8, RESUME+1~, RESUME+10 |