STRCNV1.DEF 877 B

123456789101112131415161718192021222324252627282930313233343536
  1. DEFINITION MODULE StrCnv1;
  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/strcnv1.dev 1.4 30 Dec 1990 18:04:50 coleb $
  12. *
  13. *)
  14. FROM NumTypes IMPORT Real8;
  15. PROCEDURE GetEmbeddedCard(TheStr : ARRAY OF
  16. CHAR; VAR Spot : CARDINAL; VAR TheCard :
  17. CARDINAL) : BOOLEAN;
  18. PROCEDURE GetEmbeddedInt(TheStr : ARRAY OF CHAR;
  19. VAR Spot : CARDINAL; VAR TheInt : INTEGER) :
  20. BOOLEAN;
  21. PROCEDURE GetEmbeddedLongInt(TheStr : ARRAY OF
  22. CHAR; VAR Spot : CARDINAL; VAR TheLong :
  23. LONGINT) : BOOLEAN;
  24. PROCEDURE GetEmbeddedReal(TheStr : ARRAY OF
  25. CHAR; VAR Spot : CARDINAL; VAR TheReal :
  26. Real8): BOOLEAN;
  27. PROCEDURE Init();
  28. END StrCnv1.