/*****************************************************************
 ** @author   STF 409
 ** @version  0.0.1
 ** @purpose  1:15.3, Ensure that a template actual parameter is passed through correctly.
 ** @verdict  pass accept, ttcn3verdict:pass
 *****************************************************************/

module Sem_1503_GlobalAndLocalTemplates_002 {

type port MyMessagePortType message {
	inout MyMessageType
}

type component GeneralComp {
	port MyMessagePortType pt_myPort;
}

type record MyMessageType {
	integer field1,
	charstring field2,
	boolean field3
}

template MyMessageType m_myTemplate(integer p_myFormalParam):= {
	field1 := p_myFormalParam,
	field2 := pattern "abc*xyz",
	field3 := true
}

testcase TC_Sem_1503_GlobalAndLocalTemplates_002() runs on GeneralComp {
	if (valueof(m_myTemplate(2).field1) == 2) {
		setverdict(pass);
	} else {
		setverdict(fail);
	}
}

control{
    execute(TC_Sem_1503_GlobalAndLocalTemplates_002());
}
}