How to transport text in report programs

hi experts,
any one tell me how to transport "text" in report programs.
thanking u ,

Chk these threads:
Transporting Translations of Text Elements in SE38
How do I disable input for a table control?
Hope this helps.
Regards
Vinayak

Similar Messages

How to create documentation for report programs and how to use it

how to create documentation for report programs and how to use it in the selection screen by placing an icon in the Applicatin Tool bar. If i click this icon the help documentation has to display.
Note: Exaple <b>RSTXSCRP</b> programs selection screen

Hi
1 goto SE38 transaction, give the program name
2 Click on documentation radiobutton & then press change
3 Write your PURPOSE, PREREQUISITES etc details
4 Save the same & Activae it.
The icon will come automatically on selection screen
Thanks
Sandeep
Reward if useful

How to place a ABAP report program into a Change Request?

I used to create an ABAP4 report program, but maybe when I created it, I created it as local or $TMP that there is no any Change Request related to this program. Now I want to transport this program from Development to Test, how would create a Change Request that includes this program?
Thanks in advance!

Kevin,
Generally objects saved in a local package are not transported. You should always assign those objects to a change request and a developemnt class or package.
Copy your program in to a new program and assign that new program to a CTS and a package. Then you always can rename the new program name to the old programs name once after deleting the old program.
Thanks

How to Enter Text in Report Painter

Dear Sap Guru's
I am new to Report Painter i want to add some text under the lead column and then i want to choose Characteristics which i had done but i am not getting any option to simply insert some text under the Lead column in between the Rows.Example.
Lead Column      Period1 Period2 Period3
Current Account
5149107             20,000   10,000 5,000
5149106             2000       3000   40000
PRofit Center Account
254136               4000      2000   1000
254137               3000      2000    5000
Please let me know how to Enter Text : Current Account and Profit Center Account in the Report.
Please send the reply as early as possible as i have to submit the report today.Thanks in advance.
Regards,
Abhishek

Sorry, but this is not related to SAP on Oracle.
I would try ABAP forum instead.

How to schedule an abap report program to run every day, weekend etc..

Hi,
I want to schedule an abap report program to run every day, week, fortnight or month and the output to be redirected to the printer. How to achieve this ?
thanks

Hi,
go to t.code sm36 there give the name of the program which u want to eecute in background if u want u can give periodic that depends upon ur requirement from there in sm37 u can check the stauts and directly print from there
hope i am clear to u
plzz reward if it is useful...

How do i get this report program

     Contract Compliance Report : This report looks at the actual customer purchases (QTY) by period vs. targeted quantities.
          The report created will list all the contracts quantity vs. shipped quantity in the period specified for a given customer or material or sales organization or contract number along with details such as material numbers, contract start date, contract end date, etc.
     Contract Expiration Report : Contracts need to be monitored and quotations sent out for renewal as they approach their expiry date. A report is required to show the contracts expiring.
          This report will list all the contracts expiring in the period specified for a given customer or material or sales organization or contract number along with details such as equipment numbers, material numbers, contract start date, contract end date, etc.

hi
i have this code for CONTRACT EXPIRATION REPORT.
may this be useful.
TABLES: vbak,veda,vbkd.
TYPE-POOLS: slis,
            ibco2.
TYPES : BEGIN OF t_ty_str_contract_dtls,
        vbeln     TYPE vbeln,
        posnr     TYPE posnr,
        zzp_mfrnr TYPE mfrnr,
        zprogram TYPE zsls_dte_program,
        cuobj     TYPE cuobj,
        classnum TYPE char18,
        END OF t_ty_str_contract_dtls.
DATA : g_tab_cnt_details TYPE zsls_tab_cntr_expire,
       g_wa_cnt_details   TYPE LINE OF zsls_tab_cntr_expire,
       g_tab_fieldcat     TYPE slis_t_fieldcat_alv,
       g_fieldcat         TYPE slis_fieldcat_alv,
       g_pos              TYPE i,
       g_exit             TYPE c,
       p_fname            TYPE string,
       repid              TYPE sy-repid,
       BEGIN OF g_str_data,
          kunnr(12)          TYPE c,
          name1(30)          TYPE c,
          vkorg(15)          TYPE c,
          vkbur(15)          TYPE c,
          vkgrp(15)          TYPE c,
          bezei(25)          TYPE c,
          vbeln(15)          TYPE c,
          bstkd_m(35)        TYPE c,
          ktext(40)          TYPE c,
          vbegdat(15)        TYPE c,
          venddat(17)        TYPE c,
          auart(15)          TYPE c,
          zzp_mfrnr(12)      TYPE c,
          mnf_des(30)        TYPE c,
          zprogram(30)       TYPE c,
        END OF g_str_data,
      BEGIN OF g_str_cus_nam,
        kunnr TYPE kunnr,
        name1 TYPE name1,
       END OF g_str_cus_nam,
      BEGIN OF g_str_sgrp_nam,
        vkgrp TYPE vkgrp,
        bezei TYPE bezei,
      END OF g_str_sgrp_nam,
      BEGIN OF g_str_manf_nam,
        lifnr TYPE lifnr,
        name1 TYPE name1,
      END OF g_str_manf_nam.
