DDS0 ;SFISC/MLH-SETUP, CLEANUP ;24FEB2004
Source file <DDS0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(DDSFILE,DR,DA) | ;Initial setup
|
|
| FORM(DDSFILE,DR) | ;Form lookup
|
|
| FRSTPG(DDS,DA,DDSPAGE) | ;Get first page of form
|
|
| REC(DDP,DA) | ;Check record and lock
|
|
| EGP | ||
| INIT | ;Initialize some variables
; DDSHBX = $Y of first line of help area ; DDSREFT = Global reference of temporary global location ; DDSFDO = 1 if entire form is display-only ; DDSCHG = Change flag ; DDSKM = Flag to keep whatever's in help area ; DDSH = Flag to indicate help area is empty ; DDSSC = Array to indicate what pages are on the screen |
|
| DDSHBX | ||
| DDSREFT | ||
| MOUSEON | ||
| END | ||
| MOUSEOFF | ||
| UNLOCK | ;Unlock any lock records
|
|
| COMPILED(DDS) | ;Return 1 if form is compiled
|
|
| REF(DDS) | ;Return global reference for compiled global
|
|
| OLDREF(DDS) | ;Return global reference for compiled global used prior
|
|
| IXF | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
