XMXADDRD ;ISC-SF/GMB-Lookup Domain Name ;04/24/2002 10:36
Source file <XMXADDRD.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DNS(XMDUZ,XMDOMAIN,XMVIA,XMVIAN) | ;
 ; XMDOMAIN - (in/out) Domain name. May be mixed case. Must already be ; in xxx.xxx.xxx format. ; XMVIA - (out) IEN of (relay) domain (in ^DIC(4.2)) ; XMVIAN - (out) Name of (relay) domain  | 
|
| FORUM() | ; Is this FORUM or GATEWAY?
 | 
|
| FINDDOMN | ; Look up domain
 | 
|
| NEEDSUB(X) | ;
 | 
|
| VIA(XMVIA,XMVIAREC,XMVIAN,XMDCIRCL) | ;
 | 
|
| CHKDOM(XMDOM,XMMAXDOM,XMMAXDOT) | ;
 | 
|
| LOOKSFX | ; Look for top level domain in internet suffix file
 ; Instead of looking in the file, we could call the COTS DNS, if it exists.  | 
|
| CHKPRMIT(XMDUZ,XMVIAREC) | ;
 | 
|
| CHKNAME | ; Input transform for .01 field of DOMAIN file 4.2
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(4.2 - [#4.2] | Classic Fileman Calls, FIND1^DIC | 
| ^DIC(4.2996 - [#4.2996] | Classic Fileman Calls, FIND1^DIC |