{
{   The purpose of this request is to write the value of a variable or part of
{ a variable.  Only variables in the current block may be written.
{
{       CLP$WRITE_VARIABLE (REFERENCE, VALUE, STATUS)
{
{ REFERENCE: (input) This parameter specifies the variable or element or field
{       of  a variable to be written.  The parameter is given in the syntax of
{       an SCL variable reference except that if a subscript is  part  of  the
{       reference  it  must  be  given  as  an  integer constant and not as an
{       expression.
{
{ VALUE: (input) This parameter specifies the value  to  be  assigned  to  the
{       variable.  (The descriptor field of this parameter is ignored.)
{
{ STATUS: (output) This parameter specifies the request status.
{       CONDITIONS: cle$improper_variable_reference,
{             cle$improper_variable_value, cle$unknown_variable.
{       IDENTIFIER: 'CL'
{
