2094: ) RETURN tldv_rec_type IS
2095: l_tldv_rec tldv_rec_type := p_tldv_rec;
2096: BEGIN
2097: l_tldv_rec.CREATION_DATE := SYSDATE;
2098: l_tldv_rec.CREATED_BY := Fnd_Global.USER_ID;
2099: l_tldv_rec.LAST_UPDATE_DATE := l_tldv_rec.CREATION_DATE;
2100: l_tldv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
2101: l_tldv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
2102: RETURN(l_tldv_rec);
2096: BEGIN
2097: l_tldv_rec.CREATION_DATE := SYSDATE;
2098: l_tldv_rec.CREATED_BY := Fnd_Global.USER_ID;
2099: l_tldv_rec.LAST_UPDATE_DATE := l_tldv_rec.CREATION_DATE;
2100: l_tldv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
2101: l_tldv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
2102: RETURN(l_tldv_rec);
2103: END fill_who_columns;
2104: ---------------------------------------------
2097: l_tldv_rec.CREATION_DATE := SYSDATE;
2098: l_tldv_rec.CREATED_BY := Fnd_Global.USER_ID;
2099: l_tldv_rec.LAST_UPDATE_DATE := l_tldv_rec.CREATION_DATE;
2100: l_tldv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
2101: l_tldv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
2102: RETURN(l_tldv_rec);
2103: END fill_who_columns;
2104: ---------------------------------------------
2105: -- Set_Attributes for:OKL_TXD_AR_LN_DTLS_V --
2115: x_tldv_rec.SFWT_FLAG := 'N';
2116:
2117: IF (x_tldv_rec.request_id IS NULL OR x_tldv_rec.request_id = Okl_api.G_MISS_NUM) THEN
2118: SELECT
2119: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2120: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2121: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
2122: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
2123: INTO
2116:
2117: IF (x_tldv_rec.request_id IS NULL OR x_tldv_rec.request_id = Okl_api.G_MISS_NUM) THEN
2118: SELECT
2119: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2120: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2121: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
2122: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
2123: INTO
2124: x_tldv_rec.request_id,
2117: IF (x_tldv_rec.request_id IS NULL OR x_tldv_rec.request_id = Okl_api.G_MISS_NUM) THEN
2118: SELECT
2119: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2120: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2121: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
2122: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
2123: INTO
2124: x_tldv_rec.request_id,
2125: x_tldv_rec.program_application_id,
2118: SELECT
2119: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2120: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2121: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
2122: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
2123: INTO
2124: x_tldv_rec.request_id,
2125: x_tldv_rec.program_application_id,
2126: x_tldv_rec.program_id,
3341: ) RETURN tldv_rec_type IS
3342: l_tldv_rec tldv_rec_type := p_tldv_rec;
3343: BEGIN
3344: l_tldv_rec.LAST_UPDATE_DATE := l_tldv_rec.CREATION_DATE;
3345: l_tldv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
3346: l_tldv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
3347: RETURN(l_tldv_rec);
3348: END fill_who_columns;
3349: ----------------------------------
3342: l_tldv_rec tldv_rec_type := p_tldv_rec;
3343: BEGIN
3344: l_tldv_rec.LAST_UPDATE_DATE := l_tldv_rec.CREATION_DATE;
3345: l_tldv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
3346: l_tldv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
3347: RETURN(l_tldv_rec);
3348: END fill_who_columns;
3349: ----------------------------------
3350: -- FUNCTION populate_new_record --
3655: IF (x_tldv_rec.request_id IS NULL OR x_tldv_rec.request_id = Okl_api.G_MISS_NUM) THEN
3656:
3657: -- Begin Post-Generation Change
3658: SELECT
3659: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3660: x_tldv_rec.request_id),
3661: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
3662: x_tldv_rec.program_application_id),
3663: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
3657: -- Begin Post-Generation Change
3658: SELECT
3659: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3660: x_tldv_rec.request_id),
3661: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
3662: x_tldv_rec.program_application_id),
3663: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
3664: x_tldv_rec.program_id),
3665: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
3659: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3660: x_tldv_rec.request_id),
3661: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
3662: x_tldv_rec.program_application_id),
3663: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
3664: x_tldv_rec.program_id),
3665: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
3666: NULL,x_tldv_rec.program_update_date,SYSDATE)
3667: INTO
3661: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
3662: x_tldv_rec.program_application_id),
3663: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
3664: x_tldv_rec.program_id),
3665: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
3666: NULL,x_tldv_rec.program_update_date,SYSDATE)
3667: INTO
3668: x_tldv_rec.request_id,
3669: x_tldv_rec.program_application_id,