//File handling in VUGEN
	FileVariable1 = fopen(FileLocation1, "w+");
	fprint(FileVariable1, "%s \n", lr_eval_string("{u_UserInformation}"));
	fclose(FileVariable1);
/////////////////////////////////////////////////////////////////////////



Action()
{
//
//		web_convert_param("ConnectionToken", 
//	                  "SourceString={ConnectionToken}", 
//	                  "SourceEncoding=PLAIN", 
//	                  "TargetEncoding=URL", LAST);
	
	
	
long file;
char *filename="c:\\tmp\\output\\test.txt";

/* Open the file with read access */

if ((file = fopen(filename, "a+")) == NULL ) {
lr_error_message("Cannot open %s", filename);

	return -1;
}

lr_save_string(JSON_Content, "JSON_Content");

lr_eval_json("Buffer={JSON_Content}",
             "JsonObject=json_obj", LAST);


   lr_json_get_values("JsonObject=json_obj",
                       "ValueParam=title",
                       "QueryString=$.store.book[*].title",
                       LAST);

fprintf(file,"Content: %s\n\n\n", lr_eval_string("{JSON_Content}"));


//web_convert_param("output", 
//	"SourceString={output}", 
//	"SourceEncoding=URL", 
//	"TargetEncoding=PLAIN", LAST);

//lr_json_insert("JsonObject=json_obj",
//               "Value={\"category\":\"zhopana\"}",
//               "QueryString=$.store.book[0].category",
//               LAST); 


//fprintf(file,"Content: %s\n\n\n", lr_eval_string("{JSON_Content}"));
/*Close the file*/


fprintf(file,"- - - - - - - - - - - - - - - - - - - - - - - - - -\n");

fprintf(file,"Title value is %s\n", lr_eval_string("{title}"));


lr_json_set_values("JsonObject=json_obj",
                   "Value=zhopanah",
                   "QueryString=$.store.book[*].category",
                   "SelectAll=Yes",
                   LAST);

lr_json_stringify("JsonObject=json_obj",
                                  "OutputParam=result",
                                LAST);

fprintf(file,"The result of manipulation is\n");

fprintf(file, "%s\n", lr_eval_string("{result}"));


fprintf(file,"---------------------------------------------------\n");


fclose(file);
	
	//lr_log_message("body_variable is %s", body_variable_raw);
		return 0;
}



Action(){

char r_UUID[50];

sprintf(r_UUID, 
        "%s%s-%s-%s-%s-%s%s%s",
        lr_eval_string("{r_hex}"),lr_eval_string("{r_hex}"),
        lr_eval_string("{r_hex}"),
        lr_eval_string("{r_hex}"),
        lr_eval_string("{r_hex}"),
        lr_eval_string("{r_hex}"),lr_eval_string("{r_hex}"),lr_eval_string("{r_hex}"));

lr_save_string(r_UUID, "PAR_GUID");

lr_output_message("Random UUID : %s", lr_eval_string("{PAR_GUID}") );

return 0;}





	
lr_save_param_regexp (
	lr_eval_string("{validation_summary}"),
	strlen(lr_eval_string("{validation_summary}")),
	"RegExp=li>(.+?)</li",
	"Ordinal=All",
	"ResultParam=reMatchesParam",
LAST );


	
		char ch_arr[] = "abcdefghijklmnopqrstuvwxyz";
		int i;
		char buf[50];
		for(i=0; i < 26; i++){ sprintf(buf, "tstamp%c", ch_arr[i]); web_save_timestamp_param(buf, LAST);}