Find Duns number of customer in AX 2012 using X++.

DirOrganizationBase     dirOrganizationBase;
CustTable                        custTable;

custTable = CustTable::find("0001");

select firstonly DunsNumberRecId
                 from dirOrganizationBase
                    where dirOrganizationBase.RecId == custTable.Party;
     
 DirDunsNumber::find(dirOrganizationBase.DunsNumberRecId).DunsNumber;