926: ) RETURN ivev_rec_type IS
927: l_ivev_rec ivev_rec_type := p_ivev_rec;
928: BEGIN
929: l_ivev_rec.CREATION_DATE := SYSDATE;
930: l_ivev_rec.CREATED_BY := FND_GLOBAL.USER_ID;
931: l_ivev_rec.LAST_UPDATE_DATE := SYSDATE;
932: l_ivev_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
933: l_ivev_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
934: RETURN(l_ivev_rec);
928: BEGIN
929: l_ivev_rec.CREATION_DATE := SYSDATE;
930: l_ivev_rec.CREATED_BY := FND_GLOBAL.USER_ID;
931: l_ivev_rec.LAST_UPDATE_DATE := SYSDATE;
932: l_ivev_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
933: l_ivev_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
934: RETURN(l_ivev_rec);
935: END fill_who_columns;
936: -------------------------------------------
929: l_ivev_rec.CREATION_DATE := SYSDATE;
930: l_ivev_rec.CREATED_BY := FND_GLOBAL.USER_ID;
931: l_ivev_rec.LAST_UPDATE_DATE := SYSDATE;
932: l_ivev_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
933: l_ivev_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
934: RETURN(l_ivev_rec);
935: END fill_who_columns;
936: -------------------------------------------
937: -- Set_Attributes for:OKL_INDEX_VALUES_V --
944: BEGIN
945: x_ivev_rec := p_ivev_rec;
946: x_ivev_rec.OBJECT_VERSION_NUMBER := 1;
947:
948: SELECT DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, Fnd_Global.CONC_REQUEST_ID),
949: DECODE(Fnd_Global.PROG_APPL_ID, -1, NULL, Fnd_Global.PROG_APPL_ID),
950: DECODE(Fnd_Global.CONC_PROGRAM_ID, -1, NULL, Fnd_Global.CONC_PROGRAM_ID),
951: DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, SYSDATE)
952: INTO l_ive_rec.request_id
945: x_ivev_rec := p_ivev_rec;
946: x_ivev_rec.OBJECT_VERSION_NUMBER := 1;
947:
948: SELECT DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, Fnd_Global.CONC_REQUEST_ID),
949: DECODE(Fnd_Global.PROG_APPL_ID, -1, NULL, Fnd_Global.PROG_APPL_ID),
950: DECODE(Fnd_Global.CONC_PROGRAM_ID, -1, NULL, Fnd_Global.CONC_PROGRAM_ID),
951: DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, SYSDATE)
952: INTO l_ive_rec.request_id
953: ,l_ive_rec.program_application_id
946: x_ivev_rec.OBJECT_VERSION_NUMBER := 1;
947:
948: SELECT DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, Fnd_Global.CONC_REQUEST_ID),
949: DECODE(Fnd_Global.PROG_APPL_ID, -1, NULL, Fnd_Global.PROG_APPL_ID),
950: DECODE(Fnd_Global.CONC_PROGRAM_ID, -1, NULL, Fnd_Global.CONC_PROGRAM_ID),
951: DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, SYSDATE)
952: INTO l_ive_rec.request_id
953: ,l_ive_rec.program_application_id
954: ,l_ive_rec.program_id
947:
948: SELECT DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, Fnd_Global.CONC_REQUEST_ID),
949: DECODE(Fnd_Global.PROG_APPL_ID, -1, NULL, Fnd_Global.PROG_APPL_ID),
950: DECODE(Fnd_Global.CONC_PROGRAM_ID, -1, NULL, Fnd_Global.CONC_PROGRAM_ID),
951: DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, SYSDATE)
952: INTO l_ive_rec.request_id
953: ,l_ive_rec.program_application_id
954: ,l_ive_rec.program_id
955: ,l_ive_rec.program_update_date
1605: ) RETURN ivev_rec_type IS
1606: l_ivev_rec ivev_rec_type := p_ivev_rec;
1607: BEGIN
1608: l_ivev_rec.LAST_UPDATE_DATE := SYSDATE;
1609: l_ivev_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
1610: l_ivev_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
1611: RETURN(l_ivev_rec);
1612: END fill_who_columns;
1613: ----------------------------------
1606: l_ivev_rec ivev_rec_type := p_ivev_rec;
1607: BEGIN
1608: l_ivev_rec.LAST_UPDATE_DATE := SYSDATE;
1609: l_ivev_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
1610: l_ivev_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
1611: RETURN(l_ivev_rec);
1612: END fill_who_columns;
1613: ----------------------------------
1614: -- FUNCTION populate_new_record --
1701: BEGIN
1702:
1703: x_ivev_rec := p_ivev_rec;
1704:
1705: SELECT NVL(DECODE(fnd_global.conc_request_id, -1, NULL, fnd_global.conc_request_id), p_ivev_rec.request_id)
1706: ,NVL(DECODE(fnd_global.prog_appl_id, -1, NULL, fnd_global.prog_appl_id), p_ivev_rec.program_application_id)
1707: ,NVL(DECODE(fnd_global.conc_program_id, -1, NULL, fnd_global.conc_program_id), p_ivev_rec.program_id)
1708: ,DECODE(DECODE(fnd_global.conc_request_id, -1, NULL, sysdate),NULL,p_ivev_rec.program_update_date,sysdate)
1709: INTO x_ivev_rec.request_id
1702:
1703: x_ivev_rec := p_ivev_rec;
1704:
1705: SELECT NVL(DECODE(fnd_global.conc_request_id, -1, NULL, fnd_global.conc_request_id), p_ivev_rec.request_id)
1706: ,NVL(DECODE(fnd_global.prog_appl_id, -1, NULL, fnd_global.prog_appl_id), p_ivev_rec.program_application_id)
1707: ,NVL(DECODE(fnd_global.conc_program_id, -1, NULL, fnd_global.conc_program_id), p_ivev_rec.program_id)
1708: ,DECODE(DECODE(fnd_global.conc_request_id, -1, NULL, sysdate),NULL,p_ivev_rec.program_update_date,sysdate)
1709: INTO x_ivev_rec.request_id
1710: ,x_ivev_rec.program_application_id
1703: x_ivev_rec := p_ivev_rec;
1704:
1705: SELECT NVL(DECODE(fnd_global.conc_request_id, -1, NULL, fnd_global.conc_request_id), p_ivev_rec.request_id)
1706: ,NVL(DECODE(fnd_global.prog_appl_id, -1, NULL, fnd_global.prog_appl_id), p_ivev_rec.program_application_id)
1707: ,NVL(DECODE(fnd_global.conc_program_id, -1, NULL, fnd_global.conc_program_id), p_ivev_rec.program_id)
1708: ,DECODE(DECODE(fnd_global.conc_request_id, -1, NULL, sysdate),NULL,p_ivev_rec.program_update_date,sysdate)
1709: INTO x_ivev_rec.request_id
1710: ,x_ivev_rec.program_application_id
1711: ,x_ivev_rec.program_id
1704:
1705: SELECT NVL(DECODE(fnd_global.conc_request_id, -1, NULL, fnd_global.conc_request_id), p_ivev_rec.request_id)
1706: ,NVL(DECODE(fnd_global.prog_appl_id, -1, NULL, fnd_global.prog_appl_id), p_ivev_rec.program_application_id)
1707: ,NVL(DECODE(fnd_global.conc_program_id, -1, NULL, fnd_global.conc_program_id), p_ivev_rec.program_id)
1708: ,DECODE(DECODE(fnd_global.conc_request_id, -1, NULL, sysdate),NULL,p_ivev_rec.program_update_date,sysdate)
1709: INTO x_ivev_rec.request_id
1710: ,x_ivev_rec.program_application_id
1711: ,x_ivev_rec.program_id
1712: ,x_ivev_rec.program_update_date