Наименование организации в Т13

Konst

Господа помогите.
Второй день под дебагером пытаюсь найти, где формируется наименование организации для Т13.
В разделе персонала, есть пять подразделов и соответственно пять единиц расчета. Хочется чтобы в заголовок наименование организации попадала единица расчета (выбранный подраздел). В сам табель работники выбираются правильно, согласно выбранной единицы расчета, но в заголов , независимо от выбранной единицы расчета, тупо пишется наименование второй из них. То есть в самом берется верная ЕР, а для заголовка, она как будто где-то зашита. Совершенно не понимаю где.
HRPADRU_HRULTAB0

relator

Формируется в HRUITAB0F в

Code:

PERFORM get_ag_jdata(hruulib0) USING p0001
                                CHANGING s data-norg s.

Такие вещи сначала можно смотреть в SFP, потом искатьв коде

Плюс где-то было написано про таблицуT7RURPTCST00 для Т-13...

Konst

Огромное человеческое спасибо, но есть пара моментов.

1)В SFP какой-то очень странный внешний вид формы (в предпросмотре) , похоже что форма полностью описана в xml
2)В SFP указано, что поле s_data-norg и есть нужное нам название, но эта сткуктура обьявляется в программе локально.
3)Я под дебагером и вообще так и не нашел когда и кем запускается ф-ция get_ag_jdata. Даже не понимаю как она может использоваться мимо дебагера, хотя ошибка похоже таки в ней.

Прошу извинить за возможно некорректные вопросы, так как я еще очень начинающий и слегка в шоке от ABAP (по сравнению с известными мне языками)

Proforg

Смотрим интерфейс HR_RU_T13 в SFP. Нам нужна S_DATA-NORG в импорте.
Ищем в HRULTAB0 NORG
Таким образом выходим на строку

Code:

    PERFORM get_ag_jdata(hruulib0) USING p0001
                               CHANGING s man-norg s.

Проваливаемся в get_ag_jdata
Сразу выявляем виновников

Code:

  constants: t_jcodes_data like dd02d-tabname value 'T7RU9A'.
  constants: t_form_const like dd02d-tabname value 'T7RURPTCST00'.

Сначала займемся вторым.

Code:

* get add. par for juper
  select contn from (t_form_const) into c_soort where progr eq sy-cprog and param eq 'SOORT'.
  endselect.
  if sy-subrc ne 0.
    c_soort = '01'.
  endif.
  select contn from (t_form_const) into c_instl where progr eq sy-cprog and param eq 'INSTL'.
  endselect.
  if sy-subrc ne 0.
    c_instl = '000'.
  endif.

Т.е. в SOORT и INSTL должны быть прописаны в T7RURPTCST00 для программы HRULTAB0 или они примут значения по умолчанию.

Следующий виновник - T7RU9A. Его вычисляем из селекта

Code:

* ...looking for jur.person of Employer (AG) for fiscal department(01)
  select        lnaam    ansnr  kpp00 telnr kdokp regno
         from  (t_jcodes_data)
         into  (x_name,  x_inn, x_kpp, x_telnr, x_okpo, x_regno)
         where  soort eq c_soort     and
                juper eq p_org-juper and
                instl eq c_instl     and "is constant due to HR-solution !
                endda ge p_org-endda.
  endselect. "(t_jcodes_data)

Ковыряя ключи в селекте выходим на P0001-JUPER, т.е. юрлицо в 0001ИТ.

Т.е. нужно T7RU9A корректно заполнить. Дебаггер вообще не лучший помошник, лучше логику ковырять.

Konst

Огромное спасибо.
Я таки ближе к ночи под дебагером сумел добраться до нужного места. Но это в сапе не метод - Вы абсолютно правы. Ваш способ куда эффективнее. Еще раз спасибо.

Konst

Люди добрые - это глюк.
Который никак не решается без исправления программы.
Я вышел из положения сделав несколько вариантов - юзеры счастливы.

Но подскажите, может эта тема у кого нибудь работает правильно. Какая последняя нота должна стоять

Наименование организации в Т13

Кто сейчас на конференции