/****************************************************************************** /* /* The d_uv.trans file, used for creating D_UV.TRANS /* /* 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. /* 11/12/91 8024 GMH Removed CURR.COUNT. /* 09/13/91 8538 GMH Change Status from D to I-type, mod @ phrase, PATH len /* 03/20/91 8147 KIS Change Pathname to attr 4 /* 03/18/91 8138 KIS Change CURR.COUNT @ID name from BP to TLnum and len /* 02/15/91 7909 KIS Change CURR.COUNT ref to X type and PATH to attr. 4 /* and @ to not include CURR.COUNT /* 07/27/90 7025 KIS Original code /* /******************************************************************************* @ID D Default record ID for RetrieVe 0 TLnum 5L S ACCOUNT D 1 Account 14L S FILE D 2 File 10L S STATUS I IF F3 = 0 THEN "" ELSE 'Active' Status 6R S PATH D 4 Pathname 35L S @ PH ACCOUNT FILE STATUS PATH COL.SPACES 2