3004: ) RETURN taiv_rec_type IS
3005: l_taiv_rec taiv_rec_type := p_taiv_rec;
3006: BEGIN
3007: l_taiv_rec.CREATION_DATE := SYSDATE;
3008: l_taiv_rec.CREATED_BY := Fnd_Global.USER_ID;
3009: l_taiv_rec.LAST_UPDATE_DATE := l_taiv_rec.CREATION_DATE;
3010: l_taiv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
3011: l_taiv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
3012: RETURN(l_taiv_rec);
3006: BEGIN
3007: l_taiv_rec.CREATION_DATE := SYSDATE;
3008: l_taiv_rec.CREATED_BY := Fnd_Global.USER_ID;
3009: l_taiv_rec.LAST_UPDATE_DATE := l_taiv_rec.CREATION_DATE;
3010: l_taiv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
3011: l_taiv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
3012: RETURN(l_taiv_rec);
3013: END fill_who_columns;
3014: ----------------------------------------------
3007: l_taiv_rec.CREATION_DATE := SYSDATE;
3008: l_taiv_rec.CREATED_BY := Fnd_Global.USER_ID;
3009: l_taiv_rec.LAST_UPDATE_DATE := l_taiv_rec.CREATION_DATE;
3010: l_taiv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
3011: l_taiv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
3012: RETURN(l_taiv_rec);
3013: END fill_who_columns;
3014: ----------------------------------------------
3015: -- Set_Attributes for:OKL_TRX_AR_INVOICES_V --
3025: x_taiv_rec.SFWT_FLAG := 'N';
3026:
3027: IF (x_taiv_rec.request_id IS NULL OR x_taiv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
3028: SELECT
3029: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3030: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3031: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
3032: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
3033: INTO
3026:
3027: IF (x_taiv_rec.request_id IS NULL OR x_taiv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
3028: SELECT
3029: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3030: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3031: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
3032: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
3033: INTO
3034: x_taiv_rec.request_id,
3027: IF (x_taiv_rec.request_id IS NULL OR x_taiv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
3028: SELECT
3029: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3030: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3031: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
3032: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
3033: INTO
3034: x_taiv_rec.request_id,
3035: x_taiv_rec.program_application_id,
3028: SELECT
3029: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3030: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3031: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
3032: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
3033: INTO
3034: x_taiv_rec.request_id,
3035: x_taiv_rec.program_application_id,
3036: x_taiv_rec.program_id,
4367: ) RETURN taiv_rec_type IS
4368: l_taiv_rec taiv_rec_type := p_taiv_rec;
4369: BEGIN
4370: l_taiv_rec.LAST_UPDATE_DATE := l_taiv_rec.CREATION_DATE;
4371: l_taiv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
4372: l_taiv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
4373: RETURN(l_taiv_rec);
4374: END fill_who_columns;
4375: ----------------------------------
4368: l_taiv_rec taiv_rec_type := p_taiv_rec;
4369: BEGIN
4370: l_taiv_rec.LAST_UPDATE_DATE := l_taiv_rec.CREATION_DATE;
4371: l_taiv_rec.LAST_UPDATED_BY := Fnd_Global.USER_ID;
4372: l_taiv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
4373: RETURN(l_taiv_rec);
4374: END fill_who_columns;
4375: ----------------------------------
4376: -- FUNCTION populate_new_record --
4732:
4733: IF (x_taiv_rec.request_id IS NULL OR x_taiv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
4734: -- Begin Post-Generation Change
4735: SELECT
4736: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
4737: x_taiv_rec.request_id),
4738: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
4739: x_taiv_rec.program_application_id),
4740: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
4734: -- Begin Post-Generation Change
4735: SELECT
4736: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
4737: x_taiv_rec.request_id),
4738: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
4739: x_taiv_rec.program_application_id),
4740: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
4741: x_taiv_rec.program_id),
4742: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
4736: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
4737: x_taiv_rec.request_id),
4738: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
4739: x_taiv_rec.program_application_id),
4740: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
4741: x_taiv_rec.program_id),
4742: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
4743: NULL,x_taiv_rec.program_update_date,SYSDATE)
4744: INTO
4738: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
4739: x_taiv_rec.program_application_id),
4740: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
4741: x_taiv_rec.program_id),
4742: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
4743: NULL,x_taiv_rec.program_update_date,SYSDATE)
4744: INTO
4745: x_taiv_rec.request_id,
4746: x_taiv_rec.program_application_id,