DEFINITION MODULE FieldTypes;
(*
 *  REPERTOIRE
 *  Release 1.6
 *  By Charles Bradford and Cole Brecheen
 *  (c) Copyright 1985-1992 PMI
 *  Green Bay, WI
 *  All rights reserved
 *  (414) 468-6040
 *
 *  $Header:   D:/logfiles/defs/fieldtyp.dev   1.4   30 Dec 1990 18:00:42   coleb  $
 *
 *)


  FROM ScrnTypes IMPORT DisplayFile;

  PROCEDURE TypeCode( TypeName: ARRAY OF CHAR ): CHAR;

  PROCEDURE GetDefaultPrompt( TypeCode: CHAR; VAR
      TheStr: ARRAY OF CHAR );

  PROCEDURE SetDefaultPrompt( TypeName: ARRAY OF
      CHAR; TheStr: ARRAY OF CHAR );

  PROCEDURE Init();

END FieldTypes.