1 package body IBU_SUBS_DOC_PKG as
2 /* $Header: ibusubdb.pls 115.1 2003/09/18 23:30:09 mukhan noship $ */
3
4 PROCEDURE set_msg_body_token (document_id in varchar2,
5 display_type in varchar2,
6 document in out nocopy varchar2,
7 document_type in out nocopy varchar2)
8 IS
9 BEGIN
10 document := document_id;
11 end;
12
13 end IBU_SUBS_DOC_PKG;