/***************************************************************
/*     Copyright (c) 1996 by 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 source code.               *
/***************************************************************/
/*
/* Data for dictionary of HS.SERVICE/CALLS demo file.
/* This file is in UniVerse 'loadfile' format.
/*
PROBLEM	D Summary of customer's problem
	12
	
	Summary of problem
	20T
	S
	
	

	
@HYPERFIELDS	PHrase for REVISE default field list created Tue Dec  1 17:11:12 1992
	CALL_ID CUST_NUM F_NAME L_NAME PHONE PROB_NUM PRODUCT VERSION SERIAL CALL_DATE CALL_TIME CALLED_ON CALL_MINUTES PROBLEM RESOLUTION

	
@MODIFY	PHrase for REVISE default field list created Tue Dec  1 17:11:12 1992
	CALL_ID @ID CUST_NUM F_NAME L_NAME PHONE PROB_NUM PRODUCT VERSION SERIAL CALL_DATE CALL_TIME CALL_MINUTES PROBLEM RESOLUTION

	
@ID	D Default record ID for RetrieVe
	0
	
	CALLS
	10L
	S
	
	

	
L_NAME	D Caller's last name
	3
	
	Last Name
	15T
	S
	
	

	
CUST_NUM	D Customer number
	1
	P(0N)
	Cust #
	4R
	S
	
	

	
CALL_ID	D Unique call number
	0
	P(0N)
	Call #
	6L
	S
	
	

	
SERIAL	D Serial number of product unit
	8
	
	Serial #
	8L
	S
	
	CHAR,8

	
CALL_DATE	D Date of this call
	9
	D2/
	Date of call
	10L
	S
	
	INTEGER

	
CALL_MINUTES	D Length of call
	11
	P(0N)
	Length
	4R
	S
	
	INTEGER

	
F_NAME	D Caller's first name
	2
	
	First Name
	10T
	S
	
	

	
PHONE	D Telephone number to reach caller
	4
	
	Telephone
	14T
	S
	
	

	
PRODUCT	D Product number
	6
	P(1A4N)
	Product #
	6L
	S
	
	

	
CALL_TIME	D Time call arrived
	10
	MTS:
	Time of call
	8L
	S
	
	INTEGER

	
PROB_NUM	D Problem number
	5
	P(0N)
	Problem #
	5R
	S
	
	

	
RESOLUTION	D Summary of resolution
	13
	
	Resolution
	20T
	S
	
	

	
@REVISE	PHrase for REVISE default field list created Tue Dec  1 17:11:12 1992
	CALL_ID @ID CUST_NUM F_NAME L_NAME PHONE PROB_NUM PRODUCT VERSION SERIAL CALL_DATE CALL_TIME CALL_MINUTES PROBLEM RESOLUTION

	
@	PHrase for REVISE default field list created Tue Dec  1 17:11:12 1992
	CALL_ID @ID CUST_NUM F_NAME L_NAME PHONE PROB_NUM PRODUCT VERSION SERIAL CALL_DATE CALL_TIME CALLED_ON CALL_MINUTES PROBLEM RESOLUTION

	
VERSION	D Version number of product
	7
	
	Version
	4L
	S
	
	CHAR,4

	
CALLED_ON	I Computed time and date of call
	OCONV(CALL_DATE,'D4Y'):'-':OCONV(CALL_DATE,'DM':@VM:'MR%2'):'-':OCONV(CALL_DATE,'DD':@VM:'MR%2'):' ':OCONV(CALL_TIME,'MTS:')
	
	Date/time of call
	19L
	S
	
	

	
@SELECT	PH
	CALL_ID CUST_NUM F_NAME L_NAME PHONE PROB_NUM PRODUCT VERSION SERIAL CALL_DATE CALL_TIME CALLED_ON CALL_MINUTES PROBLEM RESOLUTION