1528: END IF;
1529: CLOSE FIND_BUS_UT_ID;
1530:
1531:
1532: fnd_message.set_name('JTF','JTA_UM_PRI_UP_USER_HEADER');
1533: fnd_file.new_line(fnd_file.log,1);
1534: fnd_file.put_line(fnd_file.log, fnd_message.get);
1535:
1536: IF RETCODE = FND_API.G_RET_STS_SUCCESS THEN
1530:
1531:
1532: fnd_message.set_name('JTF','JTA_UM_PRI_UP_USER_HEADER');
1533: fnd_file.new_line(fnd_file.log,1);
1534: fnd_file.put_line(fnd_file.log, fnd_message.get);
1535:
1536: IF RETCODE = FND_API.G_RET_STS_SUCCESS THEN
1537:
1538: FOR i IN PRIMARY_USERS LOOP
1535:
1536: IF RETCODE = FND_API.G_RET_STS_SUCCESS THEN
1537:
1538: FOR i IN PRIMARY_USERS LOOP
1539: fnd_message.set_name('JTF','JTA_UM_PRI_UP_USERS');
1540: UPDATE JTF_UM_USERTYPE_REG SET USERTYPE_ID = l_new_usertype_id
1541: WHERE USERTYPE_REG_ID = i.USERTYPE_REG_ID;
1542:
1543: COMMIT;
1554: AND NVL(R.END_DATE, SYSDATE + 1) > SYSDATE
1555: and f.user_id = i.user_id
1556: and r.relationship_code='EMPLOYEE_OF';
1557:
1558: fnd_message.set_token( 'USER_NAME', l_user_name );
1559: fnd_message.set_token( 'ORG_NAME', l_org_name );
1560: fnd_message.set_token( 'EMAIL', l_email );
1561: fnd_file.put_line(fnd_file.log, fnd_message.get);
1562: EXCEPTION
1555: and f.user_id = i.user_id
1556: and r.relationship_code='EMPLOYEE_OF';
1557:
1558: fnd_message.set_token( 'USER_NAME', l_user_name );
1559: fnd_message.set_token( 'ORG_NAME', l_org_name );
1560: fnd_message.set_token( 'EMAIL', l_email );
1561: fnd_file.put_line(fnd_file.log, fnd_message.get);
1562: EXCEPTION
1563: WHEN OTHERS THEN
1556: and r.relationship_code='EMPLOYEE_OF';
1557:
1558: fnd_message.set_token( 'USER_NAME', l_user_name );
1559: fnd_message.set_token( 'ORG_NAME', l_org_name );
1560: fnd_message.set_token( 'EMAIL', l_email );
1561: fnd_file.put_line(fnd_file.log, fnd_message.get);
1562: EXCEPTION
1563: WHEN OTHERS THEN
1564: fnd_message.set_token( 'USER_NAME', i.user_id );
1557:
1558: fnd_message.set_token( 'USER_NAME', l_user_name );
1559: fnd_message.set_token( 'ORG_NAME', l_org_name );
1560: fnd_message.set_token( 'EMAIL', l_email );
1561: fnd_file.put_line(fnd_file.log, fnd_message.get);
1562: EXCEPTION
1563: WHEN OTHERS THEN
1564: fnd_message.set_token( 'USER_NAME', i.user_id );
1565: fnd_message.set_token( 'ORG_NAME', 'Could not be retrived' );
1560: fnd_message.set_token( 'EMAIL', l_email );
1561: fnd_file.put_line(fnd_file.log, fnd_message.get);
1562: EXCEPTION
1563: WHEN OTHERS THEN
1564: fnd_message.set_token( 'USER_NAME', i.user_id );
1565: fnd_message.set_token( 'ORG_NAME', 'Could not be retrived' );
1566: fnd_message.set_token( 'EMAIL', 'Could not be retrived' );
1567: fnd_file.put_line(fnd_file.log, fnd_message.get);
1568: END;
1561: fnd_file.put_line(fnd_file.log, fnd_message.get);
1562: EXCEPTION
1563: WHEN OTHERS THEN
1564: fnd_message.set_token( 'USER_NAME', i.user_id );
1565: fnd_message.set_token( 'ORG_NAME', 'Could not be retrived' );
1566: fnd_message.set_token( 'EMAIL', 'Could not be retrived' );
1567: fnd_file.put_line(fnd_file.log, fnd_message.get);
1568: END;
1569: END LOOP;
1562: EXCEPTION
1563: WHEN OTHERS THEN
1564: fnd_message.set_token( 'USER_NAME', i.user_id );
1565: fnd_message.set_token( 'ORG_NAME', 'Could not be retrived' );
1566: fnd_message.set_token( 'EMAIL', 'Could not be retrived' );
1567: fnd_file.put_line(fnd_file.log, fnd_message.get);
1568: END;
1569: END LOOP;
1570:
1563: WHEN OTHERS THEN
1564: fnd_message.set_token( 'USER_NAME', i.user_id );
1565: fnd_message.set_token( 'ORG_NAME', 'Could not be retrived' );
1566: fnd_message.set_token( 'EMAIL', 'Could not be retrived' );
1567: fnd_file.put_line(fnd_file.log, fnd_message.get);
1568: END;
1569: END LOOP;
1570:
1571: END IF;
1569: END LOOP;
1570:
1571: END IF;
1572:
1573: fnd_message.set_name('JTF','JTA_UM_PENDING_USER_HEADER');
1574: fnd_file.new_line(fnd_file.log,1);
1575: fnd_file.put_line(fnd_file.log, fnd_message.get);
1576:
1577: FOR i IN PENDING_USERS LOOP
1571: END IF;
1572:
1573: fnd_message.set_name('JTF','JTA_UM_PENDING_USER_HEADER');
1574: fnd_file.new_line(fnd_file.log,1);
1575: fnd_file.put_line(fnd_file.log, fnd_message.get);
1576:
1577: FOR i IN PENDING_USERS LOOP
1578: fnd_message.set_name('JTF','JTA_UM_PENDING_USERS');
1579: fnd_message.set_token( 'USER_NAME', i.user_name );
1574: fnd_file.new_line(fnd_file.log,1);
1575: fnd_file.put_line(fnd_file.log, fnd_message.get);
1576:
1577: FOR i IN PENDING_USERS LOOP
1578: fnd_message.set_name('JTF','JTA_UM_PENDING_USERS');
1579: fnd_message.set_token( 'USER_NAME', i.user_name );
1580: fnd_message.set_token( 'ORG_NAME', i.party_name );
1581: fnd_message.set_token( 'EMAIL', i.email_address );
1582: fnd_file.put_line(fnd_file.log, fnd_message.get);
1575: fnd_file.put_line(fnd_file.log, fnd_message.get);
1576:
1577: FOR i IN PENDING_USERS LOOP
1578: fnd_message.set_name('JTF','JTA_UM_PENDING_USERS');
1579: fnd_message.set_token( 'USER_NAME', i.user_name );
1580: fnd_message.set_token( 'ORG_NAME', i.party_name );
1581: fnd_message.set_token( 'EMAIL', i.email_address );
1582: fnd_file.put_line(fnd_file.log, fnd_message.get);
1583: l_pending_users := l_pending_users + 1;
1576:
1577: FOR i IN PENDING_USERS LOOP
1578: fnd_message.set_name('JTF','JTA_UM_PENDING_USERS');
1579: fnd_message.set_token( 'USER_NAME', i.user_name );
1580: fnd_message.set_token( 'ORG_NAME', i.party_name );
1581: fnd_message.set_token( 'EMAIL', i.email_address );
1582: fnd_file.put_line(fnd_file.log, fnd_message.get);
1583: l_pending_users := l_pending_users + 1;
1584: END LOOP;
1577: FOR i IN PENDING_USERS LOOP
1578: fnd_message.set_name('JTF','JTA_UM_PENDING_USERS');
1579: fnd_message.set_token( 'USER_NAME', i.user_name );
1580: fnd_message.set_token( 'ORG_NAME', i.party_name );
1581: fnd_message.set_token( 'EMAIL', i.email_address );
1582: fnd_file.put_line(fnd_file.log, fnd_message.get);
1583: l_pending_users := l_pending_users + 1;
1584: END LOOP;
1585:
1578: fnd_message.set_name('JTF','JTA_UM_PENDING_USERS');
1579: fnd_message.set_token( 'USER_NAME', i.user_name );
1580: fnd_message.set_token( 'ORG_NAME', i.party_name );
1581: fnd_message.set_token( 'EMAIL', i.email_address );
1582: fnd_file.put_line(fnd_file.log, fnd_message.get);
1583: l_pending_users := l_pending_users + 1;
1584: END LOOP;
1585:
1586: fnd_file.new_line(fnd_file.log,1);
1591: AND UT.USERTYPE_ID = UTREG.USERTYPE_ID
1592: AND UTREG.STATUS_CODE = 'PENDING';
1593: */
1594: IF l_pending_users = 0 THEN
1595: fnd_message.set_name('JTF','JTA_UM_PRI_UP_COMPLETE');
1596: ELSE
1597: fnd_message.set_name('JTF','JTA_UM_PRI_UP_INCOMPLETE');
1598: fnd_message.set_token('USERS',l_pending_users);
1599: END IF;
1593: */
1594: IF l_pending_users = 0 THEN
1595: fnd_message.set_name('JTF','JTA_UM_PRI_UP_COMPLETE');
1596: ELSE
1597: fnd_message.set_name('JTF','JTA_UM_PRI_UP_INCOMPLETE');
1598: fnd_message.set_token('USERS',l_pending_users);
1599: END IF;
1600:
1601: fnd_file.new_line(fnd_file.log,1);
1594: IF l_pending_users = 0 THEN
1595: fnd_message.set_name('JTF','JTA_UM_PRI_UP_COMPLETE');
1596: ELSE
1597: fnd_message.set_name('JTF','JTA_UM_PRI_UP_INCOMPLETE');
1598: fnd_message.set_token('USERS',l_pending_users);
1599: END IF;
1600:
1601: fnd_file.new_line(fnd_file.log,1);
1602: fnd_file.put_line(fnd_file.log, fnd_message.get);
1598: fnd_message.set_token('USERS',l_pending_users);
1599: END IF;
1600:
1601: fnd_file.new_line(fnd_file.log,1);
1602: fnd_file.put_line(fnd_file.log, fnd_message.get);
1603:
1604: END UPGRADE_PRIMARY_USER;
1605: END JTF_UM_USERTYPE_CREDENTIALS;