DIRMANAG.LST 1.4 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647
  1. Listing:
  2. 1 DEFINITION MODULE DirManager;
  3. 2 (*
  4. 3 * REPERTOIRE
  5. 4 * Release 1.6
  6. 5 * By Charles Bradford and Cole Brecheen
  7. 6 * (c) Copyright 1985-1992 PMI
  8. 7 * Green Bay, Wisconsin
  9. 8 * All rights reserved
  10. 9 * (414) 468-6040
  11. 10 *
  12. 11 * $Header: D:/logfiles/defs/dirmanag.dev 1.4 30 Dec 1990 17:59:44 coleb $
  13. 12 *
  14. 13 *)
  15. 14
  16. 15
  17. 16 FROM ScrnTypes IMPORT DisplayFrame, AFrameName,
  18. 17 FrameKey;
  19. 18
  20. 19 PROCEDURE DirToFrame( FileSpec: ARRAY OF CHAR;
  21. ***** ^ not supported yet
  22. 20 TheFrame: DisplayFrame; ColumnsPerFile:
  23. 21 CARDINAL): CARDINAL;
  24. 22
  25. 23 PROCEDURE ControlDirectory( FileSpec: ARRAY OF
  26. 24 CHAR; TheFrame: DisplayFrame;
  27. ***** ^ not supported yet
  28. 25 ColumnsPerFile: CARDINAL; VAR SelectedFile:
  29. 26 ARRAY OF CHAR; VAR NextFrame: AFrameName );
  30. ***** ^ not supported yet
  31. 27
  32. 28 PROCEDURE OldControlDirectory( FileSpec: ARRAY
  33. 29 OF CHAR; TheFrame: DisplayFrame;
  34. ***** ^ not supported yet
  35. 30 ColumnsPerFile: CARDINAL; VAR SelectedFile:
  36. 31 ARRAY OF CHAR ): FrameKey;
  37. ***** ^ not supported yet
  38. 32
  39. 33 PROCEDURE Init();
  40. 34
  41. 35 END DirManager.
  42. ***** ^ not supported yet
  43. 6 errors