1 package body fnd_pub_message as
2 /* $Header: AFCPPMSB.pls 115.1 99/07/16 23:12:37 porting sh $ */
3 procedure set_name( app in varchar2,
4 name in varchar2)
5 is
6 begin
7 fnd_message.set_name(app, name);
8 end set_name;
9
10 procedure set_integer_token( token in varchar2,
11 value in number)
12 is
13 begin
14 fnd_message.set_token(token, to_char(value), FALSE);
15 end set_integer_token;
16
17 procedure set_token( token in varchar2,
18 value in varchar2,
19 xlate in boolean default FALSE)
20 is
21 begin
22 fnd_message.set_token(token, value, xlate);
23 end set_token;
24
25 procedure get( buff in out varchar2)
26 is
27 begin
28 buff := fnd_message.get;
29 end get;
30
31 end;