PACKAGE BODY: APPS.OKC_STATUS_CHANGE_PUB

Source

1 package body OKC_STATUS_CHANGE_PUB as
2 /*$Header: OKCPSTSB.pls 120.0 2005/05/25 19:45:36 appldev noship $*/
3 	l_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
4 
5 PROCEDURE change_status
6 			(
7 			ERRBUF      OUT NOCOPY VARCHAR2,
8 			RETCODE     OUT NOCOPY NUMBER,
9 			p_category 	IN VARCHAR2 ,
10 			p_from_k 	IN VARCHAR2 ,
11 			p_to_k 	IN VARCHAR2 ,
12 			p_from_m 	IN VARCHAR2 ,
13 			p_to_m 	IN VARCHAR2 ,
14 			p_debug 	IN VARCHAR2  ,
15 			p_last_rundate IN VARCHAR2
16 			) IS
17 begin
18   OKC_STATUS_CHANGE_PVT.CHANGE_STATUS(errbuf, retcode, p_category, p_from_k, p_to_k,p_from_m, p_to_m, p_debug, p_last_rundate);
19 end;
20 
21 end OKC_STATUS_CHANGE_PUB;