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 |