AXForum  
Вернуться   AXForum > Microsoft Dynamics AX > DAX Blogs
All
Забыли пароль?
Зарегистрироваться Правила Справка Пользователи Сообщения за день Поиск Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
Старый 29.06.2011, 13:11   #1  
Blog bot is offline
Blog bot
Участник
 
25,459 / 846 (79) +++++++
Регистрация: 28.10.2006
sumitax: AX Queries – Passing query range as parameter
Источник: http://sumitax.wordpress.com/2011/06...-as-parameter/
==============

Following is code for paramterized query. ie. query range passed as set of container values:

X++:
static FreeText
FindEngineerByTradeArea(NoYes    _skillRestriction = NoYes::No,
MxmServTradeId   _tradeCriteria = ,
NoYes
_areaRestriction = NoYes::No,

MxmServAreaId     _areaCriteria = ,
MxmServProficiency     _tradeProficiency =
MxmServProficiency::Primary,
MxmServPreference      _areaPreference   =
MxmServPreference::Primary
)

{
MxmServEngineerTrade
localtrade;
MxmServEngineerArea
localArea;
MxmServEngineer
engineer;

 
Query
qrTrade,qrArea, qrEngineer;
QueryBuildDatasource
qbdsTrade,qbdsArea,qbdsEngineer;
Queryrun
qrnTrade,qrnArea,qrnEngineer;
QueryBuildRange
qbrTrade,qbrEngineer,qbrArea,qbrTradeProficiency,qbrAreaPreference;
container
conEngid;
int
i=1;
FreeText
EngList;

;

//Trades  — Get requested trade
from Trade

 

if (_skillRestriction == NoYes::Yes
&& _areaRestriction == NoYes::Yes && _tradeProficiency
&& _areaPreference )   // If both restriction  i.e.Trade
and Area

{

qrTrade = new
Query();

qbdsTrade =
qrTrade.addDataSource(tableNum(MxmServEngineerTrade));
qbrTrade   =
qbdsTrade.addRange(fieldNum(MxmServEngineerTrade,TradeId));
qbrTrade.value(queryValue(_tradeCriteria));

//Adding
Preference for Proficiency
qbrTradeProficiency =
qbdsTrade.addRange(fieldNum(MxmServEngineerTrade,Proficiency));
qbrTradeProficiency.value(queryValue(_tradeProficiency));

 

qrnTrade = new
QueryRun(qrTrade);

 
while(qrnTrade.next())

{
localtrade = qrnTrade.get(tablenum(MxmServEngineerTrade));

 
if(localTrade.EngId)
{
if(!confind(conEngId,localTrade.EngId))
{
conEngid = conins(conEngid,conlen(conEngId)+1,localTrade.EngId);
}
}

}

 

for (i=1;
i<=conlen(conEngId); i++)

{
EngList +=  conpeek(conEngid,i)+ ,;

}

 

EngList =
substr(EngList,1,strlen(EngList)-1);

conEngId =
conNull();

 

qrArea = new
Query();

qbdsArea =
qrArea.addDataSource(tableNum(MxmServEngineerArea));

 

if(EngList)

{
qbrEngineer = qbdsArea.addRange(fieldNum(MxmServEngineerArea,EngId));
qbrEngineer.value(EngList);

 
if(_areaCriteria)
{
qbrArea = qbdsArea.addRange(fieldNum(MxmServEngineerArea,AreaId));
qbrArea.value(_areaCriteria);
}
//Adding preference for Area
if(_areaPreference)
{
qbrAreaPreference = qbdsArea.addRange(fieldNum(MxmServEngineerArea,Preference));
qbrAreaPreference.value(queryValue(_areaPreference));
}

 
qrnArea = new QueryRun(qrArea);

 
while(qrnArea.next())
{
localArea = qrnArea.get(tableNum(MxmServEngineerArea));
conEngId    =
conins(conEngId,conlen(conEngId)+1,localArea.EngId);
}

}

else
conEngId = conNull();

}

else if(_skillRestriction == NoYes::Yes
&& _areaRestriction == NoYes::No &&
_areaPreference)   // If Only Trade restriction

{

qrTrade = new
Query();

qbdsTrade =
qrTrade.addDataSource(tableNum(MxmServEngineerTrade));

 

qbrTrade=
qbdsTrade.addRange(fieldnum(MxmServEngineerTrade,TradeId));
qbrTrade.value(queryValue(_tradeCriteria));

 

//Adding
Preference for Proficiency
qbrTradeProficiency =
qbdsTrade.addRange(fieldNum(MxmServEngineerTrade,Proficiency));
qbrTradeProficiency.value(queryValue(_tradeProficiency));

 

qrnTrade = new
QueryRun(qrTrade);

 
while(qrnTrade.next())

{
localTrade = qrnTrade.get(tablenum(MxmServEngineerTrade));
conEngId = conins(conEngId,conlen(conEngId)+1,localTrade.EngId);

}

}

else if(_skillRestriction == NoYes::No
&& _areaRestriction == NoYes::Yes)   // If Only area
restrction

{

qrArea = new
Query();

qbdsArea =
qrArea.addDataSource(tableNum(MxmServEngineerArea));

 

qbrArea =
qbdsArea.addRange(fieldNUm(MxmServEngineerArea,AreaId));
qbrArea.value(_areaCriteria);

//Adding preference for
Area
if(_areaPreference)

{
qbrAreaPreference = qbdsArea.addRange(fieldNum(MxmServEngineerArea,Preference));
qbrAreaPreference.value(queryValue(_areaPreference));

}

qrnArea = new
QueryRun(qrArea);

 
while(qrnArea.next())

{
localArea = qrnArea.get(tablenum(MxmServEngineerArea));
conEngId = conins(conEngId,conlen(conEngId)+1,localArea.EngId);

}

}

else if(_skillRestriction == NoYes::No
&& _areaRestriction ==
NoYes::No)         // If NO restriction

{

qrEngineer = new
Query();

 

qbdsEngineer =
qrEngineer.addDataSource(tableNum(MxmServEngineer));

 

qrnEngineer = new
QueryRun(qrEngineer);

 
while(qrnEngineer.next())

{
engineer = qrnEngineer.get(tablenum(MxmServEngineer));
conEngId = conins(conEngId,conlen(conEngId)+1,engineer.EngineerId);

}

}

 

EngList = ;

if(conEngId)

{
for(i=1;i<=conlen(ConEngId);i++)

{
EngList +=  conpeek(conEngid,i)+ ,;

}

EngList = substr(EngList,1,strlen(EngList)-1);

}

 

return EngList;

 

}
__________________
Расскажите о новых и интересных блогах по Microsoft Dynamics, напишите личное сообщение администратору.

Последний раз редактировалось Poleax; 29.06.2011 в 13:26. Причина: оформление
 

Похожие темы
Тема Автор Раздел Ответов Посл. сообщение
msdax: How to Specify Range Values on a Query in a AX SSRS Report - AX Support - Site Home - MSDN Blogs Blog bot DAX Blogs 0 31.03.2011 11:11
axinthefield: Dynamics AX Event IDs Blog bot DAX Blogs 0 01.03.2011 22:11
daxdilip: Whats New in Dynamics AX 2012 (A brief extract from the recently held Tech Conf.) Blog bot DAX Blogs 7 31.01.2011 12:35
jinx: Dynamics AX &ndash; Query-Ranges und Filtereinstellungen des Benutzers Blog bot DAX auf Deutsch 0 04.02.2010 00:05
axaptafreak: Label for query range cannot be modified in AX 5.0 Blog bot DAX Blogs 0 30.08.2007 16:50
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход

Рейтинг@Mail.ru
Часовой пояс GMT +3, время: 17:14.
Powered by vBulletin® v3.8.5. Перевод: zCarot
Контактная информация, Реклама.