DATA : g_tab_data LIKE STANDARD TABLE OF g_str_data,
       g_tab_cus_nam   LIKE STANDARD TABLE OF g_str_cus_nam,
       g_tab_sgrp_nam LIKE STANDARD TABLE OF g_str_sgrp_nam,
       g_tab_contract TYPE STANDARD TABLE OF t_ty_str_contract_dtls,
         g_wa_contract   TYPE t_ty_str_contract_dtls,
       g_tab_manf_nam LIKE STANDARD TABLE OF g_str_manf_nam,
       g_rc            LIKE sy-subrc.        "RETURN CODE.
CONSTANTS: con_klart LIKE klah-klart VALUE '300',
           con_program LIKE zsls_str_contract_chg-zprogram VALUE 'PROGRAM'.
SELECTION-SCREEN BEGIN OF BLOCK b0 WITH FRAME.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS : s_sorg FOR vbak-vkorg OBLIGATORY DEFAULT '0030',
                  s_soff FOR vbak-vkbur,
                  s_sgrp FOR vbak-vkgrp,
                  s_dtyp FOR vbak-auart OBLIGATORY,
                  s_cnum FOR vbak-vbeln,
                  s_cust FOR vbak-kunnr,
                  s_pnum FOR vbkd-bstkd_m NO-EXTENSION NO INTERVALS.
PARAMETERS      : p_mfnum LIKE mara-mfrnr.
SELECT-OPTIONS : s_endt FOR veda-venddat OBLIGATORY.
PARAMETERS      : p_prg LIKE zsls_str_char_para-zprogram.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-005.
PARAMETER       :p_name LIKE rlgrap-filename.   " OBLIGATORY.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN END OF BLOCK b0.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_name.
MOVE sy-repid TO repid.
CALL FUNCTION 'F4_FILENAME'
    EXPORTING
      program_name = repid
      dynpro_number = sy-dynnr
      field_name    = 'P_NAME'
    IMPORTING
      file_name     = p_name.
START-OF-SELECTION.
PERFORM get_data.
IF g_exit NE 'X'.
    PERFORM get_prg_mfr_dtls.
    IF g_tab_cnt_details IS INITIAL.
      MESSAGE i000 WITH text-004.
      g_exit = 'X'.
      EXIT.
    ENDIF.
    PERFORM move_data.
ENDIF.
END-OF-SELECTION.
IF g_exit NE 'X'.
    MOVE p_name TO p_fname.
    PERFORM post_data_report.
    PERFORM display_data.
ENDIF.
*&      Form get_data
FORM get_data .
SELECT a~vkorg
          a~vkbur
          a~vkgrp
          a~auart
          a~kunnr
          a~vbeln
          a~ktext
          c~vbegdat
          c~venddat
          d~bstkd_m
          INTO CORRESPONDING FIELDS OF TABLE g_tab_cnt_details
          FROM vbak AS a
          INNER JOIN veda AS c
                   ON a~vbeln EQ c~vbeln AND
                      c~vposn EQ '000000'
          INNER JOIN vbkd AS d
                   ON a~vbeln EQ d~vbeln
          WHERE a~vkorg       IN s_sorg AND
                a~vkbur       IN s_soff AND
                a~vkgrp       IN s_sgrp AND
                a~auart       IN s_dtyp AND
                a~vbtyp       EQ 'G'    AND
                a~vbeln       IN s_cnum AND
                a~kunnr       IN s_cust AND
                c~venddat     IN s_endt AND
                d~bstkd_m       IN s_pnum.
IF sy-subrc NE 0 OR g_tab_cnt_details IS INITIAL.
    MESSAGE i000 WITH text-004.
    g_exit = 'X'.
    EXIT.
ENDIF.
ENDFORM.                    " get_data
*&      Form display_data
FORM display_data .
IF g_tab_cnt_details IS NOT INITIAL.
    DELETE ADJACENT DUPLICATES FROM g_tab_cnt_details COMPARING ALL FIELDS.
    PERFORM build_field_cat.
    PERFORM call_alv.
ENDIF.
ENDFORM.                    " display_data
*&      Form build_field_cat
FORM build_field_cat .
REFRESH g_tab_fieldcat.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'KUNNR'      '15' text-010 ' ' ' ' ' '.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'NAME1'      '30' text-024 ' ' ' ' ' '.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'VKORG'      '10' text-011 ' ' ' ' ' '.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'VKBUR'      '15' text-012 ' ' ' ' ' '.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'VKGRP'      '15' text-015 ' ' ' ' ' '.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'BEZEI'      '25' text-025 ' ' ' ' ' '.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'VBELN'      '15' text-013 ' ' 'X' 'X'.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'BSTKD_M'    '35' text-014 ' ' ' ' ' '.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'KTEXT'      '40' text-023 ' ' ' ' ' '.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'VBEGDAT'    '20' text-016 ' ' ' ' ' '.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'VENDDAT'    '20' text-017 ' ' ' ' ' '.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'AUART'      '18' text-018 ' ' ' ' ' '.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'ZZP_MFRNR' '20' text-028 ' ' ' ' ' '.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'MNF_DES'    '30' text-030 ' ' ' ' ' '.
PERFORM fill_field_cat USING g_pos 'G_TAB_CNT_DETAILS'   'ZPROGRAM'   '30' text-029 ' ' ' ' ' '.
ENDFORM.                    " build_field_cat
*&      Form fill_field_cat
*       text
FORM fill_field_cat USING    u_pos              TYPE any
                              value(u_001)       TYPE any
                              value(u_002)       TYPE any
                              value(u_003)       TYPE any
                              u_text             TYPE any
                              value(u_004)       TYPE any
                              value(u_005)       TYPE any
                              value(u_006)       TYPE any.
u_pos = u_pos + 1.
g_fieldcat-col_pos      = u_pos .
g_fieldcat-tabname      = u_001.
g_fieldcat-fieldname    = u_002.
g_fieldcat-outputlen    = u_003.
g_fieldcat-reptext_ddic = u_text.
g_fieldcat-just         = u_004.
g_fieldcat-hotspot      = u_005.
g_fieldcat-emphasize    = u_006.
APPEND g_fieldcat TO g_tab_fieldcat.
ENDFORM.                    " fill_field_cat
*&      Form call_alv
FORM call_alv.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
    EXPORTING
      i_callback_program      = sy-repid
      i_callback_user_command = 'USER_COMMAND'
      it_fieldcat             = g_tab_fieldcat
    TABLES
      t_outtab                = g_tab_cnt_details
    EXCEPTIONS
      program_error           = 1
      OTHERS                  = 2.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM.                    " call_alv
*&      Form post_data_report
FORM post_data_report .
IF p_fname IS NOT INITIAL.
    CALL FUNCTION 'GUI_DOWNLOAD'
      EXPORTING
        filename                = p_fname
        filetype                = 'DAT'
      TABLES
        data_tab                = g_tab_data
      EXCEPTIONS
        file_write_error        = 1
        no_batch                = 2
        gui_refuse_filetransfer = 3
        invalid_type            = 4
        no_authority            = 5
        unknown_error           = 6
        header_not_allowed      = 7
        separator_not_allowed   = 8
        filesize_not_allowed    = 9
        header_too_long         = 10
        dp_error_create         = 11
        dp_error_send           = 12
        dp_error_write          = 13
        unknown_dp_error        = 14
        access_denied           = 15
        dp_out_of_memory        = 16
        disk_full               = 17
        dp_timeout              = 18
        file_not_found          = 19
        dataprovider_exception = 20
        control_flush_error     = 21
        OTHERS                  = 22.
    IF sy-subrc <> 0.
      MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
              WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.
ENDIF.
ENDFORM.                    " post_data_report
**&      Form MOVE_DATA
FORM move_data .
IF g_tab_cnt_details IS NOT INITIAL.
    MOVE: text-010 TO g_str_data-kunnr,
          text-024 TO g_str_data-name1,
          text-011 TO g_str_data-vkorg,
          text-012 TO g_str_data-vkbur,
          text-015 TO g_str_data-vkgrp,
          text-025 TO g_str_data-bezei,
          text-013 TO g_str_data-vbeln,
          text-014 TO g_str_data-bstkd_m,
          text-023 TO g_str_data-ktext,
          text-016 TO g_str_data-vbegdat,
          text-017 TO g_str_data-venddat,
          text-018 TO g_str_data-auart,
          text-028 TO g_str_data-zzp_mfrnr,
          text-030 TO g_str_data-mnf_des,
          text-029 TO g_str_data-zprogram.
    APPEND g_str_data TO g_tab_data.
    LOOP AT g_tab_cnt_details INTO g_wa_cnt_details.
      MOVE: g_wa_cnt_details-kunnr   TO g_str_data-kunnr,
            g_wa_cnt_details-name1   TO g_str_data-name1,
            g_wa_cnt_details-vkorg   TO g_str_data-vkorg,
            g_wa_cnt_details-vkbur   TO g_str_data-vkbur,
            g_wa_cnt_details-vkgrp   TO g_str_data-vkgrp,
            g_wa_cnt_details-bezei   TO g_str_data-bezei,
            g_wa_cnt_details-vbeln   TO g_str_data-vbeln,
            g_wa_cnt_details-bstkd_m TO g_str_data-bstkd_m,
            g_wa_cnt_details-ktext   TO g_str_data-ktext,
            g_wa_cnt_details-vbegdat TO g_str_data-vbegdat,
            g_wa_cnt_details-venddat TO g_str_data-venddat,
            g_wa_cnt_details-auart   TO g_str_data-auart,
            g_wa_cnt_details-zzp_mfrnr TO g_str_data-zzp_mfrnr,
            g_wa_cnt_details-mnf_des TO g_str_data-mnf_des,
            g_wa_cnt_details-zprogram TO g_str_data-zprogram.
      APPEND g_str_data TO g_tab_data.
      CLEAR :g_str_data,g_wa_cnt_details.
    ENDLOOP.
