IMPLEMENTATION MODULE GlobalString;
(* Environment Variable Management. *)


PROCEDURE SetGlobalString (EnvName, EnvValue: ARRAY OF CHAR): INTEGER;
  BEGIN
  END SetGlobalString;

PROCEDURE GetGlobalString (VAR EnvValue: ARRAY OF CHAR;
			   VAR EnvValueLength: CARDINAL;
			   EnvName : ARRAY OF CHAR): INTEGER;
  BEGIN
  END GetGlobalString;

PROCEDURE GetGlobalStringName (VAR Name: ARRAY OF CHAR;
			       VAR NameLength: CARDINAL;
				   index: CARDINAL): INTEGER;
  BEGIN
  END GetGlobalStringName;

PROCEDURE DeleteGlobalString (Name: ARRAY OF CHAR): INTEGER;
  BEGIN
  END DeleteGlobalString;

PROCEDURE XSetGlobalString (EnvName, EnvValue: ARRAY OF CHAR);
  BEGIN
  END XSetGlobalString;

PROCEDURE XGetGlobalString (VAR EnvValue: ARRAY OF CHAR;
			    EnvName : ARRAY OF CHAR): CARDINAL;
  BEGIN
  END XGetGlobalString;

PROCEDURE XGetGlobalStringName (VAR Name: ARRAY OF CHAR;
				   index: CARDINAL): CARDINAL;
  BEGIN
  END XGetGlobalStringName;

PROCEDURE XDeleteGlobalString (Name: ARRAY OF CHAR);
  BEGIN
  END XDeleteGlobalString;

END GlobalString.