DIEF1 ;SFISC/DPC-FILER UTILITIES ;22MAR2006
Source file <DIEF1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
LOAD(DIEFF,DIEFDAS,DIEFFLD,DIEFFLG,DIEFVAL,DIEFAR,DIEFOUT) | ;
|
|
LOADX | ;
|
|
OUT | ||
FLDNUM(DIEFF,DIEFFDNM) | ;
|
|
FLDNUMX | ;
|
|
ADDCONV(DIEFIEN,DIEFADAR) | ;
|
|
PUTDATA | ;CODE TO ACTUALLY PUT THE DATA INTO THE NODE BEING EDITED. ALSO SAVES ORIGINAL VALUES. CALLED FROM DIEF.
|
|
LOCK | ;
|
|
UNLOCK | ;
|
|
RESTORE(DIKEY,DIEFTMP) | ;Restore key fields to pre-edited values
|
|
SKEYCHK(DIEFF,DIEFFLD,DIEFNVAL,DA,DIEFIEN,DIEFFXR) | ;Check simple key
|
|
NKEY(DIEFF,DIEFFLD,DIEFIEN) | ;Generate error message #742
|