Search This Blog

Monday, September 19, 2022

Create Customer as Organization API in apps R12

CREATE TABLE APPS.XXFIA_CUSTOMERS_INT

(

  CUSTOMER_NAME         VARCHAR2(240 BYTE),

  ACCOUNT_NUMBER        VARCHAR2(240 BYTE),

  ADDRESS1              VARCHAR2(240 BYTE),

  ADDRESS2              VARCHAR2(240 BYTE),

  CITY                  VARCHAR2(240 BYTE),

  COUNTRY               VARCHAR2(240 BYTE),

  SOURCE                VARCHAR2(240 BYTE),

  PHONE1                VARCHAR2(240 BYTE),

  PHONE2                VARCHAR2(240 BYTE),

  EMAIL                 VARCHAR2(240 BYTE),

  CUSTOMER_ID           NUMBER,

  STATUS                VARCHAR2(240 BYTE),

  MESSAGE               VARCHAR2(2400 BYTE),

  COLUMN1               VARCHAR2(240 BYTE),

  COLUMN2               VARCHAR2(240 BYTE),

  P_LOCATION_ID         VARCHAR2(240 BYTE),

  P_PARTY_SITE_ID       VARCHAR2(240 BYTE),

  P_CUST_ACCT_SITE_ID   VARCHAR2(240 BYTE),

  P_SITE_USE_ID_BILLTO  VARCHAR2(240 BYTE),

  P_SITE_USE_ID_SHIPTO  VARCHAR2(240 BYTE),

  PHONE1_STATUS         VARCHAR2(240 BYTE),

  PHONE2_STATUS         VARCHAR2(240 BYTE),

  EMAIL_STATUS          VARCHAR2(240 BYTE)

)


 CREATE OR REPLACE PROCEDURE APPS.create_customer_FIA (

--    errbuff                 OUT VARCHAR2,

--    retcode                 OUT VARCHAR2,

    P_CUSTOMER_NAME             VARCHAR2,

    P_ACCOUNT_NUMBER            VARCHAR2,

    P_ADDRESS1                  VARCHAR2 DEFAULT NULL,

    P_ADDRESS2                  VARCHAR2 DEFAULT NULL,

    P_CITY                      VARCHAR2 DEFAULT NULL,

    P_COUNTRY                   VARCHAR2 DEFAULT NULL,

    P_SOURCE                    VARCHAR2 DEFAULT NULL,            --attribute6

    P_EID_LICENSE_NO            VARCHAR2 DEFAULT NULL,            --attribute8

    P_CUSTOMER_EID              VARCHAR2 DEFAULT NULL,            --attribute9

    P_VAT_REGISTRATION_NO       VARCHAR2 DEFAULT NULL,           --attribute10

    P_PHONE_AREA_CODE1          VARCHAR2 DEFAULT NULL,

    P_PHONE1                    VARCHAR2 DEFAULT NULL,

    P_PHONE_AREA_CODE2          VARCHAR2 DEFAULT NULL,

    P_PHONE2                    VARCHAR2 DEFAULT NULL,

    P_EMAIL                    VARCHAR2 DEFAULT NULL,

    P_CUSTOMER_ID           OUT VARCHAR2,

    P_STATUS                OUT VARCHAR2,

    P_MESSAGE               OUT VARCHAR2,

P_location_id  OUT VARCHAR2,

P_party_site_id  OUT VARCHAR2,

P_cust_acct_site_id  OUT VARCHAR2,

P_site_use_id_BILLTO  OUT VARCHAR2,

P_site_use_id_SHIPTO  OUT VARCHAR2,

PHONE1_STATUS OUT VARCHAR2,

PHONE2_STATUS  OUT VARCHAR2,

EMAIL_STATUS OUT VARCHAR2

    )

