/**********************************************************************/
/* エラーメッセージ配列出力用(統合サーバ用。MSG_RTNでログ出力)        */
/*							                                          */
/*    						                                          */
/*                                                                    */
/*   ログに出力するなどの独自対応が必要な場合は各システム毎に         */
/*   再定義して下さい。                                               */
/*                                                                    */
/**********************************************************************/
create or replace procedure LOCAL_MSG_RTN(
	PI_PG		IN	varchar2,
	PI_STEP		IN	varchar2,
	PI_MSG		IN	varchar2,
	PI_JOBID	IN	varchar2,
	PI_PGNAME	IN	varchar2
	)
is
	G_STATUS NUMBER;
	G_ERR_CODE VARCHAR2(1000);
begin
	MSG_RTN(G_STATUS
			,G_ERR_CODE
			,PI_JOBID
			,PI_JOBID
			,PI_PG
			,PI_PGNAME
			,NULL
			,NULL
			,SUBSTRB(PI_STEP||' '||PI_MSG,1,1000)
			);
end LOCAL_MSG_RTN;
/
