3445: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3446: l_org_id NUMBER;
3447: BEGIN
3448: x_ipy_rec := p_ipy_rec;
3449: SELECT NVL(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),l_ipy_rec.request_id),
3450: NVL(DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),l_ipy_rec.program_application_id),
3451: NVL(DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),l_ipy_rec.program_id),
3452: DECODE(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),NULL,l_ipy_rec.program_update_date,SYSDATE),
3453: MO_GLOBAL.GET_CURRENT_ORG_ID()
3446: l_org_id NUMBER;
3447: BEGIN
3448: x_ipy_rec := p_ipy_rec;
3449: SELECT NVL(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),l_ipy_rec.request_id),
3450: NVL(DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),l_ipy_rec.program_application_id),
3451: NVL(DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),l_ipy_rec.program_id),
3452: DECODE(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),NULL,l_ipy_rec.program_update_date,SYSDATE),
3453: MO_GLOBAL.GET_CURRENT_ORG_ID()
3454: INTO x_ipy_rec.request_id,
3447: BEGIN
3448: x_ipy_rec := p_ipy_rec;
3449: SELECT NVL(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),l_ipy_rec.request_id),
3450: NVL(DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),l_ipy_rec.program_application_id),
3451: NVL(DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),l_ipy_rec.program_id),
3452: DECODE(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),NULL,l_ipy_rec.program_update_date,SYSDATE),
3453: MO_GLOBAL.GET_CURRENT_ORG_ID()
3454: INTO x_ipy_rec.request_id,
3455: x_ipy_rec.program_application_id,
3448: x_ipy_rec := p_ipy_rec;
3449: SELECT NVL(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),l_ipy_rec.request_id),
3450: NVL(DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),l_ipy_rec.program_application_id),
3451: NVL(DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),l_ipy_rec.program_id),
3452: DECODE(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),NULL,l_ipy_rec.program_update_date,SYSDATE),
3453: MO_GLOBAL.GET_CURRENT_ORG_ID()
3454: INTO x_ipy_rec.request_id,
3455: x_ipy_rec.program_application_id,
3456: x_ipy_rec.program_id,
3815: ) RETURN ipyv_rec_type IS
3816: l_ipyv_rec ipyv_rec_type := p_ipyv_rec;
3817: BEGIN
3818: l_ipyv_rec.CREATION_DATE := SYSDATE;
3819: l_ipyv_rec.CREATED_BY := FND_GLOBAL.USER_ID;
3820: l_ipyv_rec.LAST_UPDATE_DATE := l_ipyv_rec.CREATION_DATE;
3821: l_ipyv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
3822: l_ipyv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
3823: RETURN(l_ipyv_rec);
3817: BEGIN
3818: l_ipyv_rec.CREATION_DATE := SYSDATE;
3819: l_ipyv_rec.CREATED_BY := FND_GLOBAL.USER_ID;
3820: l_ipyv_rec.LAST_UPDATE_DATE := l_ipyv_rec.CREATION_DATE;
3821: l_ipyv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
3822: l_ipyv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
3823: RETURN(l_ipyv_rec);
3824: END fill_who_columns;
3825: -------------------------------------------
3818: l_ipyv_rec.CREATION_DATE := SYSDATE;
3819: l_ipyv_rec.CREATED_BY := FND_GLOBAL.USER_ID;
3820: l_ipyv_rec.LAST_UPDATE_DATE := l_ipyv_rec.CREATION_DATE;
3821: l_ipyv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
3822: l_ipyv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
3823: RETURN(l_ipyv_rec);
3824: END fill_who_columns;
3825: -------------------------------------------
3826: -- Set_Attributes for:OKL_INS_POLICIES_V --
3834: BEGIN
3835: x_ipyv_rec := p_ipyv_rec;
3836: x_ipyv_rec.OBJECT_VERSION_NUMBER := 1;
3837: x_ipyv_rec.SFWT_FLAG := 'N';
3838: SELECT DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),
3839: DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),
3840: DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),
3841: DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),
3842: MO_GLOBAL.GET_CURRENT_ORG_ID()
3835: x_ipyv_rec := p_ipyv_rec;
3836: x_ipyv_rec.OBJECT_VERSION_NUMBER := 1;
3837: x_ipyv_rec.SFWT_FLAG := 'N';
3838: SELECT DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),
3839: DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),
3840: DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),
3841: DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),
3842: MO_GLOBAL.GET_CURRENT_ORG_ID()
3843: INTO x_ipyv_rec.request_id,
3836: x_ipyv_rec.OBJECT_VERSION_NUMBER := 1;
3837: x_ipyv_rec.SFWT_FLAG := 'N';
3838: SELECT DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),
3839: DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),
3840: DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),
3841: DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),
3842: MO_GLOBAL.GET_CURRENT_ORG_ID()
3843: INTO x_ipyv_rec.request_id,
3844: x_ipyv_rec.program_application_id,
3837: x_ipyv_rec.SFWT_FLAG := 'N';
3838: SELECT DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),
3839: DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),
3840: DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),
3841: DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),
3842: MO_GLOBAL.GET_CURRENT_ORG_ID()
3843: INTO x_ipyv_rec.request_id,
3844: x_ipyv_rec.program_application_id,
3845: x_ipyv_rec.program_id,
3861: )RETURN ipyv_rec_type IS
3862: l_ipyv_rec_type ipyv_rec_type:=p_ipyv_rec;
3863: Begin
3864: IF (l_ipyv_rec_type.adjustment IS NOT NULL) THEN
3865: l_ipyv_rec_type.adjusted_by_id := FND_GLOBAL.USER_ID;
3866: END IF;
3867: return (l_ipyv_rec_type);
3868: End set_adjustedby_id;
3869:
4915: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4916: BEGIN
4917: x_ipy_rec := p_ipy_rec;
4918: x_ipy_rec.OBJECT_VERSION_NUMBER := p_ipy_rec.OBJECT_VERSION_NUMBER + 1;
4919: SELECT NVL(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),l_ipy_rec.request_id),
4920: NVL(DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),l_ipy_rec.program_application_id),
4921: NVL(DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),l_ipy_rec.program_id),
4922: DECODE(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),NULL,l_ipy_rec.program_update_date,SYSDATE),
4923: MO_GLOBAL.GET_CURRENT_ORG_ID() INTO x_ipy_rec.request_id,
4916: BEGIN
4917: x_ipy_rec := p_ipy_rec;
4918: x_ipy_rec.OBJECT_VERSION_NUMBER := p_ipy_rec.OBJECT_VERSION_NUMBER + 1;
4919: SELECT NVL(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),l_ipy_rec.request_id),
4920: NVL(DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),l_ipy_rec.program_application_id),
4921: NVL(DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),l_ipy_rec.program_id),
4922: DECODE(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),NULL,l_ipy_rec.program_update_date,SYSDATE),
4923: MO_GLOBAL.GET_CURRENT_ORG_ID() INTO x_ipy_rec.request_id,
4924: x_ipy_rec.program_application_id,
4917: x_ipy_rec := p_ipy_rec;
4918: x_ipy_rec.OBJECT_VERSION_NUMBER := p_ipy_rec.OBJECT_VERSION_NUMBER + 1;
4919: SELECT NVL(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),l_ipy_rec.request_id),
4920: NVL(DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),l_ipy_rec.program_application_id),
4921: NVL(DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),l_ipy_rec.program_id),
4922: DECODE(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),NULL,l_ipy_rec.program_update_date,SYSDATE),
4923: MO_GLOBAL.GET_CURRENT_ORG_ID() INTO x_ipy_rec.request_id,
4924: x_ipy_rec.program_application_id,
4925: x_ipy_rec.program_id,
4918: x_ipy_rec.OBJECT_VERSION_NUMBER := p_ipy_rec.OBJECT_VERSION_NUMBER + 1;
4919: SELECT NVL(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),l_ipy_rec.request_id),
4920: NVL(DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),l_ipy_rec.program_application_id),
4921: NVL(DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),l_ipy_rec.program_id),
4922: DECODE(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),NULL,l_ipy_rec.program_update_date,SYSDATE),
4923: MO_GLOBAL.GET_CURRENT_ORG_ID() INTO x_ipy_rec.request_id,
4924: x_ipy_rec.program_application_id,
4925: x_ipy_rec.program_id,
4926: x_ipy_rec.program_update_date,
5270: ) RETURN ipyv_rec_type IS
5271: l_ipyv_rec ipyv_rec_type := p_ipyv_rec;
5272: BEGIN
5273: l_ipyv_rec.LAST_UPDATE_DATE := SYSDATE;
5274: l_ipyv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
5275: l_ipyv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
5276: RETURN(l_ipyv_rec);
5277: END fill_who_columns;
5278: ----------------------------------
5271: l_ipyv_rec ipyv_rec_type := p_ipyv_rec;
5272: BEGIN
5273: l_ipyv_rec.LAST_UPDATE_DATE := SYSDATE;
5274: l_ipyv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
5275: l_ipyv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
5276: RETURN(l_ipyv_rec);
5277: END fill_who_columns;
5278: ----------------------------------
5279: -- FUNCTION populate_new_record --
5608: ) RETURN VARCHAR2 IS
5609: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5610: BEGIN
5611: x_ipyv_rec := p_ipyv_rec;
5612: SELECT NVL(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),l_ipyv_rec.request_id),
5613: NVL(DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),l_ipyv_rec.program_application_id),
5614: NVL(DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),l_ipyv_rec.program_id),
5615: DECODE(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),NULL,l_ipyv_rec.program_update_date,SYSDATE),
5616: MO_GLOBAL.GET_CURRENT_ORG_ID() INTO x_ipyv_rec.request_id,
5609: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5610: BEGIN
5611: x_ipyv_rec := p_ipyv_rec;
5612: SELECT NVL(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),l_ipyv_rec.request_id),
5613: NVL(DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),l_ipyv_rec.program_application_id),
5614: NVL(DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),l_ipyv_rec.program_id),
5615: DECODE(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),NULL,l_ipyv_rec.program_update_date,SYSDATE),
5616: MO_GLOBAL.GET_CURRENT_ORG_ID() INTO x_ipyv_rec.request_id,
5617: x_ipyv_rec.program_application_id,
5610: BEGIN
5611: x_ipyv_rec := p_ipyv_rec;
5612: SELECT NVL(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),l_ipyv_rec.request_id),
5613: NVL(DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),l_ipyv_rec.program_application_id),
5614: NVL(DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),l_ipyv_rec.program_id),
5615: DECODE(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),NULL,l_ipyv_rec.program_update_date,SYSDATE),
5616: MO_GLOBAL.GET_CURRENT_ORG_ID() INTO x_ipyv_rec.request_id,
5617: x_ipyv_rec.program_application_id,
5618: x_ipyv_rec.program_id,
5611: x_ipyv_rec := p_ipyv_rec;
5612: SELECT NVL(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),l_ipyv_rec.request_id),
5613: NVL(DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),l_ipyv_rec.program_application_id),
5614: NVL(DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),l_ipyv_rec.program_id),
5615: DECODE(DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),NULL,l_ipyv_rec.program_update_date,SYSDATE),
5616: MO_GLOBAL.GET_CURRENT_ORG_ID() INTO x_ipyv_rec.request_id,
5617: x_ipyv_rec.program_application_id,
5618: x_ipyv_rec.program_id,
5619: x_ipyv_rec.program_update_date,