1355: ) RETURN esdv_rec_type IS
1356: l_esdv_rec esdv_rec_type := p_esdv_rec;
1357: BEGIN
1358: l_esdv_rec.CREATION_DATE := SYSDATE;
1359: l_esdv_rec.CREATED_BY := Fnd_Global.USER_ID;
1360: l_esdv_rec.LAST_UPDATE_DATE := l_esdv_rec.CREATION_DATE;
1361: l_esdv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
1362: l_esdv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
1363: RETURN(l_esdv_rec);
1357: BEGIN
1358: l_esdv_rec.CREATION_DATE := SYSDATE;
1359: l_esdv_rec.CREATED_BY := Fnd_Global.USER_ID;
1360: l_esdv_rec.LAST_UPDATE_DATE := l_esdv_rec.CREATION_DATE;
1361: l_esdv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
1362: l_esdv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
1363: RETURN(l_esdv_rec);
1364: END fill_who_columns;
1365: --------------------------------------------
1358: l_esdv_rec.CREATION_DATE := SYSDATE;
1359: l_esdv_rec.CREATED_BY := Fnd_Global.USER_ID;
1360: l_esdv_rec.LAST_UPDATE_DATE := l_esdv_rec.CREATION_DATE;
1361: l_esdv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
1362: l_esdv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
1363: RETURN(l_esdv_rec);
1364: END fill_who_columns;
1365: --------------------------------------------
1366: -- Set_Attributes for:OKL_XTD_SELL_INVS_V --
1376: x_esdv_rec.SFWT_FLAG := 'N';
1377:
1378: IF (x_esdv_rec.request_id IS NULL OR x_esdv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
1379: SELECT
1380: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1381: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1382: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
1383: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
1384: INTO
1377:
1378: IF (x_esdv_rec.request_id IS NULL OR x_esdv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
1379: SELECT
1380: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1381: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1382: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
1383: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
1384: INTO
1385: x_esdv_rec.request_id,
1378: IF (x_esdv_rec.request_id IS NULL OR x_esdv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
1379: SELECT
1380: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1381: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1382: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
1383: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
1384: INTO
1385: x_esdv_rec.request_id,
1386: x_esdv_rec.program_application_id,
1379: SELECT
1380: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1381: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1382: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
1383: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
1384: INTO
1385: x_esdv_rec.request_id,
1386: x_esdv_rec.program_application_id,
1387: x_esdv_rec.program_id,
2436: ) RETURN esdv_rec_type IS
2437: l_esdv_rec esdv_rec_type := p_esdv_rec;
2438: BEGIN
2439: l_esdv_rec.LAST_UPDATE_DATE := l_esdv_rec.CREATION_DATE;
2440: l_esdv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
2441: l_esdv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
2442: RETURN(l_esdv_rec);
2443: END fill_who_columns;
2444: ----------------------------------
2437: l_esdv_rec esdv_rec_type := p_esdv_rec;
2438: BEGIN
2439: l_esdv_rec.LAST_UPDATE_DATE := l_esdv_rec.CREATION_DATE;
2440: l_esdv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
2441: l_esdv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
2442: RETURN(l_esdv_rec);
2443: END fill_who_columns;
2444: ----------------------------------
2445: -- FUNCTION populate_new_record --
2614:
2615: IF (x_esdv_rec.request_id IS NULL OR x_esdv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
2616: -- Begin Post-Generation Change
2617: SELECT
2618: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2619: x_esdv_rec.request_id),
2620: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
2621: x_esdv_rec.program_application_id),
2622: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
2616: -- Begin Post-Generation Change
2617: SELECT
2618: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2619: x_esdv_rec.request_id),
2620: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
2621: x_esdv_rec.program_application_id),
2622: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
2623: x_esdv_rec.program_id),
2624: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
2618: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2619: x_esdv_rec.request_id),
2620: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
2621: x_esdv_rec.program_application_id),
2622: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
2623: x_esdv_rec.program_id),
2624: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
2625: NULL,x_esdv_rec.program_update_date,SYSDATE)
2626: INTO
2620: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
2621: x_esdv_rec.program_application_id),
2622: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
2623: x_esdv_rec.program_id),
2624: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
2625: NULL,x_esdv_rec.program_update_date,SYSDATE)
2626: INTO
2627: x_esdv_rec.request_id,
2628: x_esdv_rec.program_application_id,