Get Customer Address By Type In D365/AX X++

Below is the piece of code to get customer address by type in AX/D365 X++

public static LogisticsPostalAddress getPostalAddressByType(DirPartyRecId _party, LogisticsLocationRoleType _type)

{

    DirPartyLocation        partyLocation;

    DirPartyLocationRole    partyLocationRole;

    LogisticsLocation       location;

    LogisticsLocationRole   locationRole;

    LogisticsPostalAddress  postalAddress;

    select firstonly postalAddress

        exists join location

            where location.RecId == postalAddress.Location

        exists join locationRole

            where locationRole.Type  == _type

        exists join partyLocation

            where 

                partyLocation.Location == location.RecId &&

                partyLocation.Party == _party

        exists join partyLocationRole

            where partyLocationRole.PartyLocation == partyLocation.RecId &&

                partyLocationRole.LocationRole == locationRole.RecId;

    return postalAddress;

}