1: PACKAGE BODY CCT_VALIDATION_PUB as
2: /* $Header: cctpvalb.pls 120.2 2009/04/16 05:14:08 vhegde ship $*/
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) :='CCT_VALIDATION_PUB';
5:
1: PACKAGE BODY CCT_VALIDATION_PUB as
2: /* $Header: cctpvalb.pls 120.2 2009/04/16 05:14:08 vhegde ship $*/
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) :='CCT_VALIDATION_PUB';
5:
6: PROCEDURE VALIDATE_OTM_PARAMS
7: (
8: p_server_group_id IN NUMBER,
120: x_return_status := FND_API.G_RET_STS_ERROR ;
121: x_msg_count := 1;
122: x_err_num := SQLCODE;
123: x_err_msg := SUBSTR(SQLERRM, 1, 100);
124: x_msg_data := 'CCT_VALIDATION_PUB: CCT_ERROR '
125: || ' ErrorCode = ' || x_err_num
126: || ' ErrorMsg = ' || x_err_msg;
127:
128:
476: x_return_status := FND_API.G_RET_STS_ERROR ;
477: x_msg_count := 1;
478: x_err_num := SQLCODE;
479: x_err_msg := SUBSTR(SQLERRM, 1, 100);
480: x_msg_data := 'CCT_VALIDATION_PUB: CCT_ERROR '
481: || ' ErrorCode = ' || x_err_num
482: || ' ErrorMsg = ' || x_err_msg;
483: --dbms_output.put_line(x_msg_data);
484:
627: x_return_status := FND_API.G_RET_STS_ERROR ;
628: x_msg_count := 1;
629: x_err_num := SQLCODE;
630: x_err_msg := SUBSTR(SQLERRM, 1, 100);
631: x_msg_data := 'CCT_VALIDATION_PUB: CCT_ERROR '
632: || ' ErrorCode = ' || x_err_num
633: || ' ErrorMsg = ' || x_err_msg;
634: --dbms_output.put_line(x_msg_data);
635:
634: --dbms_output.put_line(x_msg_data);
635:
636: END VALIDATE_IQD_PARAMS;
637:
638: END CCT_VALIDATION_PUB;