Command:
    name = GetCycle

  Description:
    Get the current position of the main cycle. It  will  return  a  string
    with the cycle name, like Author.

  Input:
    None

  Result:
    name - a string with the name of the cycleposition.

 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

  Command:
    RexxMsg string

  Description:
    Changes the contents of the REXXMSG in the main cycle.

  Input:
    String - a normal text string.

  Result:
    None

 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

  Command:
    error = SetCycle name

  Description:
    Set the main cycle to the "name", like SetCycle Author. It will  return
    an error if it couldn't find the name.
  
  Input:
    name - a string with the name of the cycleposition.

  Result:
    error - an error code which indicates if it could find the name in  the
            cycle. 0 means ok and 1 means error. Note that the result is in
            RC and not in RESULT.