XPARDD ; SLC/KCM - DD Logic for Parameters (8989.5) ;05/14/2003 07:28
Source file <XPARDD.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ALLOW(ENT,PAR) | ; function
; Screen for PARAMETER (.02) field ; Returns 1 (true) if parameter allowed for this entity, otherwise 0 |
|
| DDVALID(FLD) | ; procedure
; Input transform for both INSTANCE (.03) and VALUE (1) fields ; FLD: field (I=instance, V=value) |
|
| VALID(PAR,VAL,FLD,ERR) | ; procedure
; Validate both INSTANCE (.03) and VALUE (1) fields ; PAR: parameter (internal form) ; [.]VAL: value (external form), internal form returned ; FLD: field (I=instance, V=value) ; .ERR: returns error flag & description |
|
| TYPE(DA,FLD) | ; function **********************
; Find value type and return external value |
|
| ERR(IEN) | ; function
; Return error number and message in format: nnn^error message |
|
| HELP(FLD) | ; procedure
; Executable Help for both INSTANCE (.03) and VALUE (1) fields |
|
| OUT(Y,FLD) | ; function
; returns external value (for OUTPUT TRANSFORM of .03, 1) |
|
| EXT(X,PAR,FLD) | ; function
; return external value of INSTANCE or VALUE fields ; X: internal value ; PAR: parameter IEN ; FLD: "I" for instance, "V" for value fields, default="V" |
|
| EXTDATE(Y) | ; function
; return external form of date ; Y: date in internal FM format |
|
| EXTPTR(APTR,FN) | ; function
; return external form of pointer ; APTR: pointer value ; FN: pointed to file number |
|
| EXTSET(X,PAR,FLD) | ; function
; return external form for set of codes ; X: internal code ; PAR: parameter IEN ; FLD: "I" for instance, "V" for value fields, default = "V" |
| FileNo | Call Tags |
|---|---|
| ^XTV(8989.51 - [#8989.51] | GET1^DIQ |