ENDIF.
ENDFORM.                    " MOVE_DATA
**&      Form user_command
FORM user_command USING ucomm LIKE sy-ucomm selfield TYPE slis_selfield."#EC CALLED
READ TABLE g_tab_cnt_details INTO g_wa_cnt_details INDEX selfield-tabindex.
CHECK sy-subrc = 0.
CASE ucomm.
    WHEN '&IC1'.
      TRANSLATE selfield-sel_tab_field TO UPPER CASE.
      CASE selfield-sel_tab_field.
        WHEN 'G_TAB_CNT_DETAILS-VBELN'.
          IF NOT g_wa_cnt_details-vbeln IS INITIAL.
            SET PARAMETER ID 'KTN' FIELD g_wa_cnt_details-vbeln.
            CALL TRANSACTION 'VA43' AND SKIP FIRST SCREEN .
          ENDIF.
        WHEN OTHERS.
          MESSAGE w000(zsls_general) WITH text-027 .
          EXIT.
      ENDCASE.
ENDCASE.
ENDFORM.                    "user_command
*&      Form get_descrip_for_sgrpcust
FORM get_descrip_for_sgrpcust .
IF g_tab_cnt_details[] IS NOT INITIAL.
    SELECT kunnr name1
           INTO CORRESPONDING FIELDS OF TABLE g_tab_cus_nam
           FROM kna1
           FOR ALL ENTRIES IN g_tab_cnt_details
           WHERE kunnr = g_tab_cnt_details-kunnr.
    DELETE ADJACENT DUPLICATES FROM g_tab_cus_nam COMPARING ALL FIELDS.
    SELECT vkgrp bezei
           INTO CORRESPONDING FIELDS OF TABLE g_tab_sgrp_nam
           FROM tvgrt
           FOR ALL ENTRIES IN g_tab_cnt_details
           WHERE vkgrp = g_tab_cnt_details-vkgrp.
    DELETE ADJACENT DUPLICATES FROM g_tab_sgrp_nam COMPARING ALL FIELDS.
ENDIF.
ENDFORM.                    " get_descrip_for_sgrpcust
**&      Form get_class_details
FORM get_class_details .
DATA : l_sy_tabix TYPE sy-tabix.
SELECT vbap~vbeln
         vbap~posnr
         vbap~matnr
         vbap~zzp_mfrnr
         vbap~cuobj
         INTO CORRESPONDING FIELDS OF TABLE g_tab_contract
         FROM vbap
         FOR ALL ENTRIES IN g_tab_cnt_details
         WHERE vbap~vbeln = g_tab_cnt_details-vbeln.
IF g_tab_contract IS NOT INITIAL.
    SORT g_tab_contract BY vbeln zzp_mfrnr.
    DELETE ADJACENT DUPLICATES FROM g_tab_contract COMPARING vbeln zzp_mfrnr.
    LOOP AT g_tab_contract INTO g_wa_contract.
      l_sy_tabix = sy-tabix.
      PERFORM get_config USING g_wa_contract-cuobj
                         CHANGING g_wa_contract-zprogram .
      MODIFY g_tab_contract FROM g_wa_contract INDEX l_sy_tabix.
      CLEAR : g_wa_contract.
    ENDLOOP.
*---Moving the manufacturer details and program details
    LOOP AT g_tab_cnt_details INTO g_wa_cnt_details.
      l_sy_tabix = sy-tabix.
      READ TABLE g_tab_contract INTO g_wa_contract WITH KEY vbeln = g_wa_cnt_details-vbeln.
      IF sy-subrc = 0.
        g_wa_cnt_details-zzp_mfrnr = g_wa_contract-zzp_mfrnr.
        g_wa_cnt_details-zprogram = g_wa_contract-zprogram.
      ENDIF.
      MODIFY g_tab_cnt_details FROM g_wa_cnt_details INDEX l_sy_tabix.
    ENDLOOP.
    IF p_prg IS NOT INITIAL.
      DELETE g_tab_cnt_details WHERE zprogram <> p_prg.
    ENDIF.
    IF p_mfnum IS NOT INITIAL.
      DELETE g_tab_cnt_details WHERE zzp_mfrnr <> p_mfnum.
    ENDIF.
ENDIF.
PERFORM move_manf_desc.
ENDFORM.                    " get_class_details
**&      Form get_config
FORM get_config USING    g_wa_contract-cuobj
                 CHANGING g_wa_contract-zprogram .
