[Home] [Help]
368: hz_common_pub.disable_cont_source_security;
369:
370: --Check for global ultimate
371: BEGIN
372: SELECT 'Y' INTO l_chk_done FROM DUAL
373: WHERE EXISTS (SELECT 'Y'
374: FROM hz_relationships hzr
375: WHERE hzr.subject_table_name = 'HZ_PARTIES'
376: AND hzr.object_table_name = 'HZ_PARTIES'
390: END IF;
391:
392: --Check for domestic ultimate
393: BEGIN
394: SELECT 'Y' INTO l_chk_done FROM DUAL
395: WHERE EXISTS (SELECT 'Y'
396: FROM hz_relationships hzr
397: WHERE hzr.subject_table_name = 'HZ_PARTIES'
398: AND hzr.object_table_name = 'HZ_PARTIES'
496: p_user_id,
497: sysdate,
498: p_user_id,
499: sysdate
500: FROM DUAl);
501: END IF;
502:
503: --Key name for trade name
504: IF (l_trade_name is not null) THEN
525: p_user_id,
526: sysdate,
527: p_user_id,
528: sysdate
529: FROM DUAL);
530: END IF;
531:
532: --Key name for postal code
533: IF (l_postal_code is not null) THEN
554: p_user_id,
555: sysdate,
556: p_user_id,
557: sysdate
558: FROM DUAL);
559: END IF;
560:
561: END CREATE_ACCT_MAPPINGS;
562:
767:
768: --If named account does not exist, then create a named account for the party
769: IF c_check_na_exists%NOTFOUND THEN
770:
771: SELECT jtf_tty_named_accts_s.nextval INTO l_na_id FROM dual;
772: -- dbms_output.put_line('Sandeep - In AADD_ORGTO_TG :3' );
773:
774: INSERT INTO jtf_tty_named_accts
775: (NAMED_ACCOUNT_ID,
815: --At this point either named account exists or it has been created
816: --Add this named account to the TG
817: -- dbms_output.put_line('Sandeep - In AADD_ORGTO_TG :34' );
818: CLOSE c_check_na_exists;
819: SELECT jtf_tty_terr_grp_accts_s.nextval INTO l_tga_id FROM dual;
820:
821: INSERT INTO jtf_tty_terr_grp_accts
822: (TERR_GROUP_ACCOUNT_ID,
823: OBJECT_VERSION_NUMBER,
975: l_user_id,
976: sysdate,
977: l_user_id,
978: sysdate
979: FROM dual
980: WHERE NOT EXISTS (SELECT null FROM jtf_tty_named_acct_rsc rsc
981: WHERE rsc.terr_group_account_id = p_terr_grp_acct_id
982: AND rsc.RESOURCE_ID = l_resource_id
983: AND rsc.RSC_ROLE_CODE = l_rsc_role_code
1828: /* by shli, GSST Decom */
1829: /*
1830: select jtf_tty_named_acct_changes_s.nextval
1831: into l_change_id
1832: from sys.dual;
1833:
1834: insert into jtf_tty_named_acct_changes
1835: ( NAMED_ACCT_CHANGE_ID
1836: , OBJECT_VERSION_NUMBER
1917: -- dbms_output.put_line('l_directs_on_account = ' || l_directs_on_account);
1918:
1919: IF l_directs_on_account = 0 THEN
1920: select jtf_tty_named_acct_rsc_s.nextval into new_seq_acct_rsc_id
1921: from dual;
1922:
1923: lp_mgr_group_id := p_removed_rscs_tbl(i).mgr_group_id;
1924: lp_mgr_role_code := p_removed_rscs_tbl(i).mgr_role_code;
1925:
2073:
2074:
2075: -- insert into jtf_tty_named_acct_rsc
2076: select jtf_tty_named_acct_rsc_s.nextval into new_seq_acct_rsc_id
2077: from dual;
2078:
2079: -- dbms_output.put_line('inserting to jtf_tty_named_acct_rsc ');
2080: -- dbms_output.put_line(' ' || ' //new_seq_acct_rsc_id=' || new_seq_acct_rsc_id ||
2081: --' //l_terr_group_account_id=' || l_terr_group_account_id ||' //lp_resource_id=' ||
2081: --' //l_terr_group_account_id=' || l_terr_group_account_id ||' //lp_resource_id=' ||
2082: -- lp_resource_id ||' //lp_group_id=' || lp_group_id
2083: --|| l_assign_flag ||' //lp_resource_type=' || lp_resource_type );
2084:
2085: -- assigned flag Y because user is assigning this individual, may be himself.
2086: insert into jtf_tty_named_acct_rsc (
2087: account_resource_id,
2088: object_version_number,
2089: terr_group_account_id,
2138: to do an incremental and Total Mode */
2139: /* by shli, GSST Decom */
2140: /* select jtf_tty_named_acct_changes_s.nextval
2141: into l_change_id
2142: from sys.dual;
2143:
2144: insert into jtf_tty_named_acct_changes
2145: ( NAMED_ACCT_CHANGE_ID
2146: , OBJECT_VERSION_NUMBER