No commit message

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

 ** @author   STF 409

 ** @version  $Rev: 61 $

 ** @purpose  1:15, Ensure that a simple record-based message template can be defined.

 ** @verdict  pass accept, noexecution

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

module Syn_0801_DeclaringMessageTemplates_001 {

type record MyMessageType {

	integer field1 optional,

	charstring field2,

	boolean field3

}

template MyMessageType m_myTemplate := { 

	field1 := omit,

	field2 := "My string",

	field3 := true 

}

}

 No newline at end of file

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

 ** @author   STF 409

 ** @version  $Rev: 61 $

 ** @purpose  1:15, Ensure that a simple record-based message template with a wildcard ? is accepted.

 ** @verdict  pass accept, noexecution

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

module Syn_0801_DeclaringMessageTemplates_002 {

type record MyMessageType {

	integer field1 optional

}

template MyMessageType m_myTemplate := { 

	field1 := ?

}

}

 No newline at end of file

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

 ** @author   STF 409

 ** @version  $Rev: 61 $

 ** @purpose  1:15, Ensure that a simple record-based message template can be defined with a pattern in a charstring field.

 ** @verdict  pass accept, noexecution

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

module Syn_0801_DeclaringMessageTemplates_003 {

type record MyMessageType {

	charstring field2

}

template MyMessageType m_myTemplate := { 

	field2 := pattern "abc*xyz"

}

}

 No newline at end of file

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

 ** @author   STF 409

 ** @version  $Rev: 61 $

 ** @purpose  1:15, Ensure that a primitive type template can be defined with a ? wildcard.

 ** @verdict  pass accept, noexecution

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

module Syn_0801_DeclaringMessageTemplates_004 {

template integer m_myTemplate := ?;

}

 No newline at end of file

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

 ** @author   STF 409

 ** @version  $Rev: 61 $

 ** @purpose  1:15, Ensure that a primitive type template can be defined with a one-of notation.

 ** @verdict  pass accept, noexecution

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

module Syn_0801_DeclaringMessageTemplates_005 {

template integer m_myTemplate := (1, 2, 3);

}

 No newline at end of file