AS

    p_cust_account_rec       HZ_CUST_ACCOUNT_V2PUB.CUST_ACCOUNT_REC_TYPE; --tax_header_level_flag    p_organization_rec       HZ_PARTY_V2PUB.ORGANIZATION_REC_TYPE;    p_customer_profile_rec   HZ_CUSTOMER_PROFILE_V2PUB.CUSTOMER_PROFILE_REC_TYPE;

    L_CCID                   NUMBER;

    L_PHONE_STATUS1           VARCHAR2(200);

    L_PHONE_STATUS2           VARCHAR2(200);

    L_EMAIL_STATUS            VARCHAR2(200);

    x_cust_account_id        NUMBER;

    x_account_number         VARCHAR2 (2000);    x_party_id               NUMBER;

    x_party_number           VARCHAR2 (2000);    x_profile_id             NUMBER;

    x_return_status          VARCHAR2 (2000);    x_msg_count              NUMBER;

    x_msg_data               VARCHAR2 (2000);    --2 location physical    p_location_rec           HZ_LOCATION_V2PUB.LOCATION_REC_TYPE;    x_location_id            NUMBER;    --3 cust_site    p_party_site_rec         HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE;    x_party_site_id          NUMBER;    x_party_site_number      VARCHAR2 (2000);    --4 cust_site_use    p_cust_acct_site_rec     hz_cust_account_site_v2pub.cust_acct_site_rec_type;    x_cust_acct_site_id      NUMBER;    --5 Bill_to, Ship_to    p_cust_site_use_rec      HZ_CUST_ACCOUNT_SITE_V2PUB.CUST_SITE_USE_REC_TYPE;

    p_cust_site_use_rec2     HZ_CUST_ACCOUNT_SITE_V2PUB.CUST_SITE_USE_REC_TYPE;    --p_customer_profile_rec HZ_CUSTOMER_PROFILE_V2PUB.CUSTOMER_PROFILE_REC_TYPE;    x_site_use_id            NUMBER;    --Local variables    L_CUSTOMER_ID            NUMBER;

    L_VS_OUT                 VARCHAR2(2000);

