| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455 |
- Listing:
- 1 DEFINITION MODULE Scrn2Ndx;
- 2 (*
- 3 * REPERTOIRE
- 4 * Release 1.6
- 5 * By Charles Bradford and Cole Brecheen
- 6 * (c) Copyright 1985-1992 PMI
- 7 * Green Bay, Wisconsin
- 8 * All rights reserved
- 9 * (414) 468-6040
- 10 *
- 11 * $Header: D:/logfiles/defs/scrn2ndx.dev 1.4 30 Dec 1990 18:04:12 coleb $
- 12 *
- 13 *)
- 14
- 15
- 16 FROM NdxTypes IMPORT NdxFileType;
- 17 FROM ScrnTypes IMPORT DisplayFrame;
- 18
- 19 PROCEDURE PutScrRec( VAR NdxFile: NdxFileType;
- 20 VAR TheFrame: DisplayFrame; VAR RecName:
- 21 ARRAY OF CHAR; KeyField: ARRAY OF CHAR):
- ***** ^ not supported yet
- ***** ^ not supported yet
- 22 BOOLEAN;
- 23
- 24 PROCEDURE FillScr( VAR NdxFile: NdxFileType; VAR
- 25 TheFrame: DisplayFrame; VAR RecName: ARRAY
- 26 OF CHAR; KeyField: ARRAY OF CHAR): BOOLEAN;
- ***** ^ not supported yet
- ***** ^ not supported yet
- 27
- 28 PROCEDURE PutScrFast( VAR NdxFile: NdxFileType;
- 29 VAR TheFrame: DisplayFrame; VAR RecName:
- 30 ARRAY OF CHAR; KeyField: ARRAY OF CHAR):
- ***** ^ not supported yet
- ***** ^ not supported yet
- 31 BOOLEAN;
- 32
- 33 PROCEDURE FillScrFast( VAR NdxFile: NdxFileType;
- 34 VAR ScrFrame: DisplayFrame; VAR RecName:
- 35 ARRAY OF CHAR; KeyField: ARRAY OF CHAR):
- ***** ^ not supported yet
- ***** ^ not supported yet
- 36 BOOLEAN;
- 37
- 38 PROCEDURE Init();
- 39
- 40 END Scrn2Ndx.
- ***** ^ not supported yet
- 9 errors
|
