Listing: 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 15 16 FROM NumTypes IMPORT Real8; 17 18 PROCEDURE GetEmbeddedCard(TheStr : ARRAY OF 19 CHAR; VAR Spot : CARDINAL; VAR TheCard : ***** ^ not supported yet 20 CARDINAL) : BOOLEAN; 21 22 PROCEDURE GetEmbeddedInt(TheStr : ARRAY OF CHAR; ***** ^ not supported yet 23 VAR Spot : CARDINAL; VAR TheInt : INTEGER) : 24 BOOLEAN; 25 26 PROCEDURE GetEmbeddedLongInt(TheStr : ARRAY OF 27 CHAR; VAR Spot : CARDINAL; VAR TheLong : ***** ^ not supported yet 28 LONGINT) : BOOLEAN; 29 30 PROCEDURE GetEmbeddedReal(TheStr : ARRAY OF 31 CHAR; VAR Spot : CARDINAL; VAR TheReal : ***** ^ not supported yet 32 Real8): BOOLEAN; 33 34 PROCEDURE Init(); 35 36 END StrCnv1. ***** ^ not supported yet 5 errors