1644: ) RETURN cnrv_rec_type IS
1645: l_cnrv_rec cnrv_rec_type := p_cnrv_rec;
1646: BEGIN
1647: l_cnrv_rec.CREATION_DATE := SYSDATE;
1648: l_cnrv_rec.CREATED_BY := Fnd_Global.USER_ID;
1649: l_cnrv_rec.LAST_UPDATE_DATE := SYSDATE;
1650: l_cnrv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
1651: l_cnrv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
1652: RETURN(l_cnrv_rec);
1646: BEGIN
1647: l_cnrv_rec.CREATION_DATE := SYSDATE;
1648: l_cnrv_rec.CREATED_BY := Fnd_Global.USER_ID;
1649: l_cnrv_rec.LAST_UPDATE_DATE := SYSDATE;
1650: l_cnrv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
1651: l_cnrv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
1652: RETURN(l_cnrv_rec);
1653: END fill_who_columns;
1654: --------------------------------------------
1647: l_cnrv_rec.CREATION_DATE := SYSDATE;
1648: l_cnrv_rec.CREATED_BY := Fnd_Global.USER_ID;
1649: l_cnrv_rec.LAST_UPDATE_DATE := SYSDATE;
1650: l_cnrv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
1651: l_cnrv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
1652: RETURN(l_cnrv_rec);
1653: END fill_who_columns;
1654: --------------------------------------------
1655: -- Set_Attributes for:OKL_CNSLD_AR_HDRS_V --
1665: x_cnrv_rec.SFWT_FLAG := 'N';
1666:
1667: IF (x_cnrv_rec.request_id IS NULL OR x_cnrv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
1668: SELECT
1669: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1670: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1671: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
1672: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
1673: INTO
1666:
1667: IF (x_cnrv_rec.request_id IS NULL OR x_cnrv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
1668: SELECT
1669: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1670: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1671: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
1672: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
1673: INTO
1674: x_cnrv_rec.request_id,
1667: IF (x_cnrv_rec.request_id IS NULL OR x_cnrv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
1668: SELECT
1669: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1670: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1671: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
1672: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
1673: INTO
1674: x_cnrv_rec.request_id,
1675: x_cnrv_rec.program_application_id,
1668: SELECT
1669: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1670: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1671: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
1672: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
1673: INTO
1674: x_cnrv_rec.request_id,
1675: x_cnrv_rec.program_application_id,
1676: x_cnrv_rec.program_id,
2727: ) RETURN cnrv_rec_type IS
2728: l_cnrv_rec cnrv_rec_type := p_cnrv_rec;
2729: BEGIN
2730: l_cnrv_rec.LAST_UPDATE_DATE := SYSDATE;
2731: l_cnrv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
2732: l_cnrv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
2733: RETURN(l_cnrv_rec);
2734: END fill_who_columns;
2735: ----------------------------------
2728: l_cnrv_rec cnrv_rec_type := p_cnrv_rec;
2729: BEGIN
2730: l_cnrv_rec.LAST_UPDATE_DATE := SYSDATE;
2731: l_cnrv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
2732: l_cnrv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
2733: RETURN(l_cnrv_rec);
2734: END fill_who_columns;
2735: ----------------------------------
2736: -- FUNCTION populate_new_record --
2938: x_cnrv_rec.OBJECT_VERSION_NUMBER := NVL(x_cnrv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
2939: IF (x_cnrv_rec.request_id IS NULL OR x_cnrv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
2940: -- Begin Post-Generation Change
2941: SELECT
2942: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2943: x_cnrv_rec.request_id),
2944: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
2945: x_cnrv_rec.program_application_id),
2946: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
2940: -- Begin Post-Generation Change
2941: SELECT
2942: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2943: x_cnrv_rec.request_id),
2944: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
2945: x_cnrv_rec.program_application_id),
2946: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
2947: x_cnrv_rec.program_id),
2948: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
2942: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2943: x_cnrv_rec.request_id),
2944: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
2945: x_cnrv_rec.program_application_id),
2946: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
2947: x_cnrv_rec.program_id),
2948: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
2949: NULL,x_cnrv_rec.program_update_date,SYSDATE)
2950: INTO
2944: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
2945: x_cnrv_rec.program_application_id),
2946: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
2947: x_cnrv_rec.program_id),
2948: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
2949: NULL,x_cnrv_rec.program_update_date,SYSDATE)
2950: INTO
2951: x_cnrv_rec.request_id,
2952: x_cnrv_rec.program_application_id,