I think I found a solution.
Adding the below two lines just before the code block seems to have fixed it.
set cm current_message()
set size message_size(cm) + message_lines(cm)
set fdmsg open(">/tmp/tempfile")
message_to_stream(fdmsg, current_message(), "CRLF")
close(fdmsg)
--
Mehmet Avcioglu
mehmet@xxxxxxxxxxxxx