Pawan's Ax blog: How to identify unused labels in application

[Blog bot]

Источник: http://pawansaxblog.blogspot.com/201...labels-in.html
==============

We often creates labels in our development environment and we not use the labels.Following is a job to identify unused labels in application .

Here my label file is IFC

static void I4C_UnusedLabels(Args _args)
{
str 50    labelId;
int     i;
int     maxLabel = 2000;
xRefNames   names;
XRefReferences  ref;

str info = "LabelId#LabelStr\n"
;

  while (i <= maxLabel)  {
   labelId = "@IFC" + int2str(i);
   // The particular label file.
   select recid from names
   where names.Name == labelid
   exists join ref
   where names.RecId == ref.xRefNameRecId;

   if (! names.RecId)
   {
    info += strfmt("%1#%2\n", labelId, 
      SysLabel::labelId2String(labelId));
   }

   i++;
  }

}

[Blog bot]

Источник: http://kamalblogs.wordpress.com/2011...amics-ax-2009/
==============

The pain of unused labels is felt when you start translating your application to support the global versions. As we were porting our application to German we were seeing every possible way to speed up the translation work, one of it was to avoid translating unused labels.  So we tried a few tools that helps us identify this but unfortunately nothing turned helpful. We then resorted to invent our own strategy ….

I’m just reposting what my colleague had already posted on his blog with little more detail and a few additions …

*This job works only if your cross reference is updated*

static void FindUnUsedLabels()
{
    str 50          labelId;
    str             labelString;
    int             i;
    //set max label to the highest number of labelId in your application
    int             maxLabel = 2000;
    xRefNames       names;
    XRefReferences  ref;

    ;

    while (i <= maxLabel)
    {
        //Sequential generation
        labelId = "@IFC" + int2str(i);

        //Find if the label id has an cross reference
        //record
        select recid from names
            where names.Name == labelid
        exists join ref
            where names.RecId == ref.xRefNameRecId;

        labelString = SysLabel::labelId2String(labelId);

        //If there is no record in cross reference then log it
        if (! names.RecId &&
        //avoid logging labels that are already deleted (This is because of sequential check like IFC1, IFC2, IFC3 etc...)
            labelString != labelId)
        {
            info(strfmt("%1 - %2\n", labelId, SysLabel::labelId2String(labelId)));
        }

        i++;
    }

[mazzy]

блин, хлебом не корми - дай попрограммировать.

ведь есть стандартный функционал
Сервис \ Средства разработки \ Перекрестные ссылки \ Имена

Колонка "Код записи" показывает "Число использований" (да, забыли программисты правильную метку поставить)
Кнопка "Чем используется" показывает строки где именно используется данная метка.

Количество строк в форме "Чем используется" равно числу в колонке "Код записи / Число использований"



================
Чтобы найти неиспользуемые - экспортируйте записи в excel, отфильтруйте там.
Получится гораздо быстрее, нагляднее и эффективнее, нежели программирование.

[gl00mie]

Ну вот прям сходу отфильтровать в Excel'е не получится, придется вывести список всех меток и формулами выделять те метки, которые не входят в список из перекрестных ссылок, поскольку там, очевеидно, нет меток с нулевым числом использований. Но тут, мне кажется, дело в другом (вроде в Программисте-прагматике даже отдельный подраздел такой есть - "Вездесущая автоматизация"): людям не нужен способ легкого и быстрого ручного поиска неиспользуемых меток - им нужен автоматизированный способ такого поиска, воспроизводимый, сопрягаемый с другими автоматизированными методами анализа. Да, это требует немного больше кода, но зато полностью избавляет от ручного труда.