1332: begin
1333: --
1334: -- First, initialize the session. Concurrent req's have already been
1335: -- initialized at least for the shared AW
1336: -- and ZPB_CURRENT_USER_V is not valid for them:
1337: --
1338: l_personal_alias_flag := ZPB_AW_STATUS.GET_PERSONAL_ALIAS_FLAG();
1339: if (not (FND_GLOBAL.CONC_REQUEST_ID > 0)) then
1340:
1337: --
1338: l_personal_alias_flag := ZPB_AW_STATUS.GET_PERSONAL_ALIAS_FLAG();
1339: if (not (FND_GLOBAL.CONC_REQUEST_ID > 0)) then
1340:
1341: -- if zpb_current_user_v is not initialized and we get no data here,
1342: -- we must be in an open-sql session - only shared AW used and it is
1343: -- already attached
1344: begin
1345: select BUSINESS_AREA_ID, SHADOW_ID
1343: -- already attached
1344: begin
1345: select BUSINESS_AREA_ID, SHADOW_ID
1346: into l_ba_id, l_shadow
1347: from ZPB_CURRENT_USER_V;
1348: exception when others then
1349: null;
1350: end;
1351:
1459: begin
1460: --
1461: -- First, initialize the session. Concurrent req's have already been
1462: -- initialized at least for the shared AW
1463: -- and ZPB_CURRENT_USER_V is not valid for them:
1464: --
1465: begin
1466: select BUSINESS_AREA_ID, SHADOW_ID
1467: into l_ba_id, l_shadow
1464: --
1465: begin
1466: select BUSINESS_AREA_ID, SHADOW_ID
1467: into l_ba_id, l_shadow
1468: from ZPB_CURRENT_USER_V;
1469: exception when others then
1470: null;
1471: end;
1472: