topic Re: alv problem in Application Development and Automation Discussions

topic Re: alv problem in Application Development and Automation Discussions https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057023#M90667 <HTML><HEAD></HEAD><BODY><P>Thank u srinivas</P><P>got it and points alloted</P><P></P><P>cheers</P><P>kaki</P></BODY></HTML> Fri, 02 Dec 2005 03:27:04 GMT Former Member 2005-12-02T03:27:04Z alv problem https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057020#M90664 <HTML><HEAD></HEAD><BODY><P>Hi,</P><P>I have created the program with alv list display.When i run the program only one value getting displayed.Where might be the problem.Itab having the data.</P><P><b>And how to pass the itab data into ALV list.</b></P><P>here is the code...</P><P></P><P>REPORT YQM_NOTIFICATION MESSAGE-ID ZM NO STANDARD PAGE HEADING</P><P> LINE-SIZE 255.</P><P></P><P>TYPE-POOLS: SLIS.</P><P></P><P></P><P>tables: qpct,</P><P> qpgt,</P><P> qmel,</P><P> ihpa.</P><P></P><P>DATA: fieldcat TYPE slis_t_fieldcat_alv,</P><P> ITAB_EXTAB TYPE SLIS_T_EXTAB.</P><P></P><P>DATA: it_field TYPE slis_t_fieldcat_alv,</P><P> w_layout TYPE slis_layout_alv,</P><P> it_exclu TYPE slis_t_extab,</P><P> GS_EXTAB TYPE SLIS_EXTAB.</P><P></P><P>data: begin of t_hdr occurs 0,</P><P> group like qpgt-CODEGRUPPE,</P><P> code like qpct-code,</P><P> TEXT like qpct-KURZTEXT,</P><P> name like qpgt-KURZTEXT,</P><P> end of t_hdr.</P><P></P><P></P><P>data: begin of t_det occurs 0,</P><P> sno type i,</P><P> QMNUM like qmel-QMNUM, " notification number(ref no)</P><P> REFNUM like qmel-refnum, " contract no</P><P> parnr like ihpa-parnr,</P><P> qmtxt like qmel-qmtxt,</P><P> QMGRP like qmel-QMGRP,</P><P> QMCOD like qmel-QMCOD,</P><P> objnr like qmel-objnr,</P><P> desc(72),</P><P> end of t_det.</P><P></P><P>data: sno type i.</P><P>DATA: v_repid TYPE sy-repid.</P><P></P><P>data: ITAB_LINES LIKE tline OCCURS 0 WITH HEADER LINE.</P><P></P><P>SELECTION-SCREEN BEGIN OF BLOCK a1 WITH FRAME TITLE text-001.</P><P>select-options:s_QMNUM for qmel-QMNUM,</P><P> s_qmart for qmel-qmart,</P><P> s_qmdat for qmel-QMDAT.</P><P></P><P>SELECTION-SCREEN END OF BLOCK a1.</P><P></P><P>start-of-selection.</P><P> perform get_data.</P><P> perform display_alv.</P><P></P><P></P><P>end-of-selection.</P><P><STRONG>&----</STRONG></P><HR originaltext="---------------------------------------------------------------" /><P></P><P>*& Form display_alv</P><P><STRONG>&----</STRONG></P><HR originaltext="---------------------------------------------------------------" /><P></P><UL><LI level="1" type="ul"><P> text</P></LI></UL><P><STRONG>----</STRONG></P><HR originaltext="----------------------------------------------------------------" /><P></P><P>form display_alv.</P><P> PERFORM field_cat USING fieldcat.</P><P> v_repid = sy-repid.</P><P></P><P> CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'</P><P> EXPORTING</P><P> i_callback_program = v_repid</P><P> it_fieldcat = fieldcat</P><P> IT_EXCLUDING = ITAB_EXTAB</P><P> TABLES</P><P> t_outtab = t_det</P><P> EXCEPTIONS</P><P> program_error = 1</P><P> OTHERS = 2.</P><P></P><P> IF sy-subrc <> 0.</P><P> MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno</P><P> WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.</P><P> ENDIF.</P><P>endform. "display_alv</P><P></P><P></P><P><STRONG>&----</STRONG></P><HR originaltext="---------------------------------------------------------------" /><P></P><P>*& Form field_cat</P><P><STRONG>&----</STRONG></P><HR originaltext="---------------------------------------------------------------" /><P></P><UL><LI level="1" type="ul"><P> text</P></LI></UL><P><STRONG>----</STRONG></P><HR originaltext="----------------------------------------------------------------" /><P></P><UL><LI level="1" type="ul"><P> -->P_FIELDCAT text</P></LI></UL><P><STRONG>----</STRONG></P><HR originaltext="----------------------------------------------------------------" /><P></P><P>FORM field_cat USING p_fieldcat.</P><UL><LI level="1" type="ul"><P>FIELD CATELOG FOR ALV DISPLAY.</P></LI></UL><P> DATA: i_fieldcat TYPE slis_fieldcat_alv.</P><P> CLEAR i_fieldcat.</P><P></P><P> i_fieldcat-fieldname = 'sno'.</P><P> i_fieldcat-tabname = 't_det'.</P><P> i_fieldcat-no_out = ' '.</P><P> i_fieldcat-seltext_l = 'S.no'.</P><P> i_fieldcat-outputlen = 4.</P><P> APPEND i_fieldcat TO fieldcat.</P><P></P><P> i_fieldcat-fieldname = 'QMNUM'.</P><P> i_fieldcat-tabname = 't_det'.</P><P> i_fieldcat-no_out = ' '.</P><P> i_fieldcat-seltext_l = 'Ref.no'.</P><P> i_fieldcat-outputlen = 18.</P><P> APPEND i_fieldcat TO fieldcat.</P><P></P><P> i_fieldcat-fieldname = 'refnum'.</P><P> i_fieldcat-tabname = 't_det'.</P><P> i_fieldcat-no_out = ' '.</P><P> i_fieldcat-seltext_l = 'Contract no'.</P><P> i_fieldcat-outputlen = 18.</P><P> APPEND i_fieldcat TO fieldcat.</P><P></P><P> i_fieldcat-fieldname = 'parnr'.</P><P> i_fieldcat-tabname = 't_det'.</P><P> i_fieldcat-no_out = ' '.</P><P> i_fieldcat-seltext_l = 'A-Div'.</P><P> i_fieldcat-outputlen = 10.</P><P> APPEND i_fieldcat TO fieldcat.</P><P></P><P> i_fieldcat-fieldname = 'qmtxt'.</P><P> i_fieldcat-tabname = 't_det'.</P><P> i_fieldcat-no_out = ' '.</P><P> i_fieldcat-seltext_l = 'Description'.</P><P> i_fieldcat-outputlen = 25.</P><P> APPEND i_fieldcat TO fieldcat.</P><P></P><P> i_fieldcat-fieldname = 'desc'.</P><P> i_fieldcat-tabname = 't_det'.</P><P> i_fieldcat-no_out = ' '.</P><P> i_fieldcat-seltext_l = 'Defect'.</P><P> i_fieldcat-outputlen = 100.</P><P> APPEND i_fieldcat TO fieldcat.</P><P></P><P>ENDFORM. "FIED_CAT</P><P></P><P></P><P></P><P><STRONG>&----</STRONG></P><HR originaltext="---------------------------------------------------------------" /><P></P><P>*& Form get_data</P><P><STRONG>&----</STRONG></P><HR originaltext="---------------------------------------------------------------" /><P></P><UL><LI level="1" type="ul"><P> text</P></LI></UL><P><STRONG>----</STRONG></P><HR originaltext="----------------------------------------------------------------" /><P></P><P>form get_data.</P><P>*to get header</P><P> select codegruppe code kurztext from qpct into table t_hdr.</P><P></P><P> loop at t_hdr.</P><P> select single * from qpgt where codegruppe = t_hdr-group.</P><P> if sy-subrc = 0.</P><P> t_hdr-name = qpgt-KURZTEXT.</P><P> modify t_hdr.</P><P> clear t_hdr.</P><P> endif.</P><P> endloop.</P><P></P><P></P><P>*to get details</P><P></P><P> select qmnum refnum QMDAT qmtxt objnr qmgrp QMCOD from qmel</P><P> into corresponding fields of table t_det</P><P> where qmnum in s_qmnum and</P><P> qmart in s_qmart and</P><P> qmdat in s_qmdat.</P><P></P><P> loop at t_det.</P><P> select single * from ihpa where objnr = t_det-objnr.</P><P> if sy-subrc = 0.</P><P> t_det-parnr = ihpa-parnr.</P><P> modify t_det.</P><P> clear t_det.</P><P> endif.</P><P> endloop.</P><P></P><P> loop at t_det.</P><P> delete t_hdr where group ne t_det-qmgrp.</P><P> endloop.</P><P>endform.</P><P></P><P></P><P>points guaranteed...</P><P>cheers</P><P>kaki</P><P></P><P></P><P>Message was edited by: Kaki R</P><P></P></BODY></HTML> Fri, 02 Dec 2005 03:20:03 GMT https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057020#M90664 Former Member 2005-12-02T03:20:03Z Re: alv problem https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057021#M90665 <HTML><HEAD></HEAD><BODY><P>Your internal table name and field names <b>have to be in uppercase</b> when you are building the field catalogue. Change it and you will get the output correctly.</P><P></P><P>Srinivas</P></BODY></HTML> Fri, 02 Dec 2005 03:23:56 GMT https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057021#M90665 Former Member 2005-12-02T03:23:56Z Re: alv problem https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057022#M90666 <HTML><HEAD></HEAD><BODY><P>While creating field catalog the strings in quotes are in small letters. Check once by giving them in caps.</P><P>Currently are you seeing value for QMNUM only? Or is there any other field?</P></BODY></HTML> Fri, 02 Dec 2005 03:26:26 GMT https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057022#M90666 Former Member 2005-12-02T03:26:26Z Re: alv problem https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057023#M90667 <HTML><HEAD></HEAD><BODY><P>Thank u srinivas</P><P>got it and points alloted</P><P></P><P>cheers</P><P>kaki</P></BODY></HTML> Fri, 02 Dec 2005 03:27:04 GMT https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057023#M90667 Former Member 2005-12-02T03:27:04Z Re: alv problem https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057024#M90668 <HTML><HEAD></HEAD><BODY><P>Here is how your fieldcat routine should be.</P><PRE><CODE> *&--------------------------------------------------------------------* *& Form field_cat *&--------------------------------------------------------------------* * text *---------------------------------------------------------------------* * -->P_FIELDCAT text *---------------------------------------------------------------------* FORM field_cat USING p_fieldcat. DATA: i_fieldcat TYPE slis_fieldcat_alv. CLEAR i_fieldcat. i_fieldcat-fieldname = 'SNO'. i_fieldcat-tabname = 'T_DET'. i_fieldcat-no_out = ' '. i_fieldcat-seltext_l = 'S.no'. i_fieldcat-outputlen = 4. APPEND i_fieldcat TO fieldcat. i_fieldcat-fieldname = 'QMNUM'. i_fieldcat-tabname = 'T_DET'. i_fieldcat-no_out = ' '. i_fieldcat-seltext_l = 'Ref.no'. i_fieldcat-outputlen = 18. APPEND i_fieldcat TO fieldcat. i_fieldcat-fieldname = 'REFNUM'. i_fieldcat-tabname = 'T_DET'. i_fieldcat-no_out = ' '. i_fieldcat-seltext_l = 'Contract no'. i_fieldcat-outputlen = 18. APPEND i_fieldcat TO fieldcat. i_fieldcat-fieldname = 'PARNR'. i_fieldcat-tabname = 'T_DET'. i_fieldcat-no_out = ' '. i_fieldcat-seltext_l = 'A-Div'. i_fieldcat-outputlen = 10. APPEND i_fieldcat TO fieldcat. i_fieldcat-fieldname = 'QMTXT'. i_fieldcat-tabname = 'T_DET'. i_fieldcat-no_out = ' '. i_fieldcat-seltext_l = 'Description'. i_fieldcat-outputlen = 25. APPEND i_fieldcat TO fieldcat. i_fieldcat-fieldname = 'DESC'. i_fieldcat-tabname = 'T_DET'. i_fieldcat-no_out = ' '. i_fieldcat-seltext_l = 'Defect'. i_fieldcat-outputlen = 100. APPEND i_fieldcat TO fieldcat. ENDFORM. "FIED_CAT </CODE></PRE><P></P></BODY></HTML> Fri, 02 Dec 2005 03:27:57 GMT https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057024#M90668 Former Member 2005-12-02T03:27:57Z Re: alv problem https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057025#M90669 <HTML><HEAD></HEAD><BODY><P>add one more line to fieldctalog to all fields</P><P></P><P>i_fieldcat-col_pos = '1'.</P><P>i_fieldcat-col_pos = '2'.</P><P></P><P>to how many ever fields u have</P><P>dont forget to reward points</P></BODY></HTML> Fri, 02 Dec 2005 03:30:56 GMT https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057025#M90669 Former Member 2005-12-02T03:30:56Z Re: alv problem https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057026#M90670 <HTML><HEAD></HEAD><BODY><P>shailesh</P><P>you need to write perform for every field so write so do that and reply if you get the result properly</P><P>regards</P><P>siddarth</P></BODY></HTML> Fri, 02 Dec 2005 05:18:22 GMT https://community.sap.com/t5/application-development-and-automation-discussions/alv-problem/m-p/1057026#M90670 Former Member 2005-12-02T05:18:22Z