DEFINITION MODULE InputManager; (* * REPERTOIRE * Release 1.6 * By Charles Bradford and Cole Brecheen * (c) Copyright 1985-1992 PMI * Green Bay, Wisconsin * All rights reserved * (414) 468-6040 * * $Header: D:/logfiles/defs/inputman.dev 1.4 30 Dec 1990 18:01:16 coleb $ * *) FROM ScrnTypes IMPORT DisplayFrame, AFrameName; PROCEDURE ControlFrame(VAR FrameRec : DisplayFrame; LandingField : CARDINAL; message : ARRAY OF CHAR; RedrawFirst: BOOLEAN; VAR NextFrame: AFrameName ); PROCEDURE FirstInputField(FrameRec : DisplayFrame) : CARDINAL; PROCEDURE GetPromptStr( TheFrame: DisplayFrame; TheField: CARDINAL; VAR TheStr: ARRAY OF CHAR ); PROCEDURE HiLiteSelChars( TheFrame: DisplayFrame ); PROCEDURE LastInputField(FrameRec : DisplayFrame) : CARDINAL; PROCEDURE LookAlive( TheFrame: DisplayFrame ); PROCEDURE NextInputField(FrameRec : DisplayFrame; skip: CARDINAL ) : CARDINAL; PROCEDURE PrevInputField(VAR FrameRec : DisplayFrame; skip: CARDINAL ): CARDINAL; PROCEDURE ReconstructFrame( TheFrame: DisplayFrame ); PROCEDURE ShowPrompt( FrameRec: DisplayFrame; str : ARRAY OF CHAR ); PROCEDURE SlideFrame( FrameRec: DisplayFrame; OldColsScrolled, NewColsScrolled, OldRowsScrolled, NewRowsScrolled: CARDINAL ); PROCEDURE Init(); END InputManager.