/******************************************************************************
 * Copyright (c) ETSI 2017.
 *
 * This file is subject to copyrights owned by ETSI. Non-exclusive permission
 * is hereby granted, free of charge, to copy, reproduce and amend this file
 * under the following conditions: It is provided "as is", without warranty of any
 * kind, expressed or implied.
 * 
 * ETSI shall never be liable for any claim, damages, or other liability arising
 * from its use or inability of use.This permission does not apply to any documentation
 * associated with this file for which ETSI keeps all rights reserved. The present
 * copyright notice shall be included in all copies of whole or part of this
 * file and shall not imply any sub-license right.
 *
 * Modified by: Adrien Kirjak
 *
 ** @version  0.0.1
 ** @purpose  1:16.1.2, Ensure that predefined encvalue_unichar function works properly in case of encoding universal charstring
 ** @verdict  pass accept, ttcn3verdict:pass
 ***************************************************/

/* The following requirements are tested:  
 * The optional encoding_info parameter is used for passing additional encoding information to the codec and, 
 * if it is omitted, no additional information is sent to the codec.*/


module Sem_160102_predefined_functions_098 {
    
    type component GeneralComp {
    }

	type charstring CH with { variant ""};

    testcase TC_Sem_160102_predefined_functions_098 () runs on GeneralComp {

    	var CH v_test := "abc";

     	//Encoding:  
    	var universal charstring v_test_enc_8 := encvalue_unichar(v_test,"UTF-8", "encoding_info_text"); 
		//encode to universal charstring UTF-8

    	setverdict(pass,"Encoded value: ", v_test_enc_8);
    }

    control{
        execute(TC_Sem_160102_predefined_functions_098());
    }

} with { encode "RAW" }