DATA :         l_name(200),
                 l_tab_cfg    TYPE ibco2_instance_tab2,
                 l_str_cfg    TYPE ibco2_instance_rec2,
                 l_tab_values TYPE STANDARD TABLE OF ibco2_value_rec WITH HEADER LINE,
                 l_tab_get_values LIKE comw OCCURS 0 WITH HEADER LINE,
                 l_tab_features LIKE STANDARD TABLE OF klmerka,
                 l_str_chr_val LIKE clx2v,
                 l_tab_chr_val LIKE STANDARD TABLE OF clx2v,
                 l_atwtb TYPE atwtb.
CLEAR : l_tab_values,
          l_name,
          l_tab_get_values,
          l_str_cfg.
REFRESH : l_tab_features,
            l_tab_values,
            l_tab_get_values,
            l_tab_cfg.
CALL FUNCTION 'CUCB_GET_CONFIGURATION'
    EXPORTING
      instance                     = g_wa_contract-cuobj
    IMPORTING
      configuration                = l_tab_cfg
    EXCEPTIONS
      invalid_instance             = 1
      instance_is_a_classification = 2
      OTHERS                       = 3.
READ TABLE l_tab_cfg INTO l_str_cfg INDEX 1.
PERFORM get_class_num USING l_str_cfg-type_of-object_type
                              l_str_cfg-type_of-object_key.
CHECK g_rc EQ 0.
CALL FUNCTION 'CLME_FEATURE_ATTR_OF_CLASS'
    EXPORTING
      class                 = g_wa_contract-classnum
      classtype             = con_klart
    TABLES
      tfeatures             = l_tab_features
      tvalues               = l_tab_chr_val.
READ TABLE l_tab_cfg INTO l_str_cfg INDEX 1.
IF sy-subrc = 0.
    l_tab_values[] = l_str_cfg-values[].
    SORT l_tab_values BY atinn.
    LOOP AT l_tab_values.
      l_tab_get_values-atinn = l_tab_values-atinn.
      l_tab_get_values-atwrt = l_tab_values-atwrt.
      READ TABLE l_tab_chr_val INTO l_str_chr_val
           WITH KEY atinn = l_tab_values-atinn
                    atwrt = l_tab_values-atwrt.
      IF sy-subrc = 0.
        l_atwtb = l_str_chr_val-atwtb.
      ELSE.
        l_atwtb = l_tab_values-atwrt.
      ENDIF.
      MOVE l_tab_values-atinn TO l_name.
      PERFORM conversion_exit_char CHANGING l_name.
      CASE l_name.
        WHEN con_program.
          MOVE l_atwtb TO g_wa_contract-zprogram.
      ENDCASE.
    ENDLOOP.
ENDIF.
ENDFORM.                    " get_config
**&      Form get_class_num
**       text
** --> p1        text
** <-- p2        text
FORM get_class_num USING l_str_cfg-type_of-object_type
                         l_str_cfg-type_of-object_key.
*--Clear all variables & tables
DATA : l_alloclist TYPE bapi1003_alloc_list OCCURS 0 WITH HEADER LINE,
         l_return TYPE bapiret2 OCCURS 0 WITH HEADER LINE,
         clobjectkeyin LIKE bapi1003_key-object_guid,
         d_obtab LIKE tcla-obtab.
CLEAR : l_alloclist,
          l_return,
          clobjectkeyin,
          d_obtab,
          g_rc .
REFRESH :l_alloclist,
           l_return.
*get the db table for class type 300 to be used in different places.
*get the object key number for the material number
d_obtab = l_str_cfg-type_of-object_type.
SELECT SINGLE cuobj FROM inob INTO clobjectkeyin
WHERE klart = con_klart AND
        objek = l_str_cfg-type_of-object_key AND
        obtab = d_obtab.
IF sy-subrc EQ 0.
*get the class name and type for the material no.
    CALL FUNCTION 'BAPI_OBJCL_GETCLASSES_KEY'
      EXPORTING
        clobjectkeyin         = clobjectkeyin
       keydate               = sy-datum
       language              = sy-langu
      TABLES
        alloclist            = l_alloclist
        return                = l_return.
    READ TABLE l_alloclist INDEX 1.
    MOVE l_alloclist-classnum TO g_wa_contract-classnum.
ELSE.
    g_rc = 4.
ENDIF.
ENDFORM.                    " get_class_num
**&      Form conversion_exit_char
FORM conversion_exit_char CHANGING c_name.
CALL FUNCTION 'CONVERSION_EXIT_ATINN_OUTPUT'
    EXPORTING
      input = c_name
    IMPORTING
      output = c_name.
ENDFORM.                    " conversion_exit_char
*&      Form get_prg_mfr_dtls
*       text
* --> p1        text
* <-- p2        text
FORM get_prg_mfr_dtls .
*---Getting the Description for Customer and Sales group
PERFORM get_descrip_for_sgrpcust.
PERFORM get_class_details.
ENDFORM.                    " get_prg_mfr_dtls
*&      Form move_manf_desc
*       text
* --> p1        text
* <-- p2        text
FORM move_manf_desc .
DATA l_sy_tabix TYPE sy-tabix.
SELECT lifnr name1
             INTO CORRESPONDING FIELDS OF TABLE g_tab_manf_nam
             FROM lfa1
             FOR ALL ENTRIES IN g_tab_cnt_details
             WHERE lifnr = g_tab_cnt_details-zzp_mfrnr.
