DICATTUD ;SFISC/MKO - USER DEFINED DATA TYPES ;24JUN2017
Source file <DICATTUD.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
BEGIN | ||
SCREENMN | ;Come from DICATTD (ScreenMan mode)
|
|
EN(A,DA,N,O) | ;
|
|
DONE | ;
|
|
PROPMETH(PROPMETH,N,DIPROP,DIVALS) | ;For DATA TYPE N, get a PROPERTY (PROPMETH="P") or METHOD
|
|
DIR(DIPROP,DIVALS) | ;Do a ^DIR read to get value for property or method
|
|
A | ;Put Prompt into DIR("A")
|
|
H | ;Put Help into DIR("?")
|
|
B | ;Put default into DIR("B")
|
|
SAVE(DIPROP,DIVAL,DIVALS,DICAT101,DIEXEC) | ;Save the value of the property
; in DIVALS(abbr) and DICAT101 |
|
GETDEF(N,DIPROP,DIVALS) | ;Get defaults for a property.
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|