/*	**************************************************************	*/

/*
 *	Module RUNPARAMOP
 *	This module tests the run parameter functions.
 *
 *	Zachary Wolf
 *	11/18/99
 */

/*	*************************************************************  */

/*	INCLUDE FILES */
#include <ansi_c.h>
#include "runparam.h"
#include "runparamui.h"

/*	*************************************************************  */

int main(int argc, char *argv[])
{
	/* Declare variables */
	struct run_param_struct run_param;
	int err;
	char log_file[80];
	char dat_file[80];

	/* Get the run parameters */
	try_again:
	runparam_get_run_param(&run_param);
	
	/* Create a log file and a data file */
	err = runparam_create_file(run_param, "logfile", log_file);
	if (err != 0) goto try_again;
	err = runparam_create_file(run_param, "datfile", dat_file);
	if (err != 0) goto try_again;
	
	/* Write a header to the log file and data file */
	runparam_write_header(run_param, log_file);
	runparam_write_header(run_param, dat_file);
	
	/* Update the index file */
	runparam_update_index(run_param);
	
	/* Message */
	printf("\nDone\n");
	
	/* Done */
	return 0;
}