HDISVF09 ;ALB/RMO,ALB/GRR - 7115.1 File Utilities/API Cont.; 2/1/06@09:56:00
Source file <HDISVF09.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
FINDDOM(HDISDOM,HDISDFFS,HDISADDF,HDISDIEN,HDISERRM) | ;Find or Add a New Domain Entry
; Input -- HDISDOM Domain Name ; HDISDFFS Domain File/Field Array (Optional) ; Pass by HDISDFFS(File #)=Field # (Field # optional- Default .01) ; Example: HDISDFFS(100.1)="" ; HDISADDF Add a New Entry Flag (Optional- Default 0) ; 1=Yes and 0=No ; Output -- 1=Successful and 0=Failure ; If Successful: ; HDISDIEN HDIS Domain file IEN ; If Failure: ; HDISERRM Error Message (Optional) |
|
FINDDOMQ | ||
ADDDOM(HDISDOM,HDISDFFS,HDISDIEN,HDISERRM) | ;Add a New Domain Entry
; Input -- HDISDOM Domain Name ; HDISDFFS Domain File/Field Array (Optional) ; Pass by HDISDFFS(File #)=Field # (Field # optional- Default .01) ; Example: HDISDFFS(100.1)="" ; Output -- 1=Successful and 0=Failure ; If Successful: ; HDISDIEN HDIS Domain file IEN ; If Failure: ; HDISERRM Error Message (Optional) |
|
ADDDOMQ | ||
ADDDFFS(HDISDIEN,HDISDFFS,HDISERRM) | ;Add Domain File/Fields
; Input -- HDISDIEN HDIS Domain file (#7115.1) IEN ; HDISDFFS Domain File/Field Array ; Pass by HDISDFFS(File #)=Field # (Field # optional- Default .01) ; Example: HDISDFFS(100.1)="" ; Output -- 1=Successful and 0=Failure ; If Failure: ; HDISERRM Error Message (Optional) |
|
ADDDFFSQ | ||
GETFILS(HDISDIEN,HDISCODE,HDISFILS) | ;Get an Array of Files by Domain and Client Status Code
; Input -- HDISDIEN HDIS Domain file (#7115.1) IEN ; HDISCODE Client Status Code (Optional- Default 0=Not Started for Client) ; Output -- 1=Successful and 0=Failure ; If Successful: ; HDISFILS Array Subscripted by File # (i.e. HDISFILS(120.8)="") |
|
GETFILSQ | ||
GETIEN(HDISDOM,HDISDIEN) | ;Get IEN for a Domain by Domain
; Input -- HDISDOM Domain Name ; Output -- 1=Successful and 0=Failure ; If Successful: ; HDISDIEN HDIS Domain file IEN |
|
GETIENQ | ||
ERR(HDISP1,HDISP2,HDISP3) | ;
|
|
ERTBULL(HDISP1,HDISP2,HDISP3,HDISP4,HDISP5,HDISP6) | ;
|
|
MFSUP(HDISFILE,HDISERR,HDISFN) | ; Update status to complete and send HDR Bulletin
|