*****************************************************************************
*
*	GCI example program - input and output 
*
*	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. 
*	02/19/90  --   DTW New file
*
*******************************************************************************
***
***	Use a built-in GCI routine to transform a character string and
***	a number.  The GCI routine, *gci3, must be cataloged.  
***	It accepts 2 arguments:
***				str - the character string
***				num - the number
***	The values contained by these variables will be changed by *gci3.
***	See the GCI manual for more information.
***
*
*	set up the variables
*
str = "this is a string"
num = 1960

*
*	display the values
*
print "before the call...."
print "the variable str is '":str:"'"
print "the variable num is '":num:"'"
print
print
print

*
*	call the cataloged gci routine
*
call *gci3(str, num)

*
*	display the results
*
print
print
print "after the call...."
print "now the variable str is '":str:"'"
print "now the variable num is '":num:"'"