DDEG ;SPFO/RAM,MKB - Entity GET Extract ;1/26/23 10:37
Source file <DDEG.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN1(DIENTY,DIEN,NOTAG,ERROR) | ; -- return a single Entity (expects DFORM=0/1/2)
 | 
|
| ENQ | ;
 | 
|
| VALUE(ITM,NOTAG) | ; -- build a complete ITEM value
 | 
|
| VQ | ;
 | 
|
| SIMPLE | ; -- retrieve simple ITEM (from $$VALUE)
 | 
|
| FIXED | ; -- build one FIXED item (from $$VALUE)
 | 
|
| ID | ; -- build one ID item (from $$VALUE)
 | 
|
| WORD | ; -- build one WP ITEM (from $$VALUE)
 | 
|
| ENTITY | ; -- build an entity ITEM (from $$VALUE)
 | 
|
| COMPLEX | ; -- build a complex ITEM (from $$VALUE)
 | 
|
| LIST | ; -- build an array of values in ITEM (from $$VALUE)
 | 
|
| LIST1 | ; -- list of values in FILE (from LIST)
 | 
|
| L1 | ; find appropriate records and process
 | 
|
| LIST2 | ; -- list of values in SUBFILE (from LIST)
 | 
|
| L2 | ; find appropriate records and process
 | 
|
| LIST3 | ; -- list of values in COMPLEX FIELDS (from LIST)
 | 
|
| LIST4 | ; -- list of values in DLIST()
 | 
|
| ADD(STRING,ELEMENT,SEQ) | ; -- add ELEMENT to result STRING
 | 
|
| ELEMENT(STRING,NAME,VALUE,SEQ,OPTION,DTYPE) | ; -- build an element STRING
 ; STRING=SERIALIZED RESPONSE  | 
|
| VALID(X) | ; -- return 1 or 0, if X is a valid string
 ; Cannot be null or only white space  | 
|
| ESC(X) | ; -- convert key characters for outgoing XML/JSON
 | 
|
| PREPROC(DIENTY) | ; -- pre-processing logic
 | 
|
| IENPROC | ; -- IEN processing logic
 ; setting DDEOUT will cause this record (IEN) to not be returned  | 
|
| ITMPROC | ; -- ITEM processing logic
 ; setting DDEOUT will cause this item to not be returned  | 
|
| POST(DIENTY) | ; -- post-processing logic
 |