From:	CRDGW2::CRDGW2::MRGATE::"SMTP::CRVAX.SRI.COM::RELAY-INFO-VAX" 20-JUN-1990 02:32:29.64
To:	MRGATE::"ARISIA::EVERHART"
CC:	
Subj:	PROFILE bugfix

Received:  by crdgw1.ge.com (5.57/GE 1.70)
	 id AA24393; Wed, 20 Jun 90 02:26:34 EDT
Received: From ucbvax.Berkeley.EDU ([0.0.0.0]) by CRVAX.SRI.COM with TCP; Tue, 19 JUN 90 16:53:23 PDT
Received: by ucbvax.Berkeley.EDU (5.63/1.41)
	id AA08795; Tue, 19 Jun 90 11:14:15 -0700
Received: from USENET by ucbvax.Berkeley.EDU with netnews
	for info-vax@kl.sri.com (info-vax@kl.sri.com)
	(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 19 Jun 90 16:55:12 GMT
From: amelia!earth.arc.nasa.gov!howells@ames.arc.nasa.gov  (John Howells)
Organization: NASA-Ames Research Center
Subject: PROFILE bugfix
Message-Id: <6828@amelia.nas.nasa.gov>
Sender: info-vax-request@kl.sri.com
To: info-vax@kl.sri.com

Someone was kind enough to point out a non-critical (but annoying)
bug in PROFILE. In subroutine READ_FLAG, I neglected to add the
definitions for UAI$V_RESTRICTED. Here is the diff file:

************
File KRY$DRA3:[SOFTLIB.PROFILE]PROFILE.FOR;21
 2573           Integer*4 i, flag_types(17)
 2574           Character*12 flag_names(17)
 2575           Character*(*) flag
******
File KRY$DRA3:[SOFTLIB.PROFILE]PROFILE.FOR;20
 2573           Integer*4 i, flag_types(16)
 2574           Character*12 flag_names(16)
 2575           Character*(*) flag
************
************
File KRY$DRA3:[SOFTLIB.PROFILE]PROFILE.FOR;21
 2578        .  / uai$v_AUDIT, uai$v_RESTRICTED, uai$v_DEFCLI,
 2579        .    uai$v_DISCTLY, uai$v_DISMAIL, uai$v_DISRECONNECT,
******
File KRY$DRA3:[SOFTLIB.PROFILE]PROFILE.FOR;20
 2578        .  / uai$v_AUDIT, uai$v_CAPTIVE, uai$v_DEFCLI,
 2579        .    uai$v_DISCTLY, uai$v_DISMAIL, uai$v_DISRECONNECT,
************
************
File KRY$DRA3:[SOFTLIB.PROFILE]PROFILE.FOR;21
 2583        .    uai$v_DISFORCE_PWD_CHANGE, uai$v_CAPTIVE /
 2584   
 2585           data flag_names
 2586        .  /'Audit       ','Restricted  ','Defcli      ',
 2587        .   'Disctly     ','Disnewmail  ','Disreconnect',
******
File KRY$DRA3:[SOFTLIB.PROFILE]PROFILE.FOR;20
 2583        .    uai$v_DISFORCE_PWD_CHANGE /
 2584   
 2585           data flag_names
 2586        .  /'Audit       ','Captive     ','Defcli      ',
 2587        .   'Disctly     ','Disnewmail  ','Disreconnect',
************
************
File KRY$DRA3:[SOFTLIB.PROFILE]PROFILE.FOR;21
 2591        .   'Disforce_pwd','Captive     '/
 2592   C
******
File KRY$DRA3:[SOFTLIB.PROFILE]PROFILE.FOR;20
 2591        .   'Disforce_pwd'/
 2592   C
************

Number of difference sections found: 4
Number of difference records found: 8

DIFFERENCES /IGNORE=()/MERGED=1/OUTPUT=KRY$DRA3:[SOFTLIB.PROFILE]PROFILE.DIF;1-
    KRY$DRA3:[SOFTLIB.PROFILE]PROFILE.FOR;21-
    KRY$DRA3:[SOFTLIB.PROFILE]PROFILE.FOR;20

