DAQ как пользоваться условиями?

XXX_:)

Добрый день. Работаю с 4ФСС. Есть поле с некоторой суммой. Нужно добиться того, что если сумма положительная, то ее выводить, если отрицательная то скрывать. Подскажите можно ли это реализовать и если да, то как это сделать.

Спасибо.

Брат Мигель

В настройке формуляра есть флажек "Без негативных сумм"

XXX_:)

Поле заполняется с помощью "Группы полей формуляр". Т.е. является разностью других полей. При установке галочки "Без отрицательных сумм" в нужное поле они все равно выводятся

. Возможно эта галочка не действует на поля, которые вычисляются суммой других. Вопрос остается открытым.

Брат Мигель

XXX_:) написал:

Поле заполняется с помощью "Группы полей формуляр". Т.е. является разностью других полей. При установке галочки "Без отрицательных сумм" в нужное поле они все равно выводятся

. Возможно эта галочка не действует на поля, которые вычисляются суммой других. Вопрос остается открытым.

Да для группы эта ситуация не отрабатывает. :cry:

Мы писали свой ФМ, для обработки групп.

XXX_:)

А что за ФМ вы писали и куда его вставляли. Если просто к полю ФМ привязать, то во время его вызова еще суммируемые поля не имеют значений, поэтому тут вроде бы тупик. Отказаться же от всех сумм и все делать через ФМ-ы утомительно. Пока в поиске, ничего более менее приличного не придумал.

XXX_:)

Большое спасибо, Брат Мигель, за подсказку. С ее помощью сконструировал некоторое решение, внутри ФМ-а вызывается стандартное суммирование. И на каждом шаге запоминаются слагаемые. На последнем шаге слагаемые суммируются и вычисляется знак суммы, если сумма отрицательная, то добавляется слагаемое = сумме, только с обратным знаком, чтобы на экран попало нулевое значение.

Code:

  DATA:  lt_fodat   TYPE  p99sd_tab_fodat
        ,returncode TYPE sy-subrc
        ,wa_fidat   TYPE p99sd_fidat
        ,ls_sum     type p99sd_fidat
        ,ls_value   type p99sd_value
        ,lsum_amtfo type p99sd_amtfo
        .

  CHECK NOT im_wafor-fidaq-sougr IS INITIAL.

  lt_fodat[] = im_tab_fodat[].

  wa_fidat-field = im_wafor-field.

  PERFORM daq_sougr IN PROGRAM saplhr99s00_daq IF FOUND
                      USING    im_daq
                               im_tab_pay
                               im_tab_time
                               im_tab_prelp
                               im_tab_user
                               im_form
                               im_wafor
                      CHANGING lt_fodat
                               wa_fidat-value
                               returncode
                               ch_tab_error.

*          Take into consideration that the field may need the
*          amount cumulated over all time registers
  IF returncode IS INITIAL AND NOT wa_fidat-value IS INITIAL.

    PERFORM consistency_fidat IN PROGRAM saplhr99s00_daq IF FOUND
                              USING    im_form im_wafor
                              CHANGING wa_fidat-value.

    PERFORM cum_time IN PROGRAM saplhr99s00_daq IF FOUND
                     USING    im_form im_wafor
                     CHANGING wa_fidat-value.

    ex_tab_value = wa_fidat-value.
*Сохраняем значения для подсчета знака
    APPEND wa_fidat TO gt_sum.

  ENDIF.


  IF returncode IS NOT INITIAL.
    ex_returncode = returncode.
  ENDIF.
*Проверка на положительность
  IF im_daq-pernr IS INITIAL.

    LOOP AT gt_sum into ls_sum WHERE field = im_wafor-field.

        LOOP AT ls_sum-value INTO ls_value.
          lsum_amtfo = lsum_amtfo + ls_value-amtfo.
        ENDLOOP.

    ENDLOOP.

    IF lsum_amtfo < 0.

*Нужно обнулить это поле.
        ls_value-begda = ls_value-begda + 1.
        ls_value-endda = ls_value-endda + 1.
        ls_value-amtfo = - lsum_amtfo.
        APPEND ls_value TO ex_tab_value.
    ENDIF.

    DELETE gt_sum WHERE field = im_wafor-field.

  ENDIF.

DAQ как пользоваться условиями?

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