
  PROCEDURE [XREF] avp$validate_user
    (    user: ost$user_name;
         family: ost$family_name;
         password: avt$password;
         account: avt$account_name;
         project: avt$project_name;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc avc$validation_field_names
*copyc avc$validation_level_names
*copyc avc$validation_record_names
*copyc ave$validation_interface_errors
*copyc avt$account_name
*copyc avt$password
*copyc avt$project_name
*copyc ost$status
*copyc ost$user_identification
?? POP ??
