/****************************************************************************** /* /* The d_uv_logs.u file, used for creating D_UV_LOGS /* /* Module %M% Version %I% Date %H% /* /* (c) Copyright 1998 Ardent Software Inc. - All Rights Reserved /* This is unpublished proprietary source code of Ardent Software Inc. /* The copyright notice above does not evidence any actual or intended /* publication of such source code. /* /****************************************************************************** /* /* Maintenence log - insert most recent change descriptions at top /* /* Date.... GTAR# WHO Description......................................... /* 10/14/98 23801 SAP Change copyrights. /* 06/26/98 23161 RGA Added 'raw' device support /* 07/14/94 14133 CSM Initial submission /* /******************************************************************************* @ID D Default record ID for RetrieVe 0 UV Log 10R S START.DATE D 1 D2 Start Date 11R S START.TIME D 2 MTS Start Time 10R S FULL.DATE D 3 D2 Full Date 11R S FULL.TIME D 4 MTS Full Time 10R S SIZE D 5 Size 10R S OFFSET D 6 Raw disk Offset 10R S STATUS I IF F6='R' THEN 'Released' ELSE IF F6='A' THEN 'Available' ELSE IF F6='C' THEN 'Current' ELSE IF F6='N' THEN 'NeedsSync' ELSE IF F6='F' THEN 'Full' ELSE IF F6='E' THEN 'Error' ELSE 'Unknown' Status 9L S @ PH BY.DSND @ID START.DATE START.TIME FULL.DATE FULL.TIME SIZE STATUS