{ VALIDATE_NOS_A170_USER_INFO
{
{      The purpose of this procedure is to determine the validity of
{ a given users NOS/A170 identification to the system.
{
{      VALIDATE_NOS_A170_USER_NUMBER (USER_NUMBER,PASSWORD,FAMILY_NAME,VALIDITY)
{
{ USER_NUMBER: (input) This parameter specifies the user number whos validity
{              is to be determined.
{
{ PASSWORD: (input) This parameter specifies the password whos validity is to
{           be determined.
{
{ FAMILY_NAME: (input) This parameter specifies the family name of the user
{              number and password whos validity is to be determined.
{
{ VALIDITY: (output) This parameter indicates the validity of the given user
{           identification.
{

 PROCEDURE[XREF] validate_NOS_A170_user_info (
   user_number: STRING(7);
   password: STRING(7);
   family_name: STRING(7);
   VAR validity: BOOLEAN);