BEGIN

    -------------Initalize-------------------    mo_global.init ('AR');    fnd_global.apps_initialize (user_id        => 0,

                                resp_id        => 52470,

                                resp_appl_id   => 222);    mo_global.set_policy_context ('S', 2352);    fnd_global.set_nls_context ('AMERICAN');    --------------------------------    ---CHECKING IF CUSTOMER EXISTS------------------    BEGIN

        SELECT CUSTOMER_ID

          INTO L_CUSTOMER_ID

          FROM FEA_CUSTOMER_DETAILS

         WHERE (   CUSTOMER_NAME = P_CUSTOMER_NAME

                OR ACCOUNT_NUMBER = P_ACCOUNT_NUMBER);

    EXCEPTION

        WHEN OTHERS

        THEN

            L_CUSTOMER_ID := 0;

    END;    DBMS_OUTPUT.PUT_LINE ('New Customer--------------------'||L_CUSTOMER_ID);    IF L_CUSTOMER_ID = 0

    THEN

        -------------------------------        DBMS_OUTPUT.PUT_LINE ('Creating New Customer -----------');        p_cust_account_rec.account_name := P_CUSTOMER_NAME;

        p_cust_account_rec.ACCOUNT_NUMBER := P_ACCOUNT_NUMBER;

        --p_cust_account_rec.

        

                p_cust_account_rec.created_by_module := 'HZ_CPUI';        p_cust_account_rec.attribute6 := P_SOURCE;            --SOURCE 10 CHAR        p_cust_account_rec.attribute8 := P_EID_LICENSE_NO; --EID_LICENSE_NO 50 CHAR        p_cust_account_rec.attribute9 := P_CUSTOMER_EID; --CUSTOMER_EID NUMBER        p_cust_account_rec.attribute10 := P_VAT_REGISTRATION_NO; --VAT_REGISTRATION_NO 50 CHAR        -- p_cust_account_rec.orig_system_reference := '001_001'; -- is not mandatory        p_organization_rec.organization_name := P_CUSTOMER_NAME;        p_organization_rec.created_by_module := 'HZ_CPUI';        --x_account_number := '99999';        hz_cust_account_v2pub.create_cust_account ('T',

                                                   p_cust_account_rec,

                                                   p_organization_rec,

                                                   p_customer_profile_rec,

                                                   'F',

                                                   x_cust_account_id,

                                                   x_account_number,

                                                   x_party_id,

                                                   x_party_number,

                                                   x_profile_id,

                                                   x_return_status,

                                                   x_msg_count,

                                                   x_msg_data);--        DBMS_OUTPUT.put_line (

--               '--> 1 x_cust_account_id: '

--            || x_cust_account_id

--            || ' x_account_number: '

--            || x_account_number

--            || ' x_party_id: '

--            || x_party_id

--            || ' x_profile_id: '

--            || x_profile_id

--            || ' x_msg_data: '

--            || x_msg_data);        --2 location physical        p_location_rec.country := NVL(P_COUNTRY,'AE');

        p_location_rec.address1 := NVL (P_ADDRESS1, 'Fujairah');

        p_location_rec.address2 := NVL (P_ADDRESS2, ' ');

        p_location_rec.city := NVL (P_CITY, 'Fujairah'); --p_location_rec.postal_code := '94401';

        IF P_COUNTRY = 'US' THEN

        p_location_rec.state := '00';

        p_location_rec.county := '00';

        END IF;

        p_location_rec.created_by_module := 'HZ_CPUI';

        hz_location_v2pub.create_location ('T',

                                           p_location_rec,

                                           x_location_id,

                                           x_return_status,

                                           x_msg_count,

                                           x_msg_data);--        DBMS_OUTPUT.put_line (

--               '--> 2 x_location_id: '

--            || x_location_id

--            || ' x_return_status: '

--            || x_return_status

--            || ' x_msg_data: '

--            || x_msg_data);

P_location_id   := x_location_id;

        --3 cust_site        p_party_site_rec.party_id := x_party_id;        --<<value for party_id from step 2>        p_party_site_rec.location_id := x_location_id;        --<<value for location_id from step 3>        p_party_site_rec.identifying_address_flag := 'Y';        p_party_site_rec.created_by_module := 'HZ_CPUI';        hz_party_site_v2pub.create_party_site ('T',

                                               p_party_site_rec,

                                               x_party_site_id,

                                               x_party_site_number,

                                               x_return_status,

                                               x_msg_count,

                                               x_msg_data);--        DBMS_OUTPUT.put_line (

--               '-->3 x_party_site_id: '

--            || x_party_site_id

--            || ' x_party_site_number: '

--            || x_party_site_number

--            || ' x_msg_data: '

--            || x_msg_data);

P_party_site_id   := x_party_site_id;

        --4 cust_site_use        p_cust_acct_site_rec.cust_account_id := x_cust_account_id;        --<<value for cust_account_id you get from step 2>        p_cust_acct_site_rec.party_site_id := x_party_site_id;        --<<value for party_site_id from step 4>        --p_cust_acct_site_rec.language := 'US';        p_cust_acct_site_rec.created_by_module := 'HZ_CPUI';        hz_cust_account_site_v2pub.create_cust_acct_site (

            'T',

            p_cust_acct_site_rec,

            x_cust_acct_site_id,

            x_return_status,

            x_msg_count,

            x_msg_data);--        DBMS_OUTPUT.put_line (

--               '--> 4 x_cust_acct_site_id: '

--            || x_cust_acct_site_id

--            || ' x_return_status: '

--            || x_return_status

--            || ' x_msg_data: '

--            || x_msg_data);

