понедельник, 27 мая 2013 г.

Выполнение X++ кода в CLR - код может выполняться быстрее. Раза в три(!) быстрее...

Очень полезная статья, следуя которой можно запилить выполнение клиентского кода в CIL: http://daxmusings.codecrib.com/2011/08/x-in-net-clr-life-in-fast-lane.html

и при необходимости приаттачиться к процессу отладчиком VisualStudio

Вот здесь http://blogs.msdn.com/b/mfp/archive/2012/06/25/the-compare-tool-and-running-x-code-as-il.aspx есть небольшое сравнительное исследование быстродействия.

понедельник, 29 апреля 2013 г.

Создание master/detail формы

Часто возникающая задача - в верхней (левой) части формы список header'ов, а в нижней (или правой) части - список details'ов. Здесь популярно расписано решение: http://daxdave.blogspot.ru/2006/10/creating-headerdetail-based-linkage-on.html
PS да, и тут ни строчки кода ;)
 PPS  и вдогонку оставлю тут ссылочку про как сделать вертикальный сплиттер на форме:  http://dynamicsaxposed.wordpress.com/2011/08/17/how-to-make-vertical-splitter-on-forms-in-ax-2012/

среда, 24 апреля 2013 г.

Зависимые Lookup на форме

Возникла необходимость сделать серию из трёх зависимых полей, выбор значения в одном из них фильтрует значения во втором, выбор второго фильтрует третий. Азбучный пример из книги (перекрытие метода lookup) отлично подходит для поля StringEdit, но отказывается работать на ReferenceGroup. Для последнего необходимо перекрывать lookupReference.
public void lookup() //для StringEdit

воскресенье, 7 апреля 2013 г.

“Продвинутый” фильтр на форме

Microsoft Dynamics AX 2012 for Developers [AX 2012]
Форма позволяет фильтровать Grid различными способами, но нам захотелось сделать свой – по нажатию кнопки открывать дочернюю форму, в которой задать определенные поля, которые сформируют нужный Query.
Первая попытка – сделать extends RunBase класс, в котором создавать DialogField. Всё было б ничего, но не получилось следующее – хотелось вывести в выпадающем меню фильтра Name, а передать в query родительской формы RecId.
Вторая попытка – вызывать из формы всё тот же класс, сделать от этого класса форму, в которой можно разместить ReferenceField, который реализует нужный нам функционал…
Оба эти примера не доделаны, сюда скинул промежуточный итог.
Рабочий и самый простой вариант – одна простая форма. Тут её код:

public class FormRun extends ObjectRun
{
    Object caller;
    boolean activate;
}
void closeOk()
{
    super();
    caller = element.args().caller();
    caller.itemRangeValue(itemIdStringEdit.text());
    caller.subitemNumberValue(subitemNumberIntEdit.value());
    caller.subitemGroupValue(subitemGroupStringEdit.text());
    caller.subitemgoValue(subitemgoReferenceGroup.value());
    if (subitemgoYesNo.checked()) {
        caller.subitemgoYesNo(true);
    }
    caller.1stplaceValue(1stplaceReferenceGroup.value());
    caller.currentplaceValue(CurrentplaceReferenceGroup.value());
    caller.activateFilter(true);
    caller.update();
   ));
}

и код формы – caller’a:

SSRS Отчеты в Dynamics AX 2012

Developing Reports for Microsoft Dynamics AX in Visual Studio [AX 2012]

Очень полезный фрагмент книжки о разработке отчетов – позволяет быстро начать, даже если раньше вам не приходилось работать с Reporting Services + Dynamics.
Находится тут: http://www.slideshare.net/harshnmh/developing-ssrsreportsfordynamicsax
+для себя копия
Задача стояла следующая – необходимо разработать простой отчет, в котором на входе должен быть параметр, взятый из грида. На форме размещается кнопка, по нажатию на кнопку Action – class, код класса ниже:

