GiD_Event_BeforeTransformProblemType: will be called just before transforming a model from a problem type to a new problem type version.
If it returns -cancel- as a value then the transformation will not be invoked.
file: the name of the model to be transformed;
oldproblemtype: the name of the previous problem type;
newproblemtype: the name of the problem type to be transformed.
proc GiD_Event_BeforeTransformProblemType { file oldproblemtype newproblemtype } {
...body...
set value ...
return $value
}
GiD_Event_AfterTransformProblemType: will be called just after transforming a model from a problem type to a new problem type version.
It must return a list of the items: value and messages
value 1 if there were model changes done in this procedure, 0 else.
If it returns -cancel- as a special value, then the transformation messages won't be shown.
file: the name of the model to be transformed;
oldproblemtype: the name of the previous problem type;
newproblemtype: the name of the problem type to be transformed.
messages: explains the transforming operations done.
proc GiD_Event_AfterTransformProblemType { file oldproblemtype newproblemtype messages } {
...body...
set value ...
return [list $value $messages]
}