To find name for standard smartform of purchase order in Tcode me21n.......

Question

Please do not offer rewards
Hi Abapers,
             I had doubt, regarding how to find the name of standard smartform available for purchase order in tcode - ME21N.
          After executing ME21N, n print preview i get a form without logo. So i want to customize the form according to my clients requirement.For this i want to know the Smartform name, so tat i can copy to 'Z.....' and make the customization.
          Can anybody assist me overcome this problem of how to find out the name of smartform without knwing functionmodule name also....
            <<Text removed>>
Advanced Thanks..............
Edited by: Matt on Mar 25, 2009 10:26 AM

Answer 1

DESIGN ONE SMARTFORM AS PERUR NEED.
DRIVER PROGRAM FOR THISIS
*& ZSAPFM06P
&----     Print of a PO by SMART FORMS               *
*& Purchase order printing program
&----      FORM ENTRY
SmartForm from customizing table TNAPR
determine smartform function module for invoice
                variant            = ' '
                direct_call        = ' '
control-no_open   = 'X'.
control-no_close  = 'X'.
call smartform invoice
                     archive_index        = toa_dara
                     archive_parameters   = arc_params
                mail_appl_obj        =
                     mail_recipient       = ls_recipient
                     mail_sender          = ls_sender
                     output_options       = ls_composer_param
                     is_bil_invoice       = ls_bil_invoice
                     is_repeat            = repeat
          importing  job_output_info      = ls_job_info
                    document_output_info =
                    job_output_options   =
  error handling
   message id sy-msgid type sy-msgty number sy-msgno
           with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
analyse internal error table of Smart Forms
  add your handling
REPORT ZSAPFM06P.
TABLES: TNAPR,
        nast.
DATA: lf_fm_name TYPE rs38l_fnam,
      lf_formname TYPE  tdsfname,
      control type ssfctrlop,
      errtab  type tsferror.
FORM entry_neu using ent_retco ent_screen.
  lf_formname = tnapr-sform.
    CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
         EXPORTING  formname           = lf_formname
         IMPORTING  fm_name            = lf_fm_name
         EXCEPTIONS no_form            = 1
                    no_function_module = 2
                    OTHERS             = 3.
    IF sy-subrc <> 0.
      message id sy-msgid type sy-msgty number sy-msgno
            with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.
  control-no_dialog = 'X'.
  control-preview   = 'X'.
  control-langu     = sy-langu.
      CALL FUNCTION lf_fm_name
           EXPORTING
                       control_parameters   = control
                       user_settings        = 'X'
                       is_nast              = nast
           EXCEPTIONS formatting_error     = 1
                      internal_error       = 2
                      send_error           = 3
                      user_canceled        = 4
                      OTHERS               = 5.
  if sy-subrc <> 0.
    ent_retco = 0.
  else.
    ent_retco = 0.
  endif.
  call function 'SSF_READ_ERRORS'
       importing
            errortab = errtab.
  if not errtab is initial.
  endif.
ENDFORM.
DEFINE UR PROGRAM NAME AND SMARTFORM NAME IN NACE.