求助：如何在数据库的package里面添加提示信息，在erp运行界面显示出来，谢谢

chenred

我想到最好的方式,是做成CONCURRENT,然后可以用调试CONCURRENT的方式来看OUTPUT FILE.
就是麻烦一点.

fish919

能不能详细说说,CONCURRENT没有用过

player012

最初由 fish919 发布
[B]问题找到了，在PKG中进入了死循环，我用的办法是建立SEQ，查看NEXTVAL，临时表这种情况不行，因为没有COMMIT，临时表中没有信息，如果用Harry_shan的办法可能得到的不准确，因为可能把造成死循环的值给MARK掉

在PKG中的FND_MESSAGE.SET_NAME怎么用，它是不是提示错误信息
谢谢。 [/B]

不是提示错误信息

SET_NAME  Sets a message name in the global area without actually retrieving the message from Message Dictionary.

aradin

不访试下                   
                                fnd_message.set_name(
                                'XXX',----‘AP Short name’
                                'XXX_AP_NOTIFICATIONS_VEN_ERROR' --'Message name you difined in  
                                                                                                         application developer -->Message'
                                );
                               
                                                app_exception.raise_exception;

fish919

to player012
每次insert完后加个commit

這樣不行吧,代碼中有很多地方用到insert ,update

fish919

最初由 aradin 发布
[B]不访试下                   
                                fnd_message.set_name(
                                'XXX',----‘AP Short name’
                                'XXX_AP_NOTIFICATIONS_VEN_ERROR' --'Message name you difined in  
                                                                                                         application developer -->Message'
                                );
                               
                                                app_exception.raise_exception; [/B]

在代码中加入了也不行，是这样写的
l_return_message_name:='AAAAAAAAAAAAAAAAAAAAAAAAAAA';
FND_MESSAGE.SET_NAME('SQLAP', l_return_message_name);

app_exception.raise_exception;

aradin

不是这样的拉，这里的set_name(x,y)
y是由你在application中定义的
application developer --->Application---->Message
但是一旦你用raise_exception的话，程序就会终止

fish919

最初由 aradin 发布
[B]不是这样的拉，这里的set_name(x,y)
y是由你在application中定义的
application developer --->Application---->Message
但是一旦你用raise_exception的话，程序就会终止 [/B]

怎麽寫，能給個例子嗎

aradin

首先你在APPLICATION DEVELOPER职责下，到MESSAGE FORM，如图：
需要定义你的MESSAGE NAME,LANGUAGE(可供多语言利用)，APPLICATION

然后定义MESSAGE主题部分，如果含有参数（PACKAGE等调用的时候可以传进来）用&PARAMETER

然后根据你定义的APPLICATION_ID取得APPLICATION_SHORT_NAME

SELECT
APPLICATION_SHORT_NAME
INTO P_SHORT_NAME
FROM FND_APPLICATION WHERE APPLICATION_ID=213
(当然你应该知道，应为程序中是要你直接写进去的，你可以先查出来然后供下面利用)

然后利用我上面说的
fnd_message.set_name('P_SHORT_NAME',
                                       'TEST'                                         
                                     );

如果有参数：
fnd_message.set_token('parameter',
                                        'aradin is a man' ,
                                      TRUE
                                      );
最后，你既可以通过raise exception的方式（如上面的贴）得到message，也可以通过其他方式得到
如果你想把message付给string变量
x_error_message := fnd_message.get;

不知道说的详细不详细

fish919

非常詳細,也測試成功了,非常感謝,不知有沒有寫法可以不使程序終止,謝謝