Customer Address ( business and delivery )

static void CustomerBusinessAddress_DeliveryAddress(Args _args)
{

    Addressing    invoiceAddress,deliveryAddress;

    DirPartyRecId party;

    real          creditLimit;

    creditLimit           = CustTable::find('2332').CreditMax;

    party                 = CustTable::find('2332').Party;

    invoiceAddress        = DirParty::getPostalAddressByType(party, LogisticsLocationRoleType::Business);


    deliveryAddress       = DirParty::getPostalAddressByType(party, LogisticsLocationRoleType::Invoice);


    info(strFmt("Credit Limit     ----  %1", creditLimit));

    info(strFmt("Business address ----  %1", invoiceAddress));

    info(strFmt("Delivery address ----  %1", deliveryAddress));
}