961: ) RETURN idiv_rec_type IS
962: l_idiv_rec idiv_rec_type := p_idiv_rec;
963: BEGIN
964: l_idiv_rec.CREATION_DATE := SYSDATE;
965: l_idiv_rec.CREATED_BY := FND_GLOBAL.USER_ID;
966: l_idiv_rec.LAST_UPDATE_DATE := SYSDATE;
967: l_idiv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
968: l_idiv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
969: RETURN(l_idiv_rec);
963: BEGIN
964: l_idiv_rec.CREATION_DATE := SYSDATE;
965: l_idiv_rec.CREATED_BY := FND_GLOBAL.USER_ID;
966: l_idiv_rec.LAST_UPDATE_DATE := SYSDATE;
967: l_idiv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
968: l_idiv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
969: RETURN(l_idiv_rec);
970: END fill_who_columns;
971: ----------------------------------------------
964: l_idiv_rec.CREATION_DATE := SYSDATE;
965: l_idiv_rec.CREATED_BY := FND_GLOBAL.USER_ID;
966: l_idiv_rec.LAST_UPDATE_DATE := SYSDATE;
967: l_idiv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
968: l_idiv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
969: RETURN(l_idiv_rec);
970: END fill_who_columns;
971: ----------------------------------------------
972: -- Set_Attributes for:OKL_INDX_INTERFACES_V --
979: BEGIN
980: x_idiv_rec := p_idiv_rec;
981: x_idiv_rec.OBJECT_VERSION_NUMBER := 1;
982:
983: SELECT DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, Fnd_Global.CONC_REQUEST_ID),
984: DECODE(Fnd_Global.PROG_APPL_ID, -1, NULL, Fnd_Global.PROG_APPL_ID),
985: DECODE(Fnd_Global.CONC_PROGRAM_ID, -1, NULL, Fnd_Global.CONC_PROGRAM_ID),
986: DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, SYSDATE)
987: INTO x_idiv_rec.REQUEST_ID
980: x_idiv_rec := p_idiv_rec;
981: x_idiv_rec.OBJECT_VERSION_NUMBER := 1;
982:
983: SELECT DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, Fnd_Global.CONC_REQUEST_ID),
984: DECODE(Fnd_Global.PROG_APPL_ID, -1, NULL, Fnd_Global.PROG_APPL_ID),
985: DECODE(Fnd_Global.CONC_PROGRAM_ID, -1, NULL, Fnd_Global.CONC_PROGRAM_ID),
986: DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, SYSDATE)
987: INTO x_idiv_rec.REQUEST_ID
988: ,x_idiv_rec.PROGRAM_APPLICATION_ID
981: x_idiv_rec.OBJECT_VERSION_NUMBER := 1;
982:
983: SELECT DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, Fnd_Global.CONC_REQUEST_ID),
984: DECODE(Fnd_Global.PROG_APPL_ID, -1, NULL, Fnd_Global.PROG_APPL_ID),
985: DECODE(Fnd_Global.CONC_PROGRAM_ID, -1, NULL, Fnd_Global.CONC_PROGRAM_ID),
986: DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, SYSDATE)
987: INTO x_idiv_rec.REQUEST_ID
988: ,x_idiv_rec.PROGRAM_APPLICATION_ID
989: ,x_idiv_rec.PROGRAM_ID
982:
983: SELECT DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, Fnd_Global.CONC_REQUEST_ID),
984: DECODE(Fnd_Global.PROG_APPL_ID, -1, NULL, Fnd_Global.PROG_APPL_ID),
985: DECODE(Fnd_Global.CONC_PROGRAM_ID, -1, NULL, Fnd_Global.CONC_PROGRAM_ID),
986: DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, SYSDATE)
987: INTO x_idiv_rec.REQUEST_ID
988: ,x_idiv_rec.PROGRAM_APPLICATION_ID
989: ,x_idiv_rec.PROGRAM_ID
990: ,x_idiv_rec.PROGRAM_UPDATE_DATE
1739: ) RETURN idiv_rec_type IS
1740: l_idiv_rec idiv_rec_type := p_idiv_rec;
1741: BEGIN
1742: l_idiv_rec.LAST_UPDATE_DATE := SYSDATE;
1743: l_idiv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
1744: l_idiv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
1745: RETURN(l_idiv_rec);
1746: END fill_who_columns;
1747: ----------------------------------
1740: l_idiv_rec idiv_rec_type := p_idiv_rec;
1741: BEGIN
1742: l_idiv_rec.LAST_UPDATE_DATE := SYSDATE;
1743: l_idiv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
1744: l_idiv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
1745: RETURN(l_idiv_rec);
1746: END fill_who_columns;
1747: ----------------------------------
1748: -- FUNCTION populate_new_record --
1913: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1914: BEGIN
1915: x_idiv_rec := p_idiv_rec;
1916:
1917: SELECT DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, Fnd_Global.CONC_REQUEST_ID),
1918: DECODE(Fnd_Global.PROG_APPL_ID, -1, NULL, Fnd_Global.PROG_APPL_ID),
1919: DECODE(Fnd_Global.CONC_PROGRAM_ID, -1, NULL, Fnd_Global.CONC_PROGRAM_ID),
1920: DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, SYSDATE)
1921: INTO x_idiv_rec.REQUEST_ID
1914: BEGIN
1915: x_idiv_rec := p_idiv_rec;
1916:
1917: SELECT DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, Fnd_Global.CONC_REQUEST_ID),
1918: DECODE(Fnd_Global.PROG_APPL_ID, -1, NULL, Fnd_Global.PROG_APPL_ID),
1919: DECODE(Fnd_Global.CONC_PROGRAM_ID, -1, NULL, Fnd_Global.CONC_PROGRAM_ID),
1920: DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, SYSDATE)
1921: INTO x_idiv_rec.REQUEST_ID
1922: ,x_idiv_rec.PROGRAM_APPLICATION_ID
1915: x_idiv_rec := p_idiv_rec;
1916:
1917: SELECT DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, Fnd_Global.CONC_REQUEST_ID),
1918: DECODE(Fnd_Global.PROG_APPL_ID, -1, NULL, Fnd_Global.PROG_APPL_ID),
1919: DECODE(Fnd_Global.CONC_PROGRAM_ID, -1, NULL, Fnd_Global.CONC_PROGRAM_ID),
1920: DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, SYSDATE)
1921: INTO x_idiv_rec.REQUEST_ID
1922: ,x_idiv_rec.PROGRAM_APPLICATION_ID
1923: ,x_idiv_rec.PROGRAM_ID
1916:
1917: SELECT DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, Fnd_Global.CONC_REQUEST_ID),
1918: DECODE(Fnd_Global.PROG_APPL_ID, -1, NULL, Fnd_Global.PROG_APPL_ID),
1919: DECODE(Fnd_Global.CONC_PROGRAM_ID, -1, NULL, Fnd_Global.CONC_PROGRAM_ID),
1920: DECODE(Fnd_Global.CONC_REQUEST_ID, -1, NULL, SYSDATE)
1921: INTO x_idiv_rec.REQUEST_ID
1922: ,x_idiv_rec.PROGRAM_APPLICATION_ID
1923: ,x_idiv_rec.PROGRAM_ID
1924: ,x_idiv_rec.PROGRAM_UPDATE_DATE