{
{   The purpose of this request is to prepare an SCL Procedure for addition to
{ or replacement on an object library.
{
{   The procedure file is read from its current position until either a PROCEND
{ statement is found or end of information is reached.  This provides for
{ having more than one SCL Procedure on the same input file.
{
{       CLP$DEFINE_SCL_PROCEDURE (FILE_ID, WORK_AREA, PROCEDURE_NAME, ALIASES,
{         COMMAND_OR_FUNCTION, AVAILABILITY, COMMAND_KIND, COMMAND_LOG_OPTION,
{         SCL_PROCEDURE, FILE_POSITION, STATUS)
{
{ FILE_ID: (input)  This parameter specifies the identifier of the file
{       containing the SCL Procedure.
{
{ WORK_AREA: (input)  This parameter specifies the storage area in which the
{       procedure data and aliases will be placed.
{
{ PROCEDURE_NAME: (output)  This parameter specifies the name of the SCL
{       Procedure to be used both as the module name and as an entry point name
{       for the procedure on the library.
{
{ ALIASES: (output)  This parameter specifies the aliases for the procedure
{       name.  NIL is used to indicate no aliases.
{
{ COMMAND_OR_FUNCTION: (output)  This parameter specifies whether the procedure
{       being defined is a command procedure or a function procedure.
{
{ AVAILABILITY: (output)  This parameter specifies whether the procedure is to
{       be advertised or hidden (for instance, by the
{       display_command_list_entry command).
{
{ COMMAND_KIND: (output)  This parameter specifies the scope of the procedure.
{
{ COMMAND_LOG_OPTION: (output)  This parameter specifies whether calls to the
{       command procedure are to be logged automatically or manually.
{
{ SCL_PROCEDURE: (output)  This parameter specifies the data representing the
{       procedure.
{
{ FILE_POSITION: (output)  This parameter specifies the input file's (the file
{       containing the command procedures) current position.
{
{ STATUS: (output) This parameter specifies the request status.
{       CONDITIONS:  cle$expecting_proc
{
