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
 |