DIKKFORM ;SFISC/MKO-ENTRY POINTS FOR THE 'DIKC EDIT' FORM ;11:34 AM 16 Nov 1998
Source file <DIKKFORM.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 2 | (HLP,MSG)^DDSUTL ($$GET,PUT)^DDSVAL |
Name | Comments | DBIA/ICR reference |
---|---|---|
PRIOVAL | ;Validation on Priority (#1)
|
|
UIERR(MSG) | ;Set DDSERROR=1 and print MSG
|
|
NAMEPAC | ;Post-Action on Change for Name of Key
|
|
FORMDV | ;Form-Level Data Validation
|
|
UIVAL | ;Validation on Uniqueness Index (#3)
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("IX" - [#.11] | UIVAL+8, UIVAL+9, UIVAL+10, UIVAL+11, UIVAL+14, UIVAL+15, UIVAL+17 |
^DD("KEY" - [#.31] | PRIOVAL+1, PRIOVAL+4, PRIOVAL+6, FORMDV+12 |
Name | Line Occurrences |
---|---|
UIERR | UIVAL+8, UIVAL+9, UIVAL+10, UIVAL+11, UIVAL+16, UIVAL+17 |
Name | Field # of Occurrence |
---|---|
^(0 | UIVAL+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CRV | UIVAL+5~, UIVAL+14*, UIVAL+15, UIVAL+17 |
>> DA | PRIOVAL+1, PRIOVAL+4, FORMDV+11, FORMDV+12, NAMEPAC+3 |
>> DDSERROR | PRIOVAL+5*, UIERR+2*, FORMDV+15, FORMDV+16*, FORMDV+21, FORMDV+23, FORMDV+24* |
DIKKDA | FORMDV+5~, FORMDV+12*, FORMDV+13, FORMDV+18 |
DIKKDA(1 | FORMDV+11* |
DIKKI | FORMDV+5~, FORMDV+23* |
DIKKLIST | FORMDV+5~ |
DIKKLIST( | FORMDV+14, FORMDV+18*, FORMDV+23 |
DIKKSD | NAMEPAC+1~, NAMEPAC+4*, NAMEPAC+5, NAMEPAC+7*, NAMEPAC+8 |
DIKKSQ | FORMDV+5~, FORMDV+13*, FORMDV+14, FORMDV+17, FORMDV+18, FORMDV+22*, FORMDV+23* |
DIKKUI | NAMEPAC+1~, NAMEPAC+3*, NAMEPAC+4, NAMEPAC+8 |
FIL | UIVAL+5~ |
FLD | UIVAL+5~ |
LN0 | UIVAL+5~, UIVAL+15*, UIVAL+16 |
MSG | UIERR~, UIERR+3 |
PK | PRIOVAL+2~, PRIOVAL+4*, PRIOVAL+6 |
SS | UIVAL+5~ |
U | PRIOVAL+1, PRIOVAL+6, UIVAL+8, UIVAL+9, UIVAL+16 |
X | PRIOVAL+1, PRIOVAL+3, UIVAL+4, UIVAL+8, UIVAL+9, UIVAL+10, UIVAL+11, UIVAL+14, UIVAL+15, UIVAL+17 , UIERR+1~, NAMEPAC+7 |