DEFINITION MODULE Upper2LC;

PROCEDURE MakeLongCard(InString : ARRAY OF CHAR): LONGCARD; 

PROCEDURE MakeString( LongCard : LONGCARD; VAR OutString : ARRAY OF CHAR);

END Upper2LC.