/*******************************************************************************
/*
/*	Dictionary of UV_UDRPUB file
/*
/*	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........................................
/*	04/28/99 21797 OGO Change DICT_PUB to DICT_FILE_KEY. 
/*	         23641 OGO added MDNAME, added DICTNAME
/*	         24138 OGO updated &VERSION&
/*	01/14/99 21797 OGO Change DATACSUM to REC_TYPE, DATADEF to -NA-,
/*	                   ACCESSLIST to ACCESS_LIST,added SUBS,
/*	                   added SUBS_ACCOUNTS, added DICT_PUB, added PNT_FILENAME,
/*	                   added PNT_ACCOUNT, added PNT_DESC, added PNT_REC_TYPE,
/*	                   added PNT_DICT_PUB, added &VERSION&, Change @.
/*	10/14/98 23801 SAP Change copyrights. 
/*	07/16/97 20246 DJD Added &NEXT.AVAILABLE&
/*	06/24/97 20606 LAG Initial creation and sccs
/*
/*******************************************************************************
@ID	D Default record ID for RetrieVe
	0
	
	UV_UDRPUB
	10L
	S
FILENAME	D
	1
	
	
	20T
	S
ACCOUNT	D
	2
	
	
	20T
	S
DESC	D
	3
	
	
	40T
	S
-NA-	D
	4
	
	
	10T
	S
REC_TYPE	D
	5
	
	
	10T
	S
ACCESS_LIST	D
	6
	
	
	20T
	M
SUBS_SYS	D
	7
	
	
	10L
	M
SUBS_FILE	D
	8
	
	
	10L
	M
SUBS	D
	9
	
	
	10L
	M
SUBS_ACCOUNTS	D
	10
	
	
	10L
	M
DICT_FILE_KEY	D
	11
	
	
	10T
	S
PNT_FILENAME	D
	12
	
	
	10L
	M
PNT_ACCOUNT	D
	13
	
	
	10L
	M
PNT_DESC	D
	14
	
	
	10L
	M
PNT_REC_TYPE	D
	15
	
	
	10L
	M
PNT_DICT_PUB	D
	16
	
	
	10T
	M
MDNAME	D
	17
	
	
	10T
	S
DICTNAME	D
	18
	
	
	10T
	S
ACCOUNTPATH	I
	TRANS(UV.ACCOUNT, ACCOUNT, PATH, 'X')
	
	
	40T
	S
&NEXT.AVAILABLE&	X
	1
&VERSION&	X
	3
@	PH
	FILENAME ACCOUNT DESC ID.SUP REC_TYPE ACCESS_LIST SUBS_SYS SUBS_FILE SUBS SUBS_ACCOUNTS DICT_FILE_KEY PNT_FILENAME PNT_ACCOUNT PNT_DESC PNT_REC_TYPE PNT_DICT_PUB MDNAME DICTNAME