977: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
978: End if; -- validation error
979: End if; -- validate before inserting
980:
981: l_UserId := nvl(Fnd_Global.USER_ID, -1);
982: l_LoginId := Fnd_Global.LOGIN_ID;
983: l_RequestId := Fnd_Global.CONC_REQUEST_ID;
984: l_ProgramId := Fnd_Global.CONC_PROGRAM_ID;
985: l_ApplicationId := Fnd_Global.PROG_APPL_ID;
978: End if; -- validation error
979: End if; -- validate before inserting
980:
981: l_UserId := nvl(Fnd_Global.USER_ID, -1);
982: l_LoginId := Fnd_Global.LOGIN_ID;
983: l_RequestId := Fnd_Global.CONC_REQUEST_ID;
984: l_ProgramId := Fnd_Global.CONC_PROGRAM_ID;
985: l_ApplicationId := Fnd_Global.PROG_APPL_ID;
986: -- do not use decode because of implicit data type conversions
979: End if; -- validate before inserting
980:
981: l_UserId := nvl(Fnd_Global.USER_ID, -1);
982: l_LoginId := Fnd_Global.LOGIN_ID;
983: l_RequestId := Fnd_Global.CONC_REQUEST_ID;
984: l_ProgramId := Fnd_Global.CONC_PROGRAM_ID;
985: l_ApplicationId := Fnd_Global.PROG_APPL_ID;
986: -- do not use decode because of implicit data type conversions
987: If l_RequestId is null then
980:
981: l_UserId := nvl(Fnd_Global.USER_ID, -1);
982: l_LoginId := Fnd_Global.LOGIN_ID;
983: l_RequestId := Fnd_Global.CONC_REQUEST_ID;
984: l_ProgramId := Fnd_Global.CONC_PROGRAM_ID;
985: l_ApplicationId := Fnd_Global.PROG_APPL_ID;
986: -- do not use decode because of implicit data type conversions
987: If l_RequestId is null then
988: l_ProgramUpdate := null;
981: l_UserId := nvl(Fnd_Global.USER_ID, -1);
982: l_LoginId := Fnd_Global.LOGIN_ID;
983: l_RequestId := Fnd_Global.CONC_REQUEST_ID;
984: l_ProgramId := Fnd_Global.CONC_PROGRAM_ID;
985: l_ApplicationId := Fnd_Global.PROG_APPL_ID;
986: -- do not use decode because of implicit data type conversions
987: If l_RequestId is null then
988: l_ProgramUpdate := null;
989: Else
1331: End If; -- validation
1332:
1333: -- update operation resource
1334:
1335: l_UserId := nvl(Fnd_Global.USER_ID, -1);
1336: l_LoginId := Fnd_Global.LOGIN_ID;
1337: l_RequestId := Fnd_Global.CONC_REQUEST_ID;
1338: l_ProgramId := Fnd_Global.CONC_PROGRAM_ID;
1339: l_ApplicationId := Fnd_Global.PROG_APPL_ID;
1332:
1333: -- update operation resource
1334:
1335: l_UserId := nvl(Fnd_Global.USER_ID, -1);
1336: l_LoginId := Fnd_Global.LOGIN_ID;
1337: l_RequestId := Fnd_Global.CONC_REQUEST_ID;
1338: l_ProgramId := Fnd_Global.CONC_PROGRAM_ID;
1339: l_ApplicationId := Fnd_Global.PROG_APPL_ID;
1340: -- do not use decode because of implicit data type conversions
1333: -- update operation resource
1334:
1335: l_UserId := nvl(Fnd_Global.USER_ID, -1);
1336: l_LoginId := Fnd_Global.LOGIN_ID;
1337: l_RequestId := Fnd_Global.CONC_REQUEST_ID;
1338: l_ProgramId := Fnd_Global.CONC_PROGRAM_ID;
1339: l_ApplicationId := Fnd_Global.PROG_APPL_ID;
1340: -- do not use decode because of implicit data type conversions
1341: If l_RequestId is null then
1334:
1335: l_UserId := nvl(Fnd_Global.USER_ID, -1);
1336: l_LoginId := Fnd_Global.LOGIN_ID;
1337: l_RequestId := Fnd_Global.CONC_REQUEST_ID;
1338: l_ProgramId := Fnd_Global.CONC_PROGRAM_ID;
1339: l_ApplicationId := Fnd_Global.PROG_APPL_ID;
1340: -- do not use decode because of implicit data type conversions
1341: If l_RequestId is null then
1342: l_ProgramUpdate := null;
1335: l_UserId := nvl(Fnd_Global.USER_ID, -1);
1336: l_LoginId := Fnd_Global.LOGIN_ID;
1337: l_RequestId := Fnd_Global.CONC_REQUEST_ID;
1338: l_ProgramId := Fnd_Global.CONC_PROGRAM_ID;
1339: l_ApplicationId := Fnd_Global.PROG_APPL_ID;
1340: -- do not use decode because of implicit data type conversions
1341: If l_RequestId is null then
1342: l_ProgramUpdate := null;
1343: Else