AX2012 常用表关系(客户地址,联系信息)

来源:互联网 发布:ntfs for mac 破解 编辑:程序博客网 时间:2024/03/29 22:42
复制代码
//客户地址信息static void CustAddressInformation(Args _args){    CustTable               custTable;    DirPartyTable           dirPartyTable;    DirPartyLocation        dirPartyLocation;    LogisticsLocation       logisticsLocation;    LogisticsPostalAddress  logisticsPostalAddress;    TransDate               dateFrom,dateTo;    ;    dateFrom = dateNull();    dateTo   = dateMax();        while select validTimeState(dateFrom,dateTo) custTable        where custTable.AccountNum == 'US-027'        join dirPartyTable             where dirPartyTable.RecId == custTable.Party            join dirPartyLocation                where dirPartyLocation.Party == dirPartyTable.RecId                join logisticsLocation                    where logisticsLocation.RecId == dirPartyLocation.Location                    join logisticsPostalAddress                        where logisticsPostalAddress.Location == logisticsLocation.RecId    {        print strFmt("ACC:%1,ADD:%2,DES:%3",custTable.AccountNum,logisticsPostalAddress.Address,logisticsLocation.Description);    }    pause;    /*    SELECT C.ACCOUNTNUM,LP.ADDRESS AS 'Address',L.DESCRIPTION,lp.RECID,c.RECID FROM CUSTTABLE C            JOIN DIRPARTYTABLE D ON D.RECID = C.PARTY        JOIN DIRPARTYLOCATION DL ON DL.PARTY = D.RECID        JOIN LOGISTICSLOCATION L ON L.RECID = DL.LOCATION        JOIN LOGISTICSPOSTALADDRESS LP ON LP.LOCATION = L.RECID        WHERE C.DATAAREAID ='LYDI' AND C.ACCOUNTNUM ='US-027' AND LP.VALIDFROM > '2013/4/1'    */}客户联系信息
复制代码
//客户联系信息static void CustContuctInformation(Args _args){    CustTable                   custTable;    DirPartyTable               dirPartyTable;    ContactPerson               contactPerson;    DirPerson                   dirPerson;    DirPersonName               dirPersonName;    LogisticsElectronicAddress  logisticsElectronicAddress;      DirPartyLocation            dirPartyLocation;    LogisticsLocation           logisticsLocation;    LogisticsPostalAddress      logisticsPostalAddress;    TransDate                   dateFrom,dateTo;    ;    //Email    select * from custTable        join dirPartyTable            where dirPartyTable.RecId == custTable.Party            join logisticsElectronicAddress                where logisticsElectronicAddress.RecId == dirPartyTable.PrimaryContactEmail;    //Email    select * from custTable        join dirPartyTable            where dirPartyTable.RecId == custTable.Party            join logisticsElectronicAddress                where logisticsElectronicAddress.RecId == dirPartyTable.PrimaryContactEmail;    //Phone    select * from custTable        join dirPartyTable            where dirPartyTable.RecId == custTable.Party            join logisticsElectronicAddress                where logisticsElectronicAddress.RecId == dirPartyTable.PrimaryContactPhone;    //URL    select * from custTable        join dirPartyTable            where dirPartyTable.RecId == custTable.Party            join logisticsElectronicAddress                where logisticsElectronicAddress.RecId == dirPartyTable.PrimaryContactURL;    //Telex    select * from custTable        join dirPartyTable            where dirPartyTable.RecId == custTable.Party            join logisticsElectronicAddress                where logisticsElectronicAddress.RecId == dirPartyTable.PrimaryContactTelex;    //Fax    select * from custTable        join dirPartyTable            where dirPartyTable.RecId == custTable.Party            join logisticsElectronicAddress                where logisticsElectronicAddress.RecId == dirPartyTable.PrimaryContactFax;        //ContactPerson information    select validTimeState(dateFrom,dateTo) custTable        where custTable.AccountNum == 'US-027'        join contactPerson            where contactPerson.CustAccount == custTable.AccountNum            join dirPartyTable                 where dirPartyTable.RecId == contactPerson.Party                join dirPerson                    where dirPerson.RecId == dirPartyTable.RecId                    join dirPersonName                        where dirPersonName.Person == dirPerson.RecId                join dirPartyLocation                    where dirPartyLocation.Party == dirPartyTable.RecId                    join logisticsLocation                        where logisticsLocation.RecId == dirPartyLocation.Location                        join logisticsPostalAddress                            where logisticsPostalAddress.Location == logisticsLocation.RecId;    /*    SELECT C.ACCOUNTNUM,C.DATAAREAID,L.LOCATOR,L.DESCRIPTION FROM CUSTTABLE C    JOIN DIRPARTYTABLE D ON D.RECID = C.PARTY    JOIN LOGISTICSELECTRONICADDRESS L ON (L.RECID = D.PRIMARYCONTACTPHONE OR L.RECID = D.PRIMARYCONTACTFAX)    WHERE C.DATAAREAID ='LYDI' AND C.ACCOUNTNUM ='US-027'    */}
复制代码
复制代码
原创粉丝点击