Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: DDS0

Package: VA FileMan

Routine: DDS0


Information

DDS0 ;SFISC/MLH-SETUP, CLEANUP ;24FEB2004

Source Information

Source file <DDS0.m>

Entry Points

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 ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *27,"[?1000h"
  • Line Location: MOUSEON+0
Function Call: WRITE
  • Prompt: *27,"[?1000l"
  • Line Location: MOUSEOFF+0
Info |  Source |  Entry Points |  Interaction Calls