Assign_EnterFieldHook


Purpose   Identifies a procedure that will be called every time the user
          enters a new field during field input.

Decln.    Assign_EnterFieldHook(Proc:Move_Field_proc);

Remarks   Proc is the name of the procedure to Hook into the IO routines.
          The procedure must be declared far with 2 passed parameters; a
          variable type byte and a variable type byte. The procedure will
          be passed the field ID number that the user is moving to and a
          refresh code.

Example

    {$F+}
    PROCEDURE INTO_HOOK(VAR ID:BYTE;VAR R:BYTE);
    BEGIN
        IF ID = 21 THEN
           DISPLAY_COMPANY_INFO;
    END;
    {$F-}

BEGIN
    ASSIGN_ENTERFIELDHOOK(INTO_HOOK);
END;

This procedure is only available for Turbo 5.0 programmers. Turbo 4.0
programmers should replace the procedure with the statement:

     IO_ENTERHOOK := @INTO_HOOK;