Добавить способ отображения в форме списка

Question

Я хочу добавить метод отображения в источник данных формы listpage. Я не могу добавить прямо, потому что источники данных исходят из запроса AOT. Как мне это сделать? Спасибо за помощь. Метод отображения:

public display String255 UserNames() 
{ 
    DirPartyName  partyName; 
    DirPersonUser  personUser; 
    DirPerson   person; 
    UserInfo   userInfo; 
    String255   userList = ""; 



    partyName = DirPersonUser::userId2Name(this.UserId); 

    if(partyName) 
    { 
     while select Name from person 
      exists join personUser 
       where personUser.PersonParty == person.RecId 
        && personUser.User == this.UserId 
     { 
      userList += person.Name + ","; 
     } 
    } 

    if (!partyName) 
    { 
     while select Name from userInfo 
      where userInfo.Id == this.UserId 
     { 
      userList += userInfo.name + ","; 
     } 
    } 
     partyName = (select firstonly Name from userInfo where userInfo.Id == this.UserId).Name; 
    if (!partyName) 
     userList += this.UserId + ","; 

    strDel(userList,strLen(userList),1); 
    return userList; 
} 

Answer 1

дисплея у меня было то же требование, и мы сделали это с реальным физическим полем в таблице TrvExpTable после поля в таблице мы заполнить его на открытие страницы списка.

В Init(), до супер(), формы вы можете вызвать этот метод:

public void updateTrvExpTableApprovers() 
{ 
    TrvExpTable    trvExpTable; 
    TrvExpTrans    trvExpTrans; 
    WorkflowWorkItemTable workflowItemTable; 
    String255    approversNames; 
    HcmWorker    HcmWorker; 
    DirPersonUser   dirPersonUser; 
    Name     name; 

    ttsBegin; 
    while select forUpdate trvExpTable where trvExpTable.ApprovalStatus == TrvAppStatus::Pending 
    { 
     approversNames = ""; 
     while select userId from workflowItemTable 
      where workflowItemTable.RefRecId == trvExpTable.RecId && 
        workflowItemTable.RefTableId == trvExpTable.TableId && 
        workflowItemTable.Status == WorkflowWorkItemStatus::Pending 
     { 
      select firstonly hcmWorker 
       join firstonly PersonParty, ValidFrom, ValidTo from dirPersonUser 
        where dirPersonUser.User == workflowItemTable.userId && 
          hcmWorker.Person == dirPersonUser.PersonParty; 
      name = HcmWorker.name(); 

      if (!name) 
      { 
       name = workflowItemTable.userId; 
      } 

      if(approversNames) 
      { 
       if (!strScan(approversNames, name, 0, 255)) 
       { 
        approversNames += ', ' + name; 
       } 
      } 
      else 
      { 
       approversNames = name; 
      } 
     } 

     trvExpTable.ApproversNames = approversNames; 
     trvExpTable.update(); 
    } 

    update_recordSet trvExpTable 
     setting ApproversNames = "" 
     where trvExpTable.ApprovalStatus != TrvAppStatus::Pending && trvExpTable.ApproversNames != ""; 

    ttsCommit; 
} 

Это не самый эффективный способ, но в нашем случае это работает идеально подходит для более через год.

Также таким образом пользователь мог бы использовать CTRL + G в этом поле в сетке, что не является вариантом с использованием методов отображения.

С наилучшими пожеланиями, Kristian

Answer 2

Почему бы вам не попробовать писать метод отображения в методе таблицы как использование же в списке страницы? Это хороший вариант. Если вы все еще хотите написать метод отображения на уровне источника данных формы, измените способ отображения, как показано ниже.

публичный показ String255 USERNAMES (DataSourcetablename _tableName) {....

Использование _tableName, где когда-либо вы используете "это".

Вы можете обратиться в формуляр BuyEditLines в стандартном томе 2012 года и посмотреть дисплей ImageRes backOrder (PurchaseParmLine _purchParmLine).

Для получения более подробной информации о методе click here