©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
XMKPR1 ;ISC-SF/GMB-^XMKPR (cont.) ;09/06/2002 09:11
Source file <XMKPR1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DEFAULT(XMINST,XMSITE,XMB) | ;
|
|
| SCRIPT(XMINST,XMSITE,XMB,XMOKTYPE) | ; Get first/next Transmission Script
; XMINST (in) Pointer to domain file ; XMSITE (in) Name (.01 field) of domain pointed to by XMINST ; XMOKTYPE (in) array of script types which are acceptable ; XMB (out) XMB("SCR IEN") Pointer to script within domain ; XMB("FIRST SCRIPT") Pointer to first script tried ; XMB("SCR REC") Script zero node ; XMB("ITERATIONS") Number of cycles of scripts ; XMB("TRIES") Number of tries with one script ; XMB("IP TRIED") IP addresses tried so far ; If no transmission scripts are prioritized use old data/defaults. ; If failure, then XMB("SCR IEN")=0 ; XMPRI Priority ; XMTYPE Script type ; XMDEFALT Default script settings ; XMSLIST Array of possible scripts ; XMSFIRST First possible script ; XMSNEXT Next possible script |
|
| INITSCR(XMINST,XMSITE,XMB) | ;
|
|
| NEXTIP(XMSITE,XMB) | ;
|
|
| USEDNS() | ; Function returns 1 if we can use DNS; 0 if we can't.
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(4.2 - [#4.2] | SCRIPT+29, SCRIPT+30, SCRIPT+41, SCRIPT+47, DEFAULT+3, DEFAULT+6 |
| ^XMB(1 - [#4.3] | DEFAULT+9, DEFAULT+13, USEDNS+1 |
| ^XTV(8989.3 - [#8989.3] | USEDNS+3 |
| Name | Line Occurrences |
|---|---|
| $$USEDNS | SCRIPT+23 |
| DEFAULT | SCRIPT+21, INITSCR+5 |
| INITSCR | SCRIPT+54 |
| NEXTIP | SCRIPT+23 |
| Name | Field # of Occurrence |
|---|---|
| ^("NETWORK" | DEFAULT+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ER | SCRIPT+23 |
| I | SCRIPT+18~, DEFAULT+1~, DEFAULT+16* |
| U | SCRIPT+19, SCRIPT+23, SCRIPT+31, SCRIPT+32, SCRIPT+35, SCRIPT+47, NEXTIP+1, NEXTIP+4, NEXTIP+5, NEXTIP+6 , NEXTIP+7, NEXTIP+8, INITSCR+6, DEFAULT+9, DEFAULT+11, DEFAULT+13, DEFAULT+14, DEFAULT+16, USEDNS+1, USEDNS+3 |
| XMB | SCRIPT~, SCRIPT+21, SCRIPT+23, SCRIPT+54, NEXTIP~, INITSCR~, INITSCR+5, DEFAULT~ |
| XMB("FIRST SC | RIPT" , SCRIPT+43*, INITSCR+3* |
| XMB("IP TRIED | " , NEXTIP+1, NEXTIP+3, NEXTIP+5, NEXTIP+6*, NEXTIP+7, NEXTIP+8*, INITSCR+4*, INITSCR+6* |
| XMB("ITERATIONS" | SCRIPT+44*, SCRIPT+52*, INITSCR+1* |
| XMB("SCR IEN" | , SCRIPT+37*, SCRIPT+38, SCRIPT+42*, SCRIPT+43, SCRIPT+51*, SCRIPT+53*, INITSCR+3, DEFAULT+3 |
| XMB("SCR REC" | , SCRIPT+19, SCRIPT+23, NEXTIP+1, NEXTIP+4*, NEXTIP+5*, NEXTIP+6, NEXTIP+7, NEXTIP+8, INITSCR+6 , DEFAULT+3*, DEFAULT+16* |
| XMB("TRIES" | SCRIPT+19, SCRIPT+20*, INITSCR+2* |
| XMDEFALT | DEFAULT+1~, DEFAULT+6*, DEFAULT+9*, DEFAULT+11, DEFAULT+14*, DEFAULT+16 |
| XMIEN | SCRIPT+18~, SCRIPT+28*, SCRIPT+29*, SCRIPT+30, SCRIPT+36, SCRIPT+38*, SCRIPT+41, SCRIPT+47 |
| XMINST | SCRIPT~, SCRIPT+21, SCRIPT+29, SCRIPT+30, SCRIPT+41, SCRIPT+47, SCRIPT+54, INITSCR~, INITSCR+5, DEFAULT~ , DEFAULT+3, DEFAULT+6 |
| XMIO | DEFAULT+12~, DEFAULT+13*, DEFAULT+14 |
| XMIP | NEXTIP+2~, NEXTIP+3*, NEXTIP+4 |
| XMOKTYPE | SCRIPT~, SCRIPT+27 |
| XMOKTYPE( | SCRIPT+34 |
| XMOKTYPE("NONE" | SCRIPT+27* |
| XMOKTYPE("SMTP" | SCRIPT+27* |
| XMOKTYPE("TCPCHAN" | SCRIPT+27* |
| XMPRI | SCRIPT+18~, SCRIPT+35*, SCRIPT+36, SCRIPT+47* |
| XMREC | SCRIPT+18~, SCRIPT+30*, SCRIPT+31, SCRIPT+32, SCRIPT+35 |
| XMSFIRST | SCRIPT+18~, SCRIPT+39*, SCRIPT+40*, SCRIPT+42, SCRIPT+51 |
| XMSITE | SCRIPT~, SCRIPT+21, SCRIPT+23, SCRIPT+54, NEXTIP~, NEXTIP+3, INITSCR~, INITSCR+5, DEFAULT~ |
| XMSLIST | SCRIPT+18~, SCRIPT+37 |
| XMSLIST( | SCRIPT+36* |
| XMSNEXT | SCRIPT+18~, SCRIPT+48*, SCRIPT+49*, SCRIPT+50, SCRIPT+53 |
| XMTYPE | SCRIPT+18~, SCRIPT+32*, SCRIPT+33*, SCRIPT+34 |
| Name | Field # of Occurrence |
|---|---|
| $T(^XLFNSLK | USEDNS+2 |