class RdpReport extends SrsReportRunController
{
    #define.ReportName('QueryBasedReport.Report')
}
protected void prePromptModifyContract()
{
    this.setRanges(this.parmReportContract().parmQueryContracts().lookup(this.getFirstQueryContractKey()));
}
public static client void main(Args _args)
{    rdpReport controller = new rdpReport();
    controller.parmReportName(#ReportName);
    controller.parmArgs(_args);
    controller.startOperation();
}
private void setRanges(Query _query)
{
    real volumeRange;
    Report ReportLocal;
  
    if (this.parmArgs())
    {
                ReportLocal = this.parmArgs().record();
                volumeRange = ReportLocal.Volume;
    }
   
    if (volumeRange)
    {
        SysQuery::findOrCreateRange(
            _query.dataSourceTable(tableNum(Report)),
            fieldNum(Report, Volume)).value(int2str(volumeRange));
    }   
}

среда, 30 января 2013 г.

Получение данных из внешних БД


Рассмотрим пару вариантов работы с внешними БД.

Вариант 1: отобразить как список таблицу из внешней БД MS SQL, позволив пользователям работать с таблицей как со списком – просматривать, добавлять и удалять значения – строки.

Для этого нужно создать внешний тип контента в SP Designer:
ex1
ex2ex3

ex4
Выбрав “Подключиться с удостоверением пользователя”, мы сможем подключиться только к БД, расположенной на том же сервере, где находится БД SharePoint. При попытке подключения к какой-либо другой, получим ошибку, описанную вот тут:   http://www.spdoctor.net/Pages/message.aspx?name=login-failed-for-user-bdc
Как правило, подключение требуется к внешней БД, поэтому надо использовать 2й и 3ий варианты подключения. Эти варианты требуют идентификатора Secure Store – фактически это логин и пароль, в зашифрованном виде хранящиеся в специальной службе SharePoint. Создать Secure Store ID можно через “Центр Администрирования SharePoint” – “Управление приложениями-службами“. Там нужно найти “Приложение службы Secure Store” – называться оно может как угодно.
ВАЖНО: если таких служб 2 или более, обязательно выясните, какая из них используется веб-приложением “по умолчанию”. Сделать это можно здесь: “Центр администрирования - Сопоставления приложений-служб “. Именно её и нужно использовать для создания Secure Store ID.

ex5
По клику на “Создать” вызывается диалог, в котором создаются поля логина и пароля, затем можно задать эти логин и пароль, кликнув “Настроить” в блоке “Учётные данные”
Всё, SSID готов. Теперь можно указать его в поле “Идентификатор приложения SecureStore” и нам станут доступны таблицы внешнего источника данных. Для любой из них можно создать 5 типов операций:
ex6
Для того, чтобы отобразить содержимое таблицы как список – необходимо создать как минимум первые две операции. В создании нет ничего сложного – просто жмём Далее и Финиш.
Ещё один важный момент, без которого список не будет доступен – необходимо разрешить пользователям доступ к этому типу контента – это тоже делается в
“Центр Администрирования SharePoint” – “Управление приложениями-службами”, только теперь уже настраивается служба “Приложение-служба подключения к бизнес-данным”:
ex7
Как видим, этот вариант практически полностью (за исключением создания SecureStore) реализуем с помощью одного только SP Designer, однако имеет массу ограничений – нельзя таким образом работать с другими СУБД (например, Oracle), нельзя работать с объединением 2х и более таблиц – для этого нужно описывать модель работы с данными в коде, используя Visual Studio. В курсе 10175A SharePoint Application Development вторая лабораторная шестого урока посвящена именно такому созданию модели.

Вариант 2: доступ к внешней БД через powershell, работа с данными из БД как с объектами

Вот пример синхронизации списка SharePoint с данными из внешней БД Oracle.
Используется функция Get-DatabaseData, взято вот отсюда: http://technet.microsoft.com/ru-ru/magazine/hh855069.aspx
# Позволяет выполнять запросы к БД Oracle
function Get-DatabaseData {
[CmdletBinding()]
param (
  [string]$connectionString,
  [string]$query,
  [switch]$isSQLServer
)
if ($isSQLServer) {
  Write-Verbose 'in SQL Server mode'
  $connection = New-Object System.Data.SqlClient.SqlConnection
} else {
  Write-Verbose 'in OleDB mode'
  $connection = New-Object System.Data.OleDb.OleDbConnection
}
$connection.ConnectionString = $connectionString
#'Provider=OraOLEDB.Oracle;Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=host.host.ru)(PORT=1521)))(CONNECT_DATA=(SID=SOMESID)));User Id=USERID;Password=PASSWORD;'
#$connectionString = 'Provider=OraOLEDB.Oracle;Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=host.host.ru)(PORT=1521)))(CONNECT_DATA=(SID=SOMESID)));User Id=USERID;Password=PASSWORD;''
$command = $connection.CreateCommand()
$command.CommandText = $query
if ($isSQLServer) {
  $adapter = New-Object System.Data.SqlClient.SqlDataAdapter $command
} else {
  $adapter = New-Object System.Data.OleDb.OleDbDataAdapter $command
}
$dataset = New-Object System.Data.DataSet
$adapter.Fill($dataset)
return $dataset.Tables[0]
}
Источником данных может быть любая БД, разница только в строке подключения. Формат строки подключения для любой СУБД можно взять с http://connectionstrings.com/
Можно выполнять любые операции – INSERT, DELETE, CREATE и т.д. при наличии доступа к этой БД.
Ну и сам пример. Сравнивает данные о командах из таблицы БД с данными в списке “Alarm groups” по ID. Eсли команда переименована или создана, изменяет или создаёт новый элемент в списке. Если команда удалена – проверяет наличие связанных элементов из списка “Точки мониторинга” и при отсутствии связей удаляет элемент, иначе выдаёт оповещение:
$datarow = Get-DatabaseData -verbose -query "SELECT * FROM DUTY.group" -connectionString "Provider=OraOLEDB.Oracle;Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=host.host.ru)(PORT=1521)))(CONNECT_DATA=(SID=SOMESID)));User Id=USERID;Password=PASSWORD;"
$site = new-object Microsoft.SharePoint.SPSite("http://mysite")
$web = $site.OpenWeb("myweb")
$list = $web.Lists["Alarm groups"]
[Microsoft.SharePoint.SPListItemCollection]$list_items = [Microsoft.SharePoint.SPListItemCollection]$list.Items;
$message = "Запускаем процедуру синхронизации. Проверяем наличие новых или переименованных команд..."
log "Аварийные команды" $message
for( $i=1; $i -le $datarow[0];$i++) {
    $bool = 0
foreach( $list_item in $list_items ) {
    if ($list_item["ID0"] -eq $datarow[$i].Item(0)) {
  if ($datarow[$i].Item(1) -eq $list_item["Title"]) {
            $bool=1
   continue
   }
  else {
   $list_item["Title"] = $datarow[$i].Item(1)
            $list_item["_x0413__x041a__x0414_"] = "http://www.site.ru?groupId="+$datarow[$i].Item(0)+", "+$datarow[$i].Item(1)
   update $list_item
   $message = "Команда"+" "+$datarow[$i].Item(0)+" "+"переименована из"+" "+$list_item["Title"]+" в "+$datarow[$i].Item(1)
   log "Аварийные команды" $message
            $bool=1
            continue
   }
        }
}
    if (!($bool)) {
       $message = "Команда"+" "+$datarow[$i].Item(0)+" "+$datarow[$i].Item(1)+" "+"добавлена"
    log "Аварийные команды" $message
       $list_item = $list.Items.Add()
       $list_item["ID0"] = $datarow[$i].Item(0)
       $list_item["Title"] = $datarow[$i].Item(1)
       $list_item["_x0413__x041a__x0414_"] = "http://www.site.ru?groupId="+$datarow[$i].Item(0)+", "+$datarow[$i].Item(1)
       update $list_item
    }
}
$message = "Проверяем наличие удалённых команд"
log "Аварийные команды" $message
for($c = $list_items.Count - 1; $c -ge 0; $c--) {
    $bool = 0
    for( $i=1; $i -le $datarow[0];$i++) {
        if ( $list_items[$c]["ID0"] -eq $datarow[$i].Item(0)) {
            $bool=1
            continue
            }
        }
    if (!($bool)) {
    $title = $list_items[$c]["Title"]
    $coll_item_name = ""
$order_listx = $web.Lists["Точки мониторинга"]
    $queryx = new-object Microsoft.SharePoint.SPQuery
    $queryx.query = "<Where><Eq><FieldRef Name='_x0410__x0432__x0430__x0440__x04' /><Value Type='Lookup'>$title</Value></Eq></Where>"
$collectionx = $order_listx.GetItems( $queryx )
    if( $collectionx.count) {
        foreach( $coll_item in $collectionx){
            $title = $coll_item["Title"]
            $id = $coll_item["ID"]
            $coll_item_name = $coll_item_name+"<br>"+"<a href='http://mysite/myweb/Lists/PointsMonitoring/DispForm.aspx?ID=$id'>$title</a>"
            }
        $message = "ВНИМАНИЕ! Команда"+" "+$list_items[$c]["Title"]+" "+"была удалена из http://www.site.ru/DutyList, но не может быть удалена из списка Аварийных команд, т.к. остались ТМ со ссылкой на нее: "+$coll_item_name
        log "Аварийные команды" $message
        }
    else {
        $message = "Команда"+" "+$list_items[$c]["Title"]+" "+"была удалена из списка Аварийных команд"
        log "Аварийные команды" $message
        $list_items.Delete($c)
        }
    }
}
$list.Update()
$message = "Процедура синхронизации завершена"
log "Аварийные команды" $message

понедельник, 28 января 2013 г.

Создание отношений между списками


Довольно популярная задача, возникающая в рамках практически любого решения на SharePoint  – создание отношений между родительским и дочерним списками. К примеру “Проект – Задачи”, “Район – Улицы”, “Начальник – Подчиненные” и т.д.
Самый очевидный способ связать элементы разных списков – использовать поле “Подстановка” (lookup). На примере отношения “Проект – Задачи”:
Вариант 1: находясь на странице создания задачи (tasks/newform.aspx), выбираем обычным способом родительский проект из списка, это не требует никаких вмешательств в штатный функционал. Способ очень неудобный тем, что при большом количестве проектов приходится искать их в выпадающем списке.
Вариант 2: на странице просмотра проекта (projects/dispform.aspx) размещаем ссылку/кнопку, по клику на которую открывается форма создания задачи (tasks/newform.aspx) с уже заполненным полем “Проект”
Код ссылки/кнопки, который нужно вставить на странице projects/dispform.aspx:

<a href="/../Lists/Tasks/NewForm.aspx?ActID={$Param1}&amp;Source=https%3A%2F%2F..Lists%2Fprojects%2FDispForm%2Easpx&#063;ID={$Param1}">Создать задачу</a>
При этом должен быть заведен параметр в веб-части, в которой мы размещаем ссылку. Заведён так, как показано на рисунке.

Из переменной в адресной строке браузера этот параметр попадёт в tasks/newform.aspx , а атрибут “Source=…” нужен для корректного возврата после сохранения элемента в нужный projects/dispform.aspx
Для того, чтобы значение отобразилось в поле “подстановка” формы tasks/newform.aspx, необходимо вставить на эту страницу код на языке javascript – см. пример в конце статьи.

Отображение связанных записей в DispForm родительского списка

Для того, чтобы связанные записи были видны в форме, делаем следующее.
1. Создаём веб-часть представления дочернего списка в DispForm родительского списка.

 
Поигравшись с вкладкой “конструктор” на Ribbon-панели, можно придать веб-части удобоваримый вид. Например, если известно, что в рамках одного проекта обычно генерируется-назначается 5-6 задач, то очень хорошо подходит вот такой вид:

2. Необходимо добавить фильтр на представление, без него мы будем видеть все элементы списка Задачи. а нам нужны только связанные с конкретным проектом. ID проекта содержится в адресной строке браузера. Как создать параметр, получающий значение из адресной строки – было показано на первом рисунке.
Однако, если мы зададим условие фильтрации “Проект = Param1”, условие не сработает. Дело в том, что фактически мы сравниваем “1#;<название проекта>” и “1” и такое условие не может быть true. Для того, чтобы у нас было корректное поле для сравнения с параметром, нужно в свойствах списка, в параметрах поля-подстановки активировать дополнительное поле Проект:ИД

и уже это поле Проект:ИД использовать в условии фильтрации

Как скрыть поля связи (“lookup”, оно же “подстановка”) из форм

Если стоит задача скрыть поле из всех форм: создания, просмотра и редактирования – самый простой способ сделать это через SPD:

или непосредственно в браузере, последовательно – активировать управление типами содержимого в параметрах списка, зайти в тип содержимого, перевести столбец в “скрытый”. убрать управление типами содержимого.
Если нужно скрыть поле только из определённых форм, можно использовать утилиту SharePoint Manager
Она позволяет менять свойства SPField - ShowInEditForm, ShowInDisplayForm, ShowInNewForm. Лежит тут http://spm.codeplex.com/
Запускается на сервере с Sharepoint.

Можно отредактировать форму по умолчанию в дизайнере 2010 :
http://office.microsoft.com/ru-ru/sharepoint-designer-help/HA010378258.aspx
И, наконец, можно скрыть ненужные поля (или даже отобразить дополнительные) с помощью jquery, уже на стороне клиента, в браузере.


Пример установки поля “подстановка” в значение, полученное из адресной строки браузера и последующего скрытия строки с полем “подстановка”:

<script language="javascript" src="../frms/jquery-1.8.2.js" type="text/javascript"></script>
<script language="javascript" src="../frms/jquery.SPServices-0.7.2.js" type="text/javascript"></script>
<script type="text/javascript">
    // This javascript sets the default value of a lookup field identified
    // by <<FIELD DISPLAY NAME>> to the value stored in the querysting variable
    // identified by <<QUERYSTRING VARIABLE NAME>>
    // Customize this javascript by replacing <<FIELD DISPLAY NAME>> and
    // <<QUERYSTRING VARIABLE NAME>> with appropriate values.
    // Then just paste it into NewForm.aspx inside PlaceHolderMain
  
    _spBodyOnLoadFunctionNames.push("fillDefaultValues");
    function fillDefaultValues() {
      var qs = location.search.substring(1, location.search.length);
      var args = qs.split("&");
      var vals = new Object();
      for (var i=0; i < args.length; i++) {
        var nameVal = args[i].split("=");
        var temp = unescape(nameVal[1]).split('+');
        nameVal[1] = temp.join(' ');
        vals[nameVal[0]] = nameVal[1];
      }
      setLookupFromFieldName("Проект", vals["ID"]);
      $('#ctl00_m_g_e74ceaaa_2dcf_4cef_af99_40f05b6563c0_ff20_1_ctl00_ctl01').closest('tr').hide();   //   JQuery
    }
   
    function setLookupFromFieldName(fieldName, value) {
      if (value == undefined) return;
      var theSelect = getTagFromIdentifierAndTitle("select","Lookup",fieldName);
    // if theSelect is null, it means that the target list has more than
    // 20 items, and the Lookup is being rendered with an input element
      if (theSelect == null) {
        var theInput = getTagFromIdentifierAndTitle("input","",fieldName);
        ShowDropdown(theInput.id); //this function is provided by SharePoint
        var opt=document.getElementById(theInput.opt);
        setSelectedOption(opt, value);
        OptLoseFocus(opt); //this function is provided by SharePoint
      } else {
        setSelectedOption(theSelect, value);
      }
    }

    function setSelectedOption(select, value) {
      var opts = select.options;
      var l = opts.length;
      if (select == null) return;
      for (var i=0; i < l; i++) {
        if (opts[i].value == value) {
          select.selectedIndex = i;
          return true;
         }
       }
       return false;
     }
     
    function getTagFromIdentifierAndTitle(tagName, identifier, title) {
        var len = identifier.length;
        var tags = document.getElementsByTagName(tagName);
        for (var i=0; i < tags.length; i++) {
          var tempString = tags[i].id;
          if (tags[i].title == title && (identifier == "" || tempString.indexOf(identifier) == tempString.length - len)) {
            return tags[i];
          }
        }
        return null;
    }
    </script>