DELETE ADJACENT DUPLICATES FROM g_tab_manf_nam COMPARING ALL FIELDS.
LOOP AT g_tab_cnt_details INTO g_wa_cnt_details.
    l_sy_tabix = sy-tabix.
    READ TABLE g_tab_cus_nam INTO g_str_cus_nam WITH KEY kunnr = g_wa_cnt_details-kunnr.
    IF sy-subrc = 0.
      MOVE g_str_cus_nam-name1 TO g_wa_cnt_details-name1.
    ENDIF.
    READ TABLE g_tab_sgrp_nam INTO g_str_sgrp_nam WITH KEY vkgrp = g_wa_cnt_details-vkgrp.
    IF sy-subrc = 0.
      MOVE g_str_sgrp_nam-bezei TO g_wa_cnt_details-bezei.
    ENDIF.
    READ TABLE g_tab_manf_nam INTO g_str_manf_nam WITH KEY lifnr = g_wa_cnt_details-zzp_mfrnr.
    IF sy-subrc = 0.
      MOVE g_str_manf_nam-name1 TO g_wa_cnt_details-mnf_des.
    ENDIF.
    MODIFY g_tab_cnt_details FROM g_wa_cnt_details INDEX l_sy_tabix.
    CLEAR: g_wa_cnt_details.
ENDLOOP.
ENDFORM.                    " move_manf_desc
thx
pavan
*pls mark for helpful ans

How to pass text from print program to SAPSCRIPT

Hi Friends ,
I need to print this 4 line text on the invoice form between the INFO window and MAIN window . I created a new window in the form and included the text . using include command . The requirement is that if a certain condition is met in the print program then only this 4 line text should be printed on the form .
Any suggestions .
Thank you ,
Hari

Hi Naren ,
Just to verify .
I need to define something like this below in the print program ?
data : v_flag type c .
If customer = 'R' .
v_flag = 'X'.
PERFORM WRITE_FORM.
endif.
In the SAPFORM I defined a new var window "ADD_TEXT"
IF v_flag = 'X'.
INCLUDE Z_TEXT OBJECT TEXT ID ST LANGUAGE ES PARAGRAPH EE
ENDIF.
Please let me know if it is correct and also about the write_form . What paramenters do i pass in the write_form ????
Thanks for your help .
Hari

How to call the Report program into Function module

Hi Experts,
Actually I want to create the DataSource. But I have only the ALV report program. I need to create function module but I dont know how to call the ALV report program using in function module
So could you please any one send the Document or step by step method?
Advance Thanks,
Sathis

If the report is just based out of a table than create a Generic Extractor using View.
If its an InfoSet query than create a Generic Extractor on that InfoSet.
If its an ABAP report than create a Generic Extractor using FM
https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/a0f46157-e1c4-2910-27aa-e3f4a9c8df33

Calling a Report Program In Web Dynpro Using Submit statment

Hi all,
Can any one suggest how can i call a report program form Web Dynpro using Submit statment. I tried to call it its showing Field symbols not defined error. Is their any other ways to call Report in a Web Dynpro?. I have posted the error message when i tried using SUBMIT ZRR AND RETURN CONTROL
Field symbol has not yet been assigned.
The error occurred on the application server mnghcmsap_HRS_00 and in the work process 1 .
The termination type was: RABAX_STATE
The ABAP call stack was:
Form: CHECKBOX_OUT of program SAPLKKBL
Form: GEN_LINE_OUT of program SAPLKKBL
Form: DATA_OUT_SIMPLE of program SAPLKKBL
Form: LIST_OUTPUT_NEW of program SAPLKKBL
Form: FIRST_LIST_DISPLAY of program SAPLKKBL
Module: LIST_DISPLAY of program SAPLKKBL
Function: K_KKB_LIST_DISPLAY of program SAPLKKBL
Method: PRINT_BACKEND of program CL_GUI_ALV_GRID===============CP
Method: SET_TABLE_FOR_FIRST_DISPLAY of program CL_GUI_ALV_GRID===============CP
Form: PBO of program SAPLSLVC_FULLSCREEN
Edited by: VINMANO on Jul 22, 2009 2:54 PM

HI,
Its possible to call report program from Web dunpro...
chk out dis link,
calling report(se38) in webdynpro abap
By the way are using field symbol anywhere and left it unassigned?
Thanks,
Divya.S

Trigger report program if Z table field is modified/created

Hi,
I have a requirement where i want to run the report program ONLY if a particular field ( Dispatch date ) is modified or updated of a 'Z' Table ( Custom Table ).
The report program would fetch data from the same 'Z' table only for those records which are modified/updated. This data is then transferred to an application server.
1. How should i trigger the report program for the above requirement.
2. If a background program is to be created, then what should be the trigerring criteria & where it should be defined.
3. Do i need to set any change pointers etc.
Pointers to the above requirement would be very helpful.
Thanks in advance,
Best regards,
Prashant

