Multi var COLUM how??

Former Member — Thu, 14 Oct 2010 16:29:02 GMT

I wanna now how can i solve a probleme with a multi var colum.

I wanna put 60 vars result in only colum without creat a new spool table.

I post the code below

**&----

*& Form f_monta_saida

**&----

Monta relatório com dados finais.*

**----

FORM f_monta_saida.

SORT it_zpert_kwh_kw BY anlage.

LOOP AT it_zpert_kwh_kw.

LOOP AT it_zpert_cadas_eanl WHERE anlage = it_zpert_kwh_kw-anlage .

IF s_con IS NOT INITIAL.

MOVE it_zpert_cadas_eanl-branche TO it_relatorio-branche.

MOVE it_zpert_cadas_eanl-istype TO it_relatorio-istype.

MOVE it_zpert_cadas_eanl-ableinh TO it_relatorio-ableinh.

MOVE it_zpert_kwh_kw-anlage TO it_relatorio-anlage.

MOVE it_zpert_kwh_kw-operand TO it_relatorio-operand.

MOVE it_zpert_kwh_kw-billing_period TO it_relatorio-billing_period .

DO p_num TIMES.

lv_sy = sy-index.

CONCATENATE 'it_zpert_kwh_kw-qtd_'lv_sy INTO lv_var.

ASSIGN (lv_var) TO <fs_qtd_zpert>.

CLEAR lv_var.

CONCATENATE 'it_relatorio-qtd_'lv_sy INTO lv_var.

ASSIGN (lv_var) TO <fs_qtd_relat>.

IF <fs_qtd_zpert> IN s_con.

MOVE <fs_qtd_zpert> TO <fs_qtd_relat>.

ENDIF.

ENDDO.

ELSE.

MOVE it_zpert_cadas_eanl-branche TO it_relatorio-branche.

MOVE it_zpert_cadas_eanl-istype TO it_relatorio-istype.

MOVE it_zpert_cadas_eanl-ableinh TO it_relatorio-ableinh.

MOVE-CORRESPONDING it_zpert_kwh_kw TO it_relatorio.

ENDIF.

APPEND it_relatorio.

ENDLOOP.

EXIT.

ENDFORM. "f_monta_saida

**&----

*& Form f_monta_fieldcat

**&----

Monta saida.*

**----

FORM f_monta_fieldcat.

v_ano = sy-datum(4).*

***

v_mes = sy-datum+4(2).*

v_ano = it_relatorio-billing_period(4).

v_mes = it_relatorio-billing_period+5(2).

PERFORM f_config_catalogo USING:

1 'IT_RELATORIO' text-001 'ANLAGE' ' ' ' ' ' ' ' ',

2 'IT_RELATORIO' text-005 'ABLEINH' ' ' ' ' ' ' ' ',

3 'IT_RELATORIO' text-002 'OPERAND' ' ' ' ' ' ' ' ',

4 'IT_RELATORIO' text-004 'ISTYPE' ' ' ' ' ' ' ' ',

5 'IT_RELATORIO' text-003 'BRANCHE' ' ' ' ' ' ' ' '.

DO p_num TIMES.

IF sy-index > 1.

v_mes = v_mes - 1.

IF v_mes = 0.

v_mes = 12.

v_ano = v_ano - 1.

ENDIF.

CONCATENATE v_ano '/' v_mes INTO v_data.

lv_qtd = sy-index.

CONCATENATE 'QTD_' lv_qtd INTO lv_guard.

CONCATENATE 'it_relatorio-qtd_' lv_qtd INTO lv_per.

ASSIGN (lv_per) TO <fs_per>.

IF <fs_per> <> ''.

IF v_ant = 1.

v_ant = 12.

ELSEIF v_ant <> 1.

v_ant = v_ant - 1.

ELSE.

MOVE v_mes TO v_ant.

ENDIF.

v_conta = v_conta + 1.

ENDIF.

IF <fs_per> <> '' AND v_mes = v_ant AND v_conta <= p_num.

vl_tabix = vl_tabix + 1.

PERFORM f_config_catalogo USING:

vl_tabix 'IT_RELATORIO' v_data lv_guard ' ' ' ' ' ' ' '.

ENDIF.

ENDDO.

v_min = 5 + p_num.

IF vl_tabix = 5 OR vl_tabix <> v_min.

MESSAGE 'Nenhum registro encontrado para os parâmetros informados'

TYPE 'S' DISPLAY LIKE 'E'.

LEAVE LIST-PROCESSING.

ENDIF.

ENDFORM.

HOW CAN I GIVE A COLUM MORE THAN ONE VAR

SHOULD I MOVE ALL THE VALUE TO A IT TABLE??

Re: Multi var COLUM how??

Former Member — Thu, 14 Oct 2010 20:01:49 GMT

It is possible to put multiple values into a "column". SAP does this, for example with color controls for ALV.

LVC_S_SCOL is a structure in which the middle "column" is actually three values and that column is structure LVC_S_COLO.

Re: Multi var COLUM how??

Former Member — Fri, 15 Oct 2010 01:48:06 GMT

How to do soo in the ALV???

Give me a example. please.

Thanks alot.

topic Re: Multi var COLUM how?? in Application Development and Automation Discussions

Multi var COLUM how??

Re: Multi var COLUM how??

Re: Multi var COLUM how??