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
|