/***************************************************
 ** @author   STF 409
 ** @version  0.0.1
 ** @purpose  1:6.1.2.6.2, Assign values to mixed restricted character strings.
 ** @verdict  pass accept, ttcn3verdict:pass
 ***************************************************/
module Sem_0601020602_StringMixing_001 {
    type charstring MyString (pattern "abc*xyz") length (5 .. 8);

    type component GeneralComp {}

    testcase TC_Sem_0601020602_StringMixing_001() runs on GeneralComp {
        var MyString v_c;
        v_c := "abcxyz";
        v_c := "abc12xyz";
        v_c := "abc:xyz";
        v_c := "abc..xyz";
        v_c := "abc*xyz";
		setverdict(pass);
    }

    control{
        execute(TC_Sem_0601020602_StringMixing_001());
    }
}