P_cust_acct_site_id   := x_cust_acct_site_id;

        --5  Bill_to        p_cust_site_use_rec.cust_acct_site_id := x_cust_acct_site_id;        --<<value for cust_acct_site_id from step 5>        p_cust_site_use_rec.site_use_code := 'BILL_TO';        p_cust_site_use_rec.created_by_module := 'HZ_CPUI';

        

--        BEGIN

--        FIA_CREATE_CCID_VS(P_CUSTOMER_NAME,P_ACCOUNT_NUMBER,L_VS_OUT);

--        EXCEPTION WHEN OTHERS THEN NULL;

--        DBMS_OUTPUT.PUT_LINE('EXISTS IN VS');

--        END;

        L_CCID := FIA_CREATE_CCID2(P_CUSTOMER_NAME,P_ACCOUNT_NUMBER);

        IF L_CCID >0 THEN

        DBMS_OUTPUT.PUT_LINE('L_CCID '||L_CCID);

        p_cust_site_use_rec.gl_id_rec :=L_CCID;

        END IF;         hz_cust_account_site_v2pub.create_cust_site_use (

            'T',

            p_cust_site_use_rec,

            p_customer_profile_rec,

            '',

            '',

            x_site_use_id,

            x_return_status,

            x_msg_count,

            x_msg_data);--        DBMS_OUTPUT.put_line (

--               '--> 5BillTO x_site_use_id: '

--            || x_site_use_id

--            || ' x_msg_data: '

--            || x_msg_data);

P_site_use_id_BILLTO  := x_site_use_id;

        --6 SHIP_TO        p_cust_site_use_rec2.cust_acct_site_id := x_cust_acct_site_id;        --<<value for cust_acct_site_id from step 9>        p_cust_site_use_rec2.site_use_code := 'SHIP_TO';        p_cust_site_use_rec2.created_by_module := 'HZ_CPUI';        hz_cust_account_site_v2pub.create_cust_site_use (

            'T',

            p_cust_site_use_rec2,

            p_customer_profile_rec,

            '',

            '',

            x_site_use_id,

            x_return_status,

            x_msg_count,

            x_msg_data);--        DBMS_OUTPUT.put_line (

--               '--> 6 ShipTO x_site_use_id: '

--            || x_site_use_id

--            || ' x_msg_data: '

--            || x_msg_data);

            P_site_use_id_SHIPTO  := x_site_use_id;

        -----------CREATING PHONE FOR CUSTOMER

        IF P_PHONE1 IS NOT NULL THEN

        BEGIN

        FIA_CREATE_PHONE_P(x_party_id,P_PHONE1 ,NVL(P_PHONE_AREA_CODE1,''),L_PHONE_STATUS1);

        DBMS_OUTPUT.PUT_LINE('--> 7 Phone1 '||L_PHONE_STATUS1);

        PHONE1_STATUS  := L_PHONE_STATUS1;

        EXCEPTION WHEN OTHERS THEN 

        DBMS_OUTPUT.PUT_LINE('ERROR PHONE1 '||SQLERRM);

        END;

        END IF;

        IF P_PHONE2 IS NOT NULL THEN

        BEGIN

        FIA_CREATE_PHONE_P(x_party_id,P_PHONE2 ,NVL(P_PHONE_AREA_CODE2,''),L_PHONE_STATUS2);

        DBMS_OUTPUT.PUT_LINE('--> 8 Phone2 '||L_PHONE_STATUS1);

        PHONE2_STATUS  := L_PHONE_STATUS2;

        EXCEPTION WHEN OTHERS THEN 

        DBMS_OUTPUT.PUT_LINE('ERROR PHONE2 '||SQLERRM);

        END;

        END IF;

        IF P_EMAIL IS NOT NULL THEN

        BEGIN

        FIA_CREATE_EMAIL_P(x_party_id,P_EMAIL,L_EMAIL_STATUS);

        DBMS_OUTPUT.PUT_LINE('--> 8 Email '||L_EMAIL_STATUS);

        EMAIL_STATUS  := L_EMAIL_STATUS;

        EXCEPTION WHEN OTHERS THEN 

        DBMS_OUTPUT.PUT_LINE('ERROR Email '||SQLERRM);

        END;

        END IF;

        COMMIT;        P_CUSTOMER_ID := x_cust_account_id;        P_STATUS := 'S';        P_MESSAGE := x_msg_data;

    ELSE

        P_CUSTOMER_ID := NULL;        P_STATUS := 'E';        P_MESSAGE := 'Customer Name Already Exists';

    END IF;

