Format

>>-SOCKET--(--"GETHOSTNAME"--)---------------------------------><

Parameters

This command has no parameters.

Returned value

This command returns a string that contains the return code and the name of the host system, for example, 0 MYHOST01. If the host name is longer than 256 bytes, it is truncated. The return code can be 0, a REXX socket API error number, or the REXX TCP/IP error number that is set by the socket command. The return code 0 indicates that the requested socket command was completed successfully.

See Socket call error return codes for additional information about the numeric error codes that are returned by this command.

LE C/C++ equivalent

rc = int gethostname(char *name, size_t namelen);

Code example

/* REXX EZARXR11 */
/*
 * This sample demonstrates the use of the GETHOSTNAME
 * socket command.
 */
src = socket("INITIALIZE","MYSET01");
if perror(src,"INITIALIZE") = 0 then do
   src = socket("GETHOSTNAME");
   Say "Host name is: "WORD(src,2);
end;
src = socket("TERMINATE","MYSET01");
src = perror(src,"TERMINATE");
exit 0;

/* This routine returns -1 if the first word if arg 1 is not zero */
perror: if word(arg(1),1) = 0 then return 0; else
    Say arg(2) "Error : "arg(1);
    return -1;