Apr 13, 2016

현재 접속회사에서 다른회사 정보 Select 하기

static void ChangeCompany_Test_Andy(Args _args)
{
    CustTable       _CustTable;
    str             _CustAccount_Name;
   
    changeCompany('Compnay code')
    {
        print curext();   
        _CustTable = null;
         while
        select firstOnly10 _CustTable
        {
            _CustAccount_Name = strFmt('Cust account : %1, Name : %2, DataAreaId : %3',_CustTable.AccountNum,_CustTable.name(),_CustTable.dataAreaId);
            print _CustAccount_Name;
        }
    }
   
    changeCompany('Compnay code')
    {
        print curext();
        _CustTable = null;
        while
        select firstOnly10 _CustTable
        {
            _CustAccount_Name = strFmt('Cust account : %1, Name : %2, DataAreaId : %3',_CustTable.AccountNum,_CustTable.name(),_CustTable.dataAreaId);
            print _CustAccount_Name;
        }
    }
    pause;
}

No comments:

Post a Comment