EXCEPTION

    WHEN OTHERS

    THEN

        P_CUSTOMER_ID := NULL;        P_STATUS := 'E';        P_MESSAGE := SQLERRM || ' ' || x_msg_data;        DBMS_OUTPUT.PUT_LINE (SQLERRM);

END;

/

---------------------------------------------------------

Block to Run



DECLARE

L_CUSTOMER_ID VARCHAR2(240);

L_STATUS VARCHAR2(240);

L_MSG VARCHAR2(240);

location_id  VARCHAR2(240);party_site_id VARCHAR2(240);cust_acct_site_id  VARCHAR2(240);

site_use_id_BILLTO  VARCHAR2(240);site_use_id_SHIPTO  VARCHAR2(240);PHONE1_STATUS VARCHAR2(240);

PHONE2_STATUS  VARCHAR2(240);EMAIL_STATUS VARCHAR2(240);

CURSOR C1 IS

SELECT * FROM XXFIA_CUSTOMERS_INT

WHERE ACCOUNT_NUMBER  NOT IN ('A1173', 'A1120','A0092','A0091','RD042')

--WHERE STATUS = 'E'

AND CUSTOMER_ID IS NULL

;

BEGIN

DBMS_OUTPUT.ENABLE(1000000); 

FOR I IN C1 LOOP

BEGIN

DBMS_OUTPUT.PUT_LINE('ANOY BLOCK-----------------'||I.ACCOUNT_NUMBER);

create_customer_FIA(

TRIM(I.CUSTOMER_NAME)

,TRIM(I.ACCOUNT_NUMBER)

,NVL(TRIM(I.ADDRESS1),'FUJAIRAH')

,NULL

,TRIM(I.CITY)

,NVL(TRIM(I.COUNTRY),'AE')

,TRIM(I.SOURCE),NULL,NULL,NULL,NULL

,TRIM(I.PHONE1),NULL

,TRIM(I.PHONE2)

,TRIM(I.EMAIL)

,L_CUSTOMER_ID,L_STATUS,L_MSG,

location_id  ,party_site_id  ,cust_acct_site_id  ,

site_use_id_BILLTO  ,site_use_id_SHIPTO  ,PHONE1_STATUS ,

PHONE2_STATUS  ,EMAIL_STATUS

);

UPDATE XXFIA_CUSTOMERS_INT

SET CUSTOMER_ID = L_CUSTOMER_ID,

STATUS =L_STATUS,

MESSAGE=L_MSG,

P_location_id =location_id ,P_party_site_id =party_site_id ,P_cust_acct_site_id  =cust_acct_site_id,

P_site_use_id_BILLTO =site_use_id_BILLTO ,P_site_use_id_SHIPTO  =site_use_id_SHIPTO,PHONE1_STATUS =PHONE1_STATUS,

PHONE2_STATUS=PHONE2_STATUS  ,EMAIL_STATUS=EMAIL_STATUS

WHERE ACCOUNT_NUMBER = I.ACCOUNT_NUMBER;

EXCEPTION WHEN OTHERS THEN

DBMS_OUTPUT.PUT_LINE('EXP---'||SQLERRM||'-'||I.ACCOUNT_NUMBER);

L_MSG := SQLERRM;

UPDATE  XXFIA_CUSTOMERS_INT

SET STATUS ='E'

, MESSAGE = L_MSG

WHERE ACCOUNT_NUMBER = I.ACCOUNT_NUMBER

