[Home] [Help]
4234: /* SCE CHANGE starts*/
4235:
4236: -- =============================================
4237: -- Change the company name in msc_companies and
4238: -- msc_trading_partners if it is changed in
4239: -- MSC : Operator Company Name profile option.
4240: -- =============================================
4241:
4242:
4495:
4496: /* CP-ACK ends */
4497:
4498: IF v_is_complete_refresh THEN
4499: msc_analyse_tables_pk.analyse_table( 'MSC_TRADING_PARTNERS');
4500: msc_analyse_tables_pk.analyse_table( 'MSC_DESIGNATORS');
4501: END IF;
4502:
4503:
5987:
5988: /* SCE CHANGE starts*/
5989: -- =============================================
5990: -- Change the company name in msc_companies and
5991: -- msc_trading_partners if it is cheanged in
5992: -- MSC : Operator Company Name profile option.
5993: -- =============================================
5994:
5995: IF (MSC_UTIL.G_MSC_CONFIGURATION = MSC_UTIL.G_CONF_APS_SCE
7477:
7478: /*************** PREPLACE CHANGE END *****************/
7479:
7480: /* added this procedure for the conc program - Create Instance-Org Supplier Association
7481: This conc program updates the Msc_trading_partners table with the Modeleed Supplier info */
7482:
7483: PROCEDURE ENTER_MODELLED_INFO( ERRBUF OUT NOCOPY VARCHAR2,
7484: RETCODE OUT NOCOPY NUMBER,
7485: pINSTANCE_ID IN NUMBER,
7491: BEGIN
7492:
7493: IF ( (pSUPPLIER_ID IS NULL) AND (pSUPPLIER_SITE_ID IS NULL) ) THEN
7494:
7495: UPDATE msc_trading_partners
7496: SET MODELED_SUPPLIER_ID = null,
7497: MODELED_SUPPLIER_SITE_ID = null,
7498: ORG_SUPPLIER_MAPPED = 'N',
7499: ACCEPT_DEMANDS_FROM_UNMET_PO = null
7510: RETCODE := MSC_UTIL.G_SUCCESS ;
7511:
7512: ELSE
7513:
7514: UPDATE msc_trading_partners
7515: SET MODELED_SUPPLIER_ID = pSUPPLIER_ID,
7516: MODELED_SUPPLIER_SITE_ID = pSUPPLIER_SITE_ID,
7517: ORG_SUPPLIER_MAPPED = 'Y',
7518: ACCEPT_DEMANDS_FROM_UNMET_PO = pACCEPT_DEMANDS_FROM_UNMET_PO