From:	CSBVAX::MRGATE!/ADMD=/PRMD=BITNET/O=FHCRCVAX/PN=JOE/@US@SMTP 24-AUG-1988 17:03
To:	ARISIA::EVERHART
Subj:	RE: Status


Received: from UWAVM.ACS.WASHINGTON.EDU by uwavm.acs.washington.edu ; Wed, 24 Aug 88 13:13:30 PDT
Received: from UWAVM.ACS.WASHINGTON.EDU by UWAVM.ACS.WASHINGTON.EDU (Mailer
 X1.24) with BSMTP id 7562; Wed, 24 Aug 88 13:13:26 PDT
P1-Message-Id: US**EDU;UWAVM.ACS.WASHINGTON.EDU:LUoU5zGD
Date:         Wed, 24 Aug 88 13:10-0700
X400-Trace:   US**EDU; arrival Wed, 24 Aug 88 13:10-0700 action Relayed
X400-Trace:   US**EDU; arrival Wed, 24 Aug 88 13:13-0700 action Relayed
From:         Joe Meadows</ADMD=/PRMD=BITNET/O=FHCRCVAX/PN=JOE/@US>
Subject:      RE: Status
To:           <EVERHART%ARISIA.decnet@GE-CRD.ARPA>
Message-Id:   <UWAVM.ACS.WASHINGTON.EDU:LUoU5zGD*>
X-VMS-To: IN%"EVERHART%ARISIA.decnet@GE-CRD.ARPA"

Glenn,
There's also a bug fix that goes along with Status. In FORMAT.C
the routine cvt$uic needs to be replaced with the following:

cvt$uic(items,itm,string,link)
  struct FmtItemsList *items;
  int itm;
  char *string;
  int link;
{
  struct FmtItems *item;
  static $DESCRIPTOR(uicfmt, "!%I");
  struct dsc$descriptor uicstr = {64,DSC$K_DTYPE_T,DSC$K_CLASS_S,string};
  short int len = 0;

  item = &(items->item[itm]);
  sys$fao(&uicfmt,&len,&uicstr,*(int *)get_address(item,link));
  string[len] = '\0';
}

Cheers,
Joe Meadows     joe@fhcrcvax.bitnet