;

END;

END LOOP;

END;


---------------------Tax Profile Update-----------------

/***IMPORTANT*****/

--when we create customer with all details, a entry will be entered into table ZX_PARTY_TAX_PROFILE, we need toupdate 'Allow Tax Applicability' using below api


DECLARE

CURSOR C1 IS SELECT PARTY_TAX_PROFILE_ID, CREATED_BY FROM ZX_PARTY_TAX_PROFILE

WHERE CREATION_DATE LIKE SYSDATE 

and party_type_code = 'THIRD_PARTY'

AND ALLOW_OFFSET_TAX_FLAG  IS NULL

AND CREATED_BY IN (2605,0)

ORDER BY CREATION_DATE DESC

;

   X_RETURN_STATUS   VARCHAR2 (1);

BEGIN

DBMS_OUTPUT.ENABLE(1000000); 

FOR I IN C1 LOOP

   ZX_PARTY_TAX_PROFILE_PKG.update_row (

      P_PARTY_TAX_PROFILE_ID           => I.PARTY_TAX_PROFILE_ID,

      P_COLLECTING_AUTHORITY_FLAG      => NULL,

      P_PROVIDER_TYPE_CODE             => NULL,

      P_CREATE_AWT_DISTS_TYPE_CODE     => NULL,

      P_CREATE_AWT_INVOICES_TYPE_COD   => NULL,

      P_TAX_CLASSIFICATION_CODE        => NULL, --Tax Classification

      P_SELF_ASSESS_FLAG               => 'N',

      P_ALLOW_OFFSET_TAX_FLAG          => 'N', --Allow Offset Taxes

      P_REP_REGISTRATION_NUMBER        => NULL,

      P_EFFECTIVE_FROM_USE_LE          => NULL,

      P_RECORD_TYPE_CODE               => NULL,

      P_REQUEST_ID                     => NULL,

      P_ATTRIBUTE1                     => NULL,

      P_ATTRIBUTE2                     => NULL,

      P_ATTRIBUTE3                     => NULL,

      P_ATTRIBUTE4                     => NULL,

      P_ATTRIBUTE5                     => NULL,

      P_ATTRIBUTE6                     => NULL,

      P_ATTRIBUTE7                     => NULL,

      P_ATTRIBUTE8                     => NULL,

      P_ATTRIBUTE9                     => NULL,

      P_ATTRIBUTE10                    => NULL,

      P_ATTRIBUTE11                    => NULL,

      P_ATTRIBUTE12                    => NULL,

      P_ATTRIBUTE13                    => NULL,

      P_ATTRIBUTE14                    => NULL,

      P_ATTRIBUTE15                    => NULL,

      P_ATTRIBUTE_CATEGORY             => NULL,

      P_PARTY_ID                       => NULL,

      P_PROGRAM_LOGIN_ID               => NULL,

      P_PARTY_TYPE_CODE                => NULL,

      P_SUPPLIER_FLAG                  => NULL,

      P_CUSTOMER_FLAG                  => NULL,

      P_SITE_FLAG                      => NULL,

      P_PROCESS_FOR_APPLICABILITY_FL   => 'Y', --Allow Tax Applicability

      P_ROUNDING_LEVEL_CODE            => 'HEADER', -- Rounding Level

      P_ROUNDING_RULE_CODE             => 'UP', --Rounding Rule

      P_WITHHOLDING_START_DATE         => NULL,

      P_INCLUSIVE_TAX_FLAG             => 'N',

      P_ALLOW_AWT_FLAG                 => NULL,

      P_USE_LE_AS_SUBSCRIBER_FLAG      => NULL,

      P_LEGAL_ESTABLISHMENT_FLAG       => NULL,

      P_FIRST_PARTY_LE_FLAG            => NULL,

      P_REPORTING_AUTHORITY_FLAG       => NULL,

      X_RETURN_STATUS                  => X_RETURN_STATUS,

      P_REGISTRATION_TYPE_CODE         => NULL,

      P_COUNTRY_CODE                   => NULL

   );

   COMMIT;

   DBMS_OUTPUT.PUT_LINE ('RETURN STATUS :' || X_RETURN_STATUS);

