Topspeed_JPI/TS/MODBASE/BUILDLST.DEF

DEFINITION MODULE BuildLst;
(*
 *  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/buildlst.dev   1.4   30 Dec 1990 17:58:56   coleb  $
 *
 *)


FROM GenLists IMPORT GenList;
FROM NdxTypes IMPORT NdxFileType;
FROM ScrnTypes IMPORT DisplayFrame;

CONST
  ListStorageRec = 'qQqQqQqQ';

  PROCEDURE AddNamedList( MainList: GenList;
      ListName: ARRAY OF CHAR; VAR TheList:
      GenList );

  PROCEDURE BuildList( NdxFile: NdxFileType;
      TheFrame: DisplayFrame; FirstRuleField,
      LastRuleField: CARDINAL; LimitingListName:
      ARRAY OF CHAR; VAR ErrorField: CARDINAL; VAR
      OutList: GenList);

  PROCEDURE DeleteListRec( VAR TheList: GenList );

  PROCEDURE DelNamedList( MainList: GenList;
      ListName: ARRAY OF CHAR ): BOOLEAN;

  PROCEDURE DelRecNameList( NdxFile: NdxFileType;
      ListName: ARRAY OF CHAR ): BOOLEAN;

  PROCEDURE GetListNames( NdxFile: NdxFileType;
      VAR TheList: GenList ): BOOLEAN;

  PROCEDURE GetNamedList( MainList: GenList;
      ListName: ARRAY OF CHAR; VAR TheList:
      GenList ): BOOLEAN;

  PROCEDURE GetRecNameList( NdxFile: NdxFileType;
      ListName: ARRAY OF CHAR; VAR TheList:
      GenList ): BOOLEAN;

  PROCEDURE StoreRecNameList( NdxFile:
      NdxFileType; ListName: ARRAY OF CHAR;
      TheList: GenList ): BOOLEAN;

  PROCEDURE Init();

END BuildLst.