DDS0 ;SFISC/MLH-SETUP, CLEANUP ;24FEB2004
Source file <DDS0.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
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 |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD( | REC+19 |
^DIST( | EN+8, FORM+17, FRSTPG+7, FRSTPG+9, FRSTPG+10, REC+15, MOUSEON+3*, REF+1, OLDREF+2 |
^TMP("DDS" | DDSREFT, END+3, UNLOCK+2, UNLOCK+3! |
^TMP("DDSH" | MOUSEOFF+3! |
^TMP("DDSWP" | MOUSEOFF+3! |
^TMP("DIERR" | MOUSEOFF+1! |
Name | Field # of Occurrence |
---|---|
^( | DDSHBX+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | DDSHBX+1~*, DDSHBX+2*, MOUSEON+1~, MOUSEON+3 |
%H | MOUSEON+1~ |
%I | MOUSEON+1~ |
A1 | MOUSEOFF+11! |
D | FORM+13*, MOUSEOFF+11! |
D0 | END+7!, IXF+1~ |
DA | EN~, EN+8~, EN+10, EN+11, FRSTPG~, FRSTPG+7, REC~, REC+11, REC+13*, REC+15 , EGP+4, END+5!, END+6, END+7!, END+8*, IXF+1~ |
DA( | EGP+5, END+9* |
DDACT | DDSHBX+6*, MOUSEOFF+4! |
DDC | MOUSEOFF+11! |
DDD | MOUSEOFF+11! |
>> DDGFDD | IXF+1 |
DDH | DDSHBX+2*, DDSHBX+5!, DDSHBX+6*, MOUSEOFF+4! |
DDM | DDSHBX+6*, MOUSEOFF+4! |
DDO | MOUSEOFF+4! |
DDP | EN+11, FORM+11*, FORM+13, FORM+20*, REC~, REC+15, REC+18, EGP+6, MOUSEOFF+4! |
DDQ | MOUSEOFF+4! |
DDS | EN+6, EN+7, EN+8, EN+10, FORM+18*, FRSTPG~, FRSTPG+7, FRSTPG+9, FRSTPG+10, REC+15 , DDSHBX, DDSREFT, MOUSEON, MOUSEON+3, MOUSEOFF+4!, COMPILED~, COMPILED+1, REF~, REF+1, OLDREF~ , OLDREF+2 |
DDSBK | MOUSEOFF+5! |
DDSBR | MOUSEOFF+5! |
DDSCHANG | DDSHBX+5! |
DDSCHG | DDSHBX+6*, MOUSEOFF+5! |
DDSDA | REC+12*, REC+15, MOUSEOFF+5! |
DDSDAORG | REC+13*, EGP+4!*, END+6, END+8, MOUSEOFF+5! |
DDSDAORG( | EGP+5*, END+9 |
DDSDDP | MOUSEOFF+4! |
DDSDL | REC+12*, REC+15, EGP+3, EGP+4*, EGP+5*, MOUSEOFF+5! |
DDSDLORG | REC+12*, EGP+3*, END+6, END+9, MOUSEOFF+6! |
DDSDN | MOUSEOFF+6! |
DDSEXT | MOUSEOFF+6! |
DDSFDO | MOUSEOFF+6! |
DDSFILE | EN~, EN+3, FORM~, FORM+7, FORM+11 |
DDSFILE(1 | FORM+20 |
DDSFLD | MOUSEOFF+6! |
DDSFLORG | EGP+6*, MOUSEOFF+6! |
DDSGL | MOUSEOFF+6! |
DDSH | DDSHBX+6*, MOUSEOFF+6! |
DDSHBX | DDSHBX*, DDSHBX+1*, DDSHBX+2*, END, MOUSEOFF+9! |
DDSI | EGP+5*, EGP+7!, END+9*, MOUSEOFF+6! |
DDSKM | MOUSEOFF+7! |
DDSLN | MOUSEOFF+7! |
DDSNP | MOUSEOFF+7! |
DDSO | MOUSEOFF+7! |
DDSOLD | MOUSEOFF+7! |
DDSOPB | MOUSEOFF+7! |
DDSORD | MOUSEOFF+7! |
DDSOSV | MOUSEOFF+7! |
DDSPAGE | EN+10, FRSTPG~, FRSTPG+8 |
>> DDSPARM | END+1, MOUSEOFF+1 |
DDSPG | FRSTPG+9*, FRSTPG+10, DDSHBX, DDSHBX+1, DDSHBX+2, MOUSEOFF+7! |
DDSPTB | MOUSEOFF+7! |
DDSPX | MOUSEOFF+8! |
DDSPY | MOUSEOFF+8! |
DDSQ | MOUSEOFF+8! |
DDSREFS | EN+6*, DDSHBX, DDSHBX+1, DDSHBX+2, MOUSEOFF+9! |
DDSREFT | DDSREFT*, DDSREFT+1, MOUSEOFF+2! |
DDSREP | MOUSEOFF+8! |
DDSSAVE | DDSHBX+5! |
DDSSC | DDSHBX+5!, DDSHBX+6*, MOUSEOFF+8! |
>> DDSSEL | FRSTPG+11 |
DDSSP | MOUSEOFF+8! |
DDSSTACK | MOUSEOFF+8! |
DDSTOP | REC+18~*, REC+19, EGP, EGP+1 |
DDSTP | MOUSEOFF+8! |
DDSU | MOUSEOFF+8! |
DDSX | MOUSEOFF+8! |
DDXY | DDSHBX+3*, MOUSEOFF+9! |
DI | MOUSEOFF+11! |
DIC | FORM+9~, FORM+13*, FORM+14!, MOUSEOFF+10!, IXF+1~* |
DIC(0 | FORM+13*, IXF+1* |
>> DIE | REC+12*, REC+15, EGP+6 |
DIEQ | MOUSEOFF+11! |
DIERR | EN+2, EN+3, EN+7, EN+10, EN+11, REC+15, REC+17, MOUSEOFF+1! |
DIK | MOUSEOFF+11! |
>> DIOVRD | REC+17 |
DIR | MOUSEOFF+10! |
DIR0N | MOUSEOFF+10! |
DIROUT | MOUSEOFF+10! |
DIRUT | MOUSEOFF+10! |
DIW | MOUSEOFF+11! |
DIY | MOUSEOFF+11! |
DIZ | MOUSEOFF+11! |
DP | IXF+1~ |
DR | EN~, EN+3, FORM~, FORM+12 |
DS | MOUSEOFF+11! |
DUOUT | MOUSEOFF+10! |
DX | END*, MOUSEOFF+10! |
DY | END*, MOUSEOFF+10! |
I | UNLOCK+1~, UNLOCK+2* |
IOSL | END |
>> IOXY | DDSHBX+3, END |
P | FRSTPG+6~, FRSTPG+8*, FRSTPG+9, FRSTPG+10, EGP~, EGP+1 |
P("FILE" | EGP* |
U | EN+1*, EN+8, FORM+11, FORM+20, FRSTPG+7, REC+15, REC+19, DDSHBX+2, MOUSEON+3 |
X | FORM+9~, FORM+12*, FORM+16, FORM+17, MOUSEON+1~, IXF+2!, IXF+3* |
Y | FORM+9~, FORM+16, FORM+17, FORM+18, IXF+1~, IXF+2, IXF+3 |