3477: ) RETURN tapv_rec_type IS
3478: l_tapv_rec tapv_rec_type := p_tapv_rec;
3479: BEGIN
3480: l_tapv_rec.CREATION_DATE := SYSDATE;
3481: l_tapv_rec.CREATED_BY := FND_GLOBAL.USER_ID;
3482: l_tapv_rec.LAST_UPDATE_DATE := l_tapv_rec.CREATION_DATE;
3483: l_tapv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
3484: l_tapv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
3485: RETURN(l_tapv_rec);
3479: BEGIN
3480: l_tapv_rec.CREATION_DATE := SYSDATE;
3481: l_tapv_rec.CREATED_BY := FND_GLOBAL.USER_ID;
3482: l_tapv_rec.LAST_UPDATE_DATE := l_tapv_rec.CREATION_DATE;
3483: l_tapv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
3484: l_tapv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
3485: RETURN(l_tapv_rec);
3486: END fill_who_columns;
3487: ----------------------------------------------
3480: l_tapv_rec.CREATION_DATE := SYSDATE;
3481: l_tapv_rec.CREATED_BY := FND_GLOBAL.USER_ID;
3482: l_tapv_rec.LAST_UPDATE_DATE := l_tapv_rec.CREATION_DATE;
3483: l_tapv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
3484: l_tapv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
3485: RETURN(l_tapv_rec);
3486: END fill_who_columns;
3487: ----------------------------------------------
3488: -- Set_Attributes for:OKL_TRX_AP_INVOICES_V --
3497: x_tapv_rec.OBJECT_VERSION_NUMBER := 1;
3498: x_tapv_rec.SFWT_FLAG := 'N';
3499: -- Start PostGen-7
3500: SELECT
3501: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3502: DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
3503: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
3504: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
3505: INTO
3498: x_tapv_rec.SFWT_FLAG := 'N';
3499: -- Start PostGen-7
3500: SELECT
3501: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3502: DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
3503: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
3504: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
3505: INTO
3506: x_tapv_rec.request_id,
3499: -- Start PostGen-7
3500: SELECT
3501: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3502: DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
3503: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
3504: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
3505: INTO
3506: x_tapv_rec.request_id,
3507: x_tapv_rec.program_application_id,
3500: SELECT
3501: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
3502: DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
3503: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
3504: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE)
3505: INTO
3506: x_tapv_rec.request_id,
3507: x_tapv_rec.program_application_id,
3508: x_tapv_rec.program_id,
4715: ) RETURN tapv_rec_type IS
4716: l_tapv_rec tapv_rec_type := p_tapv_rec;
4717: BEGIN
4718: l_tapv_rec.LAST_UPDATE_DATE := SYSDATE;
4719: l_tapv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
4720: l_tapv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
4721: RETURN(l_tapv_rec);
4722: END fill_who_columns;
4723: ----------------------------------
4716: l_tapv_rec tapv_rec_type := p_tapv_rec;
4717: BEGIN
4718: l_tapv_rec.LAST_UPDATE_DATE := SYSDATE;
4719: l_tapv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
4720: l_tapv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
4721: RETURN(l_tapv_rec);
4722: END fill_who_columns;
4723: ----------------------------------
4724: -- FUNCTION populate_new_record --
5053: x_tapv_rec := p_tapv_rec;
5054: x_tapv_rec.OBJECT_VERSION_NUMBER := NVL(x_tapv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
5055: -- Begin PostGen-7
5056: SELECT
5057: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
5058: x_tapv_rec.request_id),
5059: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
5060: x_tapv_rec.program_application_id),
5061: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
5055: -- Begin PostGen-7
5056: SELECT
5057: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
5058: x_tapv_rec.request_id),
5059: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
5060: x_tapv_rec.program_application_id),
5061: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
5062: x_tapv_rec.program_id),
5063: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
5057: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
5058: x_tapv_rec.request_id),
5059: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
5060: x_tapv_rec.program_application_id),
5061: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
5062: x_tapv_rec.program_id),
5063: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
5064: NULL,x_tapv_rec.program_update_date,SYSDATE)
5065: INTO
5059: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),
5060: x_tapv_rec.program_application_id),
5061: NVL(DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
5062: x_tapv_rec.program_id),
5063: DECODE(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,SYSDATE),
5064: NULL,x_tapv_rec.program_update_date,SYSDATE)
5065: INTO
5066: x_tapv_rec.request_id,
5067: x_tapv_rec.program_application_id,