END LOOP;

   EXCEPTION WHEN OTHERS THEN NULL;

END;

-----------------------block to add missing value sets .optional as client wants the customer as Segment4 dependent value for Accounts-------------------

--ADDING MISSING VALUESETS IN SEPARATE BLOCK

DECLARE

X VARCHAR2(240);

L_OUT VARCHAR2(240);

CURSOR C1 IS

SELECT * FROM XXFIA_CUSTOMERS_INT

WHERE ACCOUNT_NUMBER NOT IN ('A0092','RD052');

BEGIN

FOR I  IN C1 LOOP

BEGIN

FIA_CREATE_CCID_VS(I.CUSTOMER_NAME, I.ACCOUNT_NUMBER,X);

COMMIT;

EXCEPTION WHEN OTHERS THEN NULL;

ROLLBACK;

END;

END LOOP;

--L_OUT := FIA_CREATE_CCID2('AEROTRANS CARGO','A1120');

--DBMS_OUTPUT.PUT_LINE(L_OUT);

END;


CREATE OR REPLACE PROCEDURE FIA_CREATE_CCID_VS

(   P_CUSTOMER_NAME             VARCHAR2,

    P_ACCOUNT_NUMBER            VARCHAR2,

    P_OUT OUT VARCHAR2)

    AS

    BEGIN

     fnd_global.apps_initialize (-1, 52470, 222);

       FND_FLEX_VAL_API.create_dependent_vset_value

  ('FIA SUB ACCOUNT','111000',P_ACCOUNT_NUMBER, P_CUSTOMER_NAME,'Y',NULL,NULL,NULL,P_OUT);

--  DBMS_OUTPUT.PUT_LINE(P_OUT);

  EXCEPTION WHEN OTHERS THEN NULL;

  DBMS_OUTPUT.PUT_LINE(SQLERRM);

  ROLLBACK;

--  ROLLBACK;

  END;


------------------------------view---------------------

CREATE OR REPLACE VIEW FEA_CUSTOMER_DETAILS AS


SELECT DISTINCT hp.party_name "CUSTOMER_NAME",

hca.account_number,

hca.status,

hca.cust_account_id customer_id,

HOU.NAME "OPERATING_UNIT"

FROM apps.hz_parties hp,

apps.hz_party_sites hps,

apps.hz_locations hl,

apps.hz_cust_accounts hca,

apps.hz_cust_acct_sites_all hcas,

apps.hz_cust_site_uses_all hcsu,

--apps.hz_customer_profiles hcp,

--apps.hz_cust_profile_classes hcpc,

--apps.ar_payment_schedules_all ps,

apps.hr_operating_units hou

WHERE hp.party_id           = hca.party_id(+)

--AND hp.party_id             = hcp.party_id

AND hp.party_id             = hps.party_id

AND hps.party_site_id       = hcas.party_site_id

AND hps.location_id         = hl.location_id

AND hca.cust_account_id     = hcas.cust_account_id

AND hcas.cust_acct_site_id  = hcsu.cust_acct_site_id

--AND hca.cust_account_id     = hcp.cust_account_id

--AND hca.cust_account_id     = ps.customer_id

--AND hcp.profile_class_id    = hcpc.profile_class_id

--AND ps.customer_site_use_id =hcsu.site_use_id

and hcsu.org_id =hou.organization_id

and hcsu.ORG_ID = 215900

ORDER BY 4

;


Errors And Solutioins:

Error: customer account failed:Column account_number must have a value.

Solutioin: As per the setup you need to pass p_cust_account_rec.account_number parameter also. 

No comments:

Post a Comment