hi prashant,
   i'm working on a similar query as that of ur's.
see the logic is as we proceed in ur case is DISPATCH DATE say are to be modified in the process of inserting 0r changing the contents of a ZTABLE.
so here the logic would be
loop at itab.
MODIFY ZTABLE FROM TABLE ITAB.
endloop.
This is the key reference in our logic .
now it is known that u have a ZTABLE with dispatch date
here the data element will be DATUM .
now in the ZTABLE go to DISPATCH DATE filed i.e its DATA ELEMET double click on data element DATUM .
now if u see here there will be a tick called as Checkbox on change document which is enabling the CDHDR and CDPOS.
*if its not checked get it checked in .
This is the source to the logic.
now what u need to do in ur logic part is
1. collect all the entries of the table.
(im not sure how many entries are there but try to get all the primary keys + one or two more fields so that the time is saved . this we do to check.
2. before the modify comes into affect see if u can store all the content of the table i.e step 1.
3.lets say we have modified the ZTABLE.
4.now collect all the entries i.e newly modified into new inttab with same logic as the basic primary key configurations + two fields .
5. let the two internal tables be compared and based on the comparision derive a new internal table as follows .
REPORT ztemp .
TYPES: BEGIN OF line,
          brand(10) TYPE c,
          rate(3)   TYPE p DECIMALS 2,
          gender(1) TYPE c,
          sno       TYPE i,
          desc(30) TYPE c,
        END OF line.
DATA: it_lines_1 TYPE TABLE OF line
                  WITH KEY brand
                           rate
                           gender,
       wa_lines_1 LIKE LINE OF it_lines_1.
DATA: it_lines_2 TYPE TABLE OF line
                  WITH KEY brand
                           rate
                           gender,
       wa_lines_2 LIKE LINE OF it_lines_2.
DATA: gi_counter TYPE i.
START-OF-SELECTION.
   PERFORM fill_it_line_1. " not included; tested with your 4 records
   SORT it_lines_1.
   CLEAR gi_counter.
   LOOP AT it_lines_1 INTO wa_lines_1.
     wa_lines_2 = wa_lines_1.
     ADD 1 TO gi_counter.
     AT END OF gender.
       IF gi_counter > 1.
         APPEND wa_lines_2 TO it_lines_2.
       ENDIF.
       CLEAR gi_counter.
     ENDAT.
   ENDLOOP.
This only works if you are able to define the fields of the internal table in this order, so with the key fields first in the right order. Otherwise the AT END OF will not work.
6. now if u can reach upto here then we need not create a background program .
7. u are exactly right change pointers will have to come into picture .
8 .then comes the picture of moving this content to application server using datasets etc.
hope this helps u in building the logic .
i would like to hear from other developers too in this regard.
Thanks and regards,
vijay.

Transporting the old report with modifications of InfoObejct

hai
I built the report on the InfoCube in DEVELOPMENT system and transport to QA system .
Then i changed the one InfoObejct in the InfoCube in DEVELOPMENT system and then change the InfoObejct in the reports also in DEVELOPMENT system.
Then i transported the report to QA system . But im getting the error says that
1) Old InfoObejct is not avialable in the InfoCube in the UBW
2) New InfoObejct also not avialbe in the InfoCube even though i transported the New InfoObject and Modified InfoCube .
So pleas tell me how to transport the modified report to the QA system .
Rizwan

Mohamed,
when transporting , make sure you collect the objects properly - drill down to the objects of the cube and see if your new infoobject is included. Also open the IOBJ and check the version to see if the requests match.
First - check the error logs in QA and see what exactly has happened.
Now collect the same in a new request taking care to collect all the objects and transport again.
Arun
Assign points if useful

How to copy/download all ABAP programs in a text with a single report ?

How to copy/download all ABAP programs in a text format with a single report/TC ?
How to copy/download ABAP source code with all include programs ?....
we need to search & copy all include programs everytime....

Hi,
check this link
downloading programs
Regards

How to Display 'purchase order text' in MM03 using report program

Hi Friends,
Can anybody suggest me how to display 'purchase order text' in MM03 using report program.
'Purchase order text' tab displays purchase long text of particular material .
I coded as:
      SET PARAMETER ID 'MXX' FIELD 'E'.
      SET PARAMETER ID 'MAT' FIELD k_final-matnr.
      SET PARAMETER ID 'WRK' FIELD k_final-werks.
      CALL TRANSACTION 'MM03' AND SKIP FIRST SCREEN.
It displays Purchasing tab other than Purchase Order Text tab of MM03.
Please suggest me how can i solve this.
Is there any parameter id to set values for Purchase Order text tab

>
Madhu Mano Chitra wrote:
> I want how to navigate to MM03 'Purchase Order text' tab/ view using ABAP code.
> could any suggest me
You can call a transaction and pass it a BDC table that tells it where you want it to go. You have to work out for yourself what to put into the BDC table. The code below works for tcode CATSSHOW.
DATA: bdcdata_wa TYPE bdcdata,
      bdcdata_tab TYPE TABLE OF bdcdata.
DATA opt TYPE ctu_params.
   CLEAR bdcdata_wa.
    bdcdata_wa-program = 'CATSSHOW'.
    bdcdata_wa-dynpro   = '1000'.
    bdcdata_wa-dynbegin = 'X'.
    APPEND bdcdata_wa TO bdcdata_tab.
    CLEAR bdcdata_wa.
    bdcdata_wa-fnam = 'SO_STATU-LOW'.
    bdcdata_wa-fval = '20'.
    APPEND bdcdata_wa TO bdcdata_tab.
    CLEAR bdcdata_wa.
    bdcdata_wa-fnam = 'ANDZEIT'.
    bdcdata_wa-fval = SPACE.
    APPEND bdcdata_wa TO bdcdata_tab.
    CLEAR bdcdata_wa.
    bdcdata_wa-fnam = 'PAST'.
    bdcdata_wa-fval = 'X'.
    APPEND bdcdata_wa TO bdcdata_tab.
    IF p_selscr = SPACE.
       CLEAR bdcdata_wa.
       bdcdata_wa-fnam = 'BDC_OKCODE'.
       bdcdata_wa-fval = '=ONLI'.
       APPEND bdcdata_wa TO bdcdata_tab.
    ENDIF.
    opt-dismode = 'E'.
    opt-defsize = 'X'.
CALL TRANSACTION 'CAPP' USING bdcdata_tab OPTIONS FROM opt.

How to transport the text elements in Reports?

need answer to this question.
how to transport the text elements in the reports?
Edited by: venkata kumar on Feb 18, 2008 1:33 PM

Hi Venkata,
Text Elements are a component/part of the SAP script and are not individual ABAP objects within the SAP environment hence they cannot be transported independently.
You would need to make changes in your text elements in the SAP script which would result in the SAP script being saved under a transport and moving the transport across the landscape would result in the text elements also getting transported.
In short: Move SAP script - to move text elements.
Cheers,
Aditya

How to Populate Internal table data to Table Control in a Report Program

Dear All,
       How to Populate Internal table data to Table Control in a Report Program? It is a pure report program with out any Module pool coding involved, which is just used to display data. Till now it is being displayed in a report. Now the user wants the data to be displayed in a table control. Could someone tell me how to go about with this.
Thanks in Advance,
Joseph Reddy

If you want to use a table control, you will need to create a screen.
In your report....
start-of-selection.
perform get_data. " Get all your data here
call screen 100. " Now present to the user.
Double click on the "100" in your call screen statement. This will forward navigate you to the screen. If you have not created it yet, it will ask you if you want to create it, say yes. Go into screen painter or layout of the screen. Use the table control wizard to help you along the process. It will write the code for you. Since it is an output only table control, it will be really easy with not a lot of code.
A better way to present the data to the user would be to give it in a ALV grid. If you want to go that way, it is a lot easier. Here is a sample of the ALV function module. You don't even have to create a screen.
report zrich_0004
       no standard page heading.
type-pools slis.
data: fieldcat type slis_t_fieldcat_alv.
data: begin of imara occurs 0,
      matnr type mara-matnr,
      maktx type makt-maktx,
      end of imara.
* Selection Screen
selection-screen begin of block b1 with frame title text-001 .
select-options: s_matnr for imara-matnr .
selection-screen end of block b1.
start-of-selection.
perform get_data.
perform write_report.
* Get_Data
form get_data.
select mara~matnr makt~maktx
            into corresponding fields of table imara
              from mara
               inner join makt
                 on mara~matnr = makt~matnr
                    where mara~matnr in s_matnr
                      and makt~spras = sy-langu.
endform.
* WRITE_REPORT
form write_report.
perform build_field_catalog.
* CALL ABAP LIST VIEWER (ALV)
call function 'REUSE_ALV_GRID_DISPLAY'
       exporting
            it_fieldcat = fieldcat
       tables
            t_outtab    = imara.
endform.
* BUILD_FIELD_CATALOG
form build_field_catalog.
data: fc_tmp type slis_t_fieldcat_alv with header line.
clear: fieldcat. refresh: fieldcat.
clear: fc_tmp.
fc_tmp-reptext_ddic    = 'Material Number'.
fc_tmp-fieldname = 'MATNR'.
fc_tmp-tabname   = 'IMARA'.
fc_tmp-outputlen = '18'.
fc_tmp-col_pos    = 2.
append fc_tmp to fieldcat.
clear: fc_tmp.
fc_tmp-reptext_ddic    = 'Material'.
fc_tmp-fieldname = 'MAKTX'.
fc_tmp-tabname   = 'IMARA'.
fc_tmp-outputlen = '40'.
fc_tmp-col_pos    = 3.
append fc_tmp to fieldcat.
endform.
Regards,
Rich Heilman

How to transport text in report programs

Similar Messages

Maybe you are looking for