Importing preconfig'd smart forms in ECC 6.0

I've done some searching, but wanted to see if anybody had a better solution.. it looks like you have to load the best practices baseline package in order to get the preconfigured smart forms in ECC 6.0.  Is there ANY way to avoid having to do this and just be able to load the forms?  Can you use the .SAR from the 4.7 preconfig CD on a 6.0 system or will that spell disaster?

I've gotten to that point, but at this time I have the 6.0 (2.600) best practices installation files, and the 4.70 smartforms installation files... however the first requires a best practices installation, and the second is a .SAR file which I believe can be loaded with SAINT/SPAM. 
What I am trying to figure out is if there's a way to just extract the forms themselves out of the package so they can be uploaded rather than having to go through the prereq's for best practices and deal with the slew of OSS notes associated.

Similar Messages

  • Error in calling/converting smart form from ECC to pdf in portal.

    Hi,
    We have a requirement in our project where we have to show IT form in portal exactly in the way payslip are shown in ESS
    Screen, that is in the pdf form in ess portal screen.
    For this my HR abap consultant has made one customize smart form which is being called from a RFC FM.
    After the FM lf_fm_name gets executed , the OTF data is being captured and then converted in to PDF.
    After that the PDF is then converted into XSTRING format which is then supplied to the portal side through export parameter
    of the RFC.
    Now when we debugged the RFC, the conversion is taking place perfectly fine in to XSTRING.This is wat we assume.
    Portal Side: I have used Iframe ui ELEMENT in my webdynpro java and its property source I have binded with a value attribute
    of type string and I am executing above customize RFC given to me by my HR abap consultant and after executing that RFC with
    userID and payroll year as its import parameter I am taking export parameter of that RFC with name pdf_string of type XSTRING
    of that RFC into my webdynpro java value attribute which i binded to source property of Iframe.
    Now when we see the output in portal , first of all pdf is not getting generated and its showing the error message:
    file does not begin with '%pdf-' and secondly errored Adobe form getting opened outside Iframe window its not coming within
    Iframe window like what payslip comes inside Iframe UI element.
    I want to know what mistake we are doing in our ABAP coding or portal coding.
    Please help.

    Hi Satyam,
    You can use the existing SAP GRT framework for developing the app.
    Its easy and provides more features.
    See this wiki:
    http://wiki.sdn.sap.com/wiki/display/WDJava/HowtodevelopcustomWebDynproESSapplicationsusingGenericReportingTool%28GRT%29
    Regards
    Yugandhar Reddy

  • Smart form in ECC 6.0

    Hi All,
    Does Smart form support Warehouse Management Module in ECC 6.0.
    Please let me know its urgent.
    Thanks.
    Khan

    Hi All,
    Does Smart form support Warehouse Management Module in ECC 6.0.
    Please let me know its urgent.
    Thanks.
    Khan

  • Preconfigured Smart Forms for ECC 6

    Hi
    Can any one tell me if there are any pre configured Smart Forms available for ECC6. I searched in Service market palce but found that preconfigured Smartform are available for ECC 5 but not for ECC6.
    Also can u tell me if Adobe document services or PDF forms are available free for customers or there is any license required to use them for ECC6?
    Thanks in Advance
    Atul Mohite

    This <a href="https://www.sdn.sap.comhttp://www.sdn.sap.comhttp://www.sdn.sap.com/irj/sdn/adobeforms?rid=/library/uuid/2a8a0a37-0301-0010-f794-aecd1bb426e0">link</a> might partly answer your question.
    ~Suresh

  • SMART FORM: HOW TO IMPORT STYLES IN SMART FORM

    Hi Experts,
                im working in verion 6.0 . how to import styles in my smart form.
    in 6.0 im not finding the label styles were we import the styles. so plz experts help me in this.
    plz show me the path step by step.
    Thnaks & regards
    Sunita.

    Hi Arpit,
           Thnx for ur early reply .here in 6.0 i cant find the styles option .yeah in 4.6 or 4.7 we find in the output options.but in 6.0 im unable to find so plz help me.
    Thnaks & regards
    Sunita

  • How to get material number in smart form driver prog attached to MM01:NACE?

    Hi,
    I have attached driver program of smart form to MM01 usinfg nace.
    On save smart form should get generated.
    Can anybody guide me how to get material number from MM01 in driver program on saving MM01.
    as of now am not getting values in smart form.
    What additional lines to be coaded in driver program to get material number.
    Thanks.

    hi,
    use nast table in your import paramaters of smart forms.
    In the Nast table you can find a field with object key which holds the Material Number.
    Hope this helps.
    Thanks,
    subash

  • Smart Forms and BI report

    Hi Experts,
        I want to know whether we can call a BI report into a Smart Form in ECC. I mean can we populate the fields of the smart form with the contents of the BI report.
    Thanks,
    SB.

    refer:
    https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/1afbc36e-0c01-0010-a2af-ef7bd9c5aa40
    it can be only used with NW04s

  • Smart form Addon after Upgrade to ECC 6 EHP4

    Hi,
    I have succesfully upgraded my system from R/3 4.7 EXT 1 to ECC 6 EHP4.
    During upgrade i had to delete Pre configured smart forms Addon ( According to note 572392 ) .
    Since we are on EHP4 and no smart forms configured we are not able to print.
    The latest pre configured smart form addon ( Best Practice all in one)  available is for EHP3.
    Please let me how to proceed with this situation as there may be other compaines who are on EHP4 and use pre configured smart forms.
    Appreciate your help.
    Thanks,
    FBK

    If you have old system copy try to copy forms into the new.
    Kind regards,
    Mirek

  • Smart forms - COMPLEX SELECTION node in ECC 6.0

    HI ABAPers ,
        Where we can find the COMPLEX SELECTION node in ECC 6.0 ..
    i searched but not able to find .. can you plaese  guide me
    regards
    ravi
    Edited by: Julius Bussche on Feb 18, 2009 9:52 AM
    Please use meaningfull subject titles

    Hi Ravichandra,
    You will find the similar threads and search in SDN
    Re: Complex Section in Smart Form
    Re: complex section of main window :  smart forms
    Regards,
    Sravanthi

  • ECC 6.0 wants to use smart forms .

    Hi Friends,
    I have a requirement to generate a PO, I want to use smartforms, As I am new to it I dont know what is the form name and respective driver program. I am using ECC 6.0. please let me know .
    Thanks in advance.
    Sagar.

    Hi,
    As a functional consultant, we are not going to do much with the smart forms. The smart forms will be developed by the technical team and it will be attached to the PO output type.
    To view the link please follow the following the steps.
    1. Execute NACE transaction code
    2. Select EF for purchase order
    3. Select Output types below the status bar
    4. Select output type as NEU, in our system if you customized a output type, you can select that
    5. Select Processing routines at the left control panel.
    6. Where you can see the Medium of Print output is linked to either form or the smart form.
    If it is blank speak with your technical team for assigning the same.
    Regards,
    RitiG

  • Declaration for smart form importing structure

    Hi to all experts,
    I have to create a structure for smart form to declare it in the smart form interface (importing ) .The structure should be of the type below. I tried but getting type mismatch dump ....please help
    DATA: BEGIN OF ZISEG OCCURS 20.
            INCLUDE STRUCTURE ISEG.
    DATA: BTEXT LIKE T064B-BTEXT.          
    DATA: GIDAT LIKE IKPF-GIDAT.          
    DATA: MAKTX LIKE MAKT-MAKTX.        
    DATA: STEXT LIKE T064T-STEXT.        
    DATA: NAME1 LIKE T001W-NAME1.
    DATA: END OF ZISEG.

    Hi Abdul,
    sorry my answer was incomplete.You need to declare two structures,one for u r data retrival(including other 4 fields) and other for the smartform(same as DDIC structure).After retrieving you need to transfer the data from one table to other.
    Hope u got what Iam trying to say,if not PLZ rewert back.
    Thanks & Regards,
    Rock.

  • Creating a Purchase Order Smart Form (Form Interface)

    After reading up on all the posts about making a PO smart form I know this:
    - An SAP script "medruck" is the current output
    - A smartform exists for PO's named "/SMB40/MMPO_L" or "/SMB40/MMPO_A"
    - You need to install an update to get those smartforms if you are using ECC 6.0
    So my dilemma is that the SAP administrator is on vacation for a week, so I can't install the update to our system.  I'm trying to just create it from scratch using the medruck SAP script as a reference, but I am a little confused.
    Basically all I need to know is what form interface parameters do I pass in?  Meaning how do I find out what structures and tables are imported into the function module when print preview is called from t-code ME22N?  Can you please provide proper syntax for form interface solution or instructions on how to determine imported variables into the smartform?

    Hi
    If the smartform purchase order is not available in your system
    means you can download the form IDES and you can upload the form in ur ecc 6.0 system.we faced a similar kind of problem in our system and we did as i said.
    Once you uploaded the things you can easily view the form interface and rest of the things related to smartforms.
    Thanks and Regards
    Arun Joseph

  • Smart Form implementation

    Hello,
    I would like to set up the smart form in SRM.
    Since there is in our R/3 backend a Smart form for PO, I would ask if I can import this Smart form from R/3 to SRM.
    Could you please describe the detailed step to integrate the R/3 PO smart form in SRM.
    SRM 4.0 Extended classic scenario
    Regards,
    Shaiek

    Hi,
    Create a Remote enabled FM in ECC and import parameters of smartform in FM.
    Now put this code inside the FM
      DATA lv_smartform       TYPE rs38l_fnam.
      DATA ls_ssfctrlop       TYPE ssfctrlop. 
      DATA ls_output_options  TYPE ssfcompop. 
      DATA ls_job_output_info TYPE ssfcrescl. 
      DATA lt_lines           TYPE STANDARD TABLE OF tline. 
      DATA lv_bin_filesize    TYPE i. 
      DATA lv_pdf_xstring     TYPE xstring. 
    * -- Get the name of the smartform function module 
      CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME' 
        EXPORTING 
          formname = 'ZMY_SMARTFORM' 
        IMPORTING 
          fm_name  = lv_smartform. 
    * -- Call the smartform 
      ls_ssfctrlop-no_dialog = abap_true. 
      ls_ssfctrlop-getotf    = abap_true. 
      ls_output_options-tdprinter = 'PDF1'. 
      CALL FUNCTION lv_smartform 
        EXPORTING 
          control_parameters = ls_ssfctrlop 
          output_options     = ls_output_options 
          custom_input       = ls_your_custom_smartform_input 
        IMPORTING 
          job_output_info    = ls_job_output_info 
        EXCEPTIONS 
          OTHERS             = 0. 
    * -- Convert the OTF data to xstring 
      CALL FUNCTION 'CONVERT_OTF' 
        EXPORTING 
          format       = 'PDF' 
        IMPORTING 
          bin_filesize = lv_bin_filesize 
          bin_file     = lv_pdf_xstring
        TABLES 
          otf          = ls_job_output_info-otfdata[] 
          lines        = lt_lines 
        EXCEPTIONS 
          OTHERS       = 0. 
    Now, export the  lv_pdf_xstring  to the SRM system.
    In srm print the pdf by using
    cl_wd_runtime_services=>attach_file_to_response( 
        i_filename       = 'mypdf.pdf' 
        i_content        = lv_pdf_xstring 
        i_mime_type      = 'application/pdf' 
    Thanks & regds
    Pksurya

  • SMART FORMS

    i have copied a driver programe of outbound delivery and modified in such a way the layout will convert to pdf and then download to pc, but the driver program is not executing online, so do i need to attache the driver program name and form name in nace t.code or how would i execute the program, when i am placing a break point in driver program and execute form its not stopping at break point, i am new to forms, help me out in this.
    i have placed the code below plz verify it and say if any thing is wrong in the code, u will be shurely rewareded.
         Print of a delivery note by SAPscript SMART FORMS               *
    REPORT Z_RLE_DELNOTE1.
    declaration of data
    INCLUDE Z_RLE_DELNOTE_DATA_DECLARE1.
    *INCLUDE RLE_DELNOTE_DATA_DECLARE.
    definition of forms
    INCLUDE Z_RLE_DELNOTE_FORMS1.
    *INCLUDE RLE_DELNOTE_FORMS.
    INCLUDE Z_RLE_PRINT_FORMS1.
    *INCLUDE RLE_PRINT_FORMS.
          FORM ENTRY
    FORM ENTRY USING RETURN_CODE US_SCREEN.
      DATA: LF_RETCODE TYPE SY-SUBRC.
      XSCREEN = US_SCREEN.
      PERFORM PROCESSING USING    US_SCREEN
                         CHANGING LF_RETCODE.
      IF LF_RETCODE NE 0.
        RETURN_CODE = 1.
      ELSE.
        RETURN_CODE = 0.
      ENDIF.
    ENDFORM.
          FORM PROCESSING                                               *
    FORM PROCESSING USING    PROC_SCREEN
                    CHANGING CF_RETCODE.
      DATA: LS_PRINT_DATA_TO_READ TYPE LEDLV_PRINT_DATA_TO_READ.
      DATA: LS_DLV_DELNOTE        TYPE LEDLV_DELNOTE.
      DATA: LF_FM_NAME            TYPE RS38L_FNAM.
      DATA: LS_CONTROL_PARAM      TYPE SSFCTRLOP.
      DATA: LS_COMPOSER_PARAM     TYPE SSFCOMPOP.
      DATA: LS_RECIPIENT          TYPE SWOTOBJID.
      DATA: LS_SENDER             TYPE SWOTOBJID.
      DATA: LF_FORMNAME           TYPE TDSFNAME.
      DATA: LS_ADDR_KEY           LIKE ADDR_KEY.
    *Begin of changes by 67.
      DATA:   ls_document_output_info TYPE ssfcrespd,
              ls_job_output_options TYPE ssfcresop.
    *End of changes by 67.
    SmartForm from customizing table TNAPR
      LF_FORMNAME = TNAPR-SFORM.
    determine print data
      PERFORM SET_PRINT_DATA_TO_READ USING    LF_FORMNAME
                                     CHANGING LS_PRINT_DATA_TO_READ
                                     CF_RETCODE.
      IF CF_RETCODE = 0.
    select print data
        PERFORM GET_DATA USING    LS_PRINT_DATA_TO_READ
                         CHANGING LS_ADDR_KEY
                                  LS_DLV_DELNOTE
                                  CF_RETCODE.
      ENDIF.
      IF CF_RETCODE = 0.
        PERFORM SET_PRINT_PARAM USING    LS_ADDR_KEY
                                CHANGING LS_CONTROL_PARAM
                                         LS_COMPOSER_PARAM
                                         LS_RECIPIENT
                                         LS_SENDER
                                         CF_RETCODE.
      ENDIF.
    *Begin of changes by 67.
    CALL FUNCTION 'SSF_GET_DEVICE_TYPE'
      EXPORTING
        i_language                  = v_language
       I_APPLICATION                = 'SAPDEFAULT'
    IMPORTING
       E_DEVTYPE                    = v_e_devtype
    st_output_options-tdprinter = v_e_devtype.
    *st_output_options-tdprinter = 'locl'.
    LS_CONTROL_PARAM-no_dialog = 'X'.
    LS_CONTROL_PARAM-getotf = 'X'.
    *End of changes by 67.
      IF CF_RETCODE = 0.
    determine smartform function module for delivery note
        CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
             EXPORTING
                      FORMNAME           = LF_FORMNAME
                    variant            = ' '
                    direct_call        = ' '
             IMPORTING
                      FM_NAME            = LF_FM_NAME
             EXCEPTIONS
                        NO_FORM            = 1
                        NO_FUNCTION_MODULE = 2
                        OTHERS             = 3.
        IF SY-SUBRC <> 0.
      error handling
          CF_RETCODE = SY-SUBRC.
          PERFORM PROTOCOL_UPDATE.
        ENDIF.
      ENDIF.
      IF CF_RETCODE = 0.
      call smartform delivery note
        CALL FUNCTION LF_FM_NAME
             EXPORTING
                      ARCHIVE_INDEX        = TOA_DARA
                      ARCHIVE_PARAMETERS   = ARC_PARAMS
                      CONTROL_PARAMETERS   = LS_CONTROL_PARAM
                    mail_appl_obj        =
                      MAIL_RECIPIENT       = LS_RECIPIENT
                      MAIL_SENDER          = LS_SENDER
                      OUTPUT_OPTIONS       = LS_COMPOSER_PARAM
                      USER_SETTINGS        = ' '
                      IS_DLV_DELNOTE       = LS_DLV_DELNOTE
                      IS_NAST              = NAST
    *Begin of changes by 67.
          importing
                     document_output_info = ls_document_output_info      "67
                     job_output_info      = tab_otf_data
                     job_output_options   = ls_job_output_options        "67
           EXCEPTIONS
                      FORMATTING_ERROR     = 1
                      INTERNAL_ERROR       = 2
                      SEND_ERROR           = 3
                      USER_CANCELED        = 4
                      OTHERS               = 5.
    *End of changes by 67.
        IF SY-SUBRC <> 0.
      error handling
          CF_RETCODE = SY-SUBRC.
          PERFORM PROTOCOL_UPDATE.
        get SmartForm protocoll and store it in the NAST protocoll
          PERFORM ADD_SMFRM_PROT.                  "INS_HP_335958
        ENDIF.
      ENDIF.
    get SmartForm protocoll and store it in the NAST protocoll
    PERFORM ADD_SMFRM_PROT.                       DEL_HP_335958
    --Function  modules conversts from otf to pdf format.--
    *Begin of chanes by 67.
    CALL FUNCTION 'CONVERT_OTF_2_PDF'
    EXPORTING
      USE_OTF_MC_CMD               = 'X'
      ARCHIVE_INDEX                =
    IMPORTING
       BIN_FILESIZE                 = v_bin_filesize
      TABLES
        otf                          = v_tab_otf_final
        doctab_archive               = v_it_docs
        lines                        = v_it_lines
    EXCEPTIONS
      ERR_CONV_NOT_POSSIBLE        = 1
      ERR_OTF_MC_NOENDMARKER       = 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.
    CALL FUNCTION 'GUI_DOWNLOAD'
      EXPORTING
       BIN_FILESIZE                    = v_bin_filesize
       filename                        = 'D:\67.PDF'
       FILETYPE                        = 'BIN'
      APPEND                          = ' '
      WRITE_FIELD_SEPARATOR           = ' '
      HEADER                          = '00'
      TRUNC_TRAILING_BLANKS           = ' '
      WRITE_LF                        = 'X'
      COL_SELECT                      = ' '
      COL_SELECT_MASK                 = ' '
      DAT_MODE                        = ' '
      CONFIRM_OVERWRITE               = ' '
      NO_AUTH_CHECK                   = ' '
      CODEPAGE                        = ' '
      IGNORE_CERR                     = ABAP_TRUE
      REPLACEMENT                     = '#'
      WRITE_BOM                       = ' '
      TRUNC_TRAILING_BLANKS_EOL       = 'X'
    IMPORTING
       FILELENGTH                      = v_file_size
      tables
        data_tab                       = v_pdf_tab
      FIELDNAMES                      =
    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 i001(z00) WITH 'File not downloaded succesfully'.
      else.
      MESSAGE i002(z00) WITH 'File 67.PDF downloaded succesfully under D: drive'.
    ENDIF.
    *End of changes by 67.
    ENDFORM.

    Hi,
    Make sure that the output type you are using is configured for your custom-copied program name, form routine, and the form you are using. The output types can be found in transaction NACE.
    Award points if found helpful.
    Thanks,
    Leo

  • Email PDF smart form Support Desk

    Hi SDN,
    I'm working on support desk - solution manager, and i need to send the solution of the support message by email to the final user.
    There is an standard action (SLF1 -SMSD_SERVICE_ORDER_DNO_OUTPUT)  that sends the solution in pdf format by email, but we couldn't set the receivers online.
    So, I'm using an "z" action that executes an smart form, and i would like to send the smart form in pdf format by the internet.
    I'd like to use fm SO_DYNP_OBJECT_SEND, because the user must fill the receivers on-line
    So far i have de OTF, and i know that i can make a conversion to pdf format, but i've the following problem
    - the pdf in attach is empty, it may be because of the format, or may be i'm not using correctly this function.
    Thanks in advance,
    Maria João Rocha
          call function 'CONVERT_OTF'
            exporting
               format                = 'PDF'
            importing
              bin_filesize          = w_pdf_size
            tables
              otf                   = es_job_output_info-otfdata[]
              lines                 = t_pdf[]
            exceptions
              err_max_linewidth     = 1
              err_format            = 2
              err_conv_not_possible = 3
              err_bad_otf           = 4
              others                = 5.
    * header
          wa_head-objnam = 'EMAIL'.
          wa_head-objdes = ls_output_options-tdtitle.
          wa_head-objnam = ls_output_options-tdtitle.
          wa_head-objla = sy-langu.
          wa_head-objsns = 'O'.
          wa_head-file_ext = 'TXT'.
          append wa_head to t_head.
          wa_packing_list-transf_bin = 'X'.
          wa_packing_list-head_start = 1.
          wa_packing_list-head_num = 0.
          wa_packing_list-body_start = 1.
          wa_packing_list-objtp = 'RAW'.
    *      wa_packing_list-objtp = 'EXT'.
          wa_packing_list-objdes = ls_output_options-tdtitle.
          wa_packing_list-objla = sy-langu.
          wa_packing_list-objlen = w_pdf_size.
          wa_packing_list-file_ext = 'PDF'.
          append wa_packing_list to t_packing_list.
    *---------- enviar o mail
          call function 'SO_DYNP_OBJECT_SEND'
            exporting
    *            object_hd_change           = ls_output_options-tdtitle
              object_type                = 'RAW'
    *            originator_type            = 'B'
    *            originator                 = sy-uname
    outbox_flag      = 'S'
            tables
    *            objcont                    = t_text
    *            receivers                  = t_receivers
              packing_list               = t_packing_list
              att_cont                   = t_cont
              att_head                   = t_head
            exceptions
              active_user_not_exist      = 1
              communication_failure      = 2
              component_not_available    = 3
              folder_not_exist           = 4
              folder_no_authorization    = 5
              forwarder_not_exist        = 6
              note_not_exist             = 7
              object_not_exist           = 8
              object_not_sent            = 9
              object_no_authorization    = 10
              object_type_not_exist      = 11
              operation_no_authorization = 12
              owner_not_exist            = 13
              parameter_error            = 14
              substitute_not_active      = 15
              substitute_not_defined     = 16
              system_failure             = 17
              too_much_receivers         = 18
              user_not_exist             = 19
              x_error                    = 20
              others                     = 21.
        endif.

    Thanks for your reply.
    I'm working on it, and I’ve seen the SCOT documentation, so I've change my strategy.
    Right now I'm using some of the methods of the BOR.
    I think I've to code because I want a popup to introduce the list of the receivers and the mail body, and of course I want to attach a smart form on pdf format.
    But I can’t send the mail because of the error: Erro interno: SO_OBJECT_MIME_GET Exceção: 2
    Can you help me on this? What I’m doing wrong? What document class I need to use on the “AttachmentType”?
    Thanks in advance.
    Best regards,
    Maria João Rocha
    FUNCTION Z_MAIL_DIALOGO.
    *"*"Interface local:
    *"  IMPORTING
    *"     REFERENCE(TITULO) TYPE  SOOD1-OBJDES OPTIONAL
    *"     REFERENCE(FILE_SIZE) TYPE  SOOD1-OBJLEN OPTIONAL
    *"  TABLES
    *"      OTF TYPE  TSFOTF OPTIONAL
    *"      PDF STRUCTURE  TLINE OPTIONAL
    *"      CONTEXT TYPE  SOLI_TAB OPTIONAL
    * Makros für Zugriff aufs BOR
    include <cntn01>.
    *parameters: dialog like sonv-flag.
    data: dialog like sonv-flag.
    * Datendeklaration
    data: message type swc_object.
    data: recipient type swc_object.
    data: recip_tab type swc_object occurs 1 with header line.
    data: objkey like swotobjid-objkey.
    data: content like soli-line occurs 0 with header line.
    data: title(80).
    data: persnumber like adcp-persnumber.
    data: sent_to_all like sonv-flag,
          object_list like sosndinf occurs 1 with header line.
    data: t_otf type standard table of ITCOO.
    data: itab like soli occurs 0.
    * Deklaration eines Containers
    swc_container container.
    * Message-Objekt anlegen
    * * Neues Message-Objekt generieren
    swc_create_object message 'Message' space.
    swc_clear_container container.
    if dialog = space.
    * * Create w/o dialog
      concatenate 'Mensagem Support Desk' sy-datum sy-uzeit into title
               separated by '/'.
      swc_set_element container 'DOCUMENTTITLE' title.
      swc_set_element container 'DOCUMENTNAME' 'Support Desk'.
    *  swc_set_element container 'DOCUMENTTYPE' 'INT'.
    *  swc_set_element container 'DOCUMENTTYPE' 'SCR'.
      swc_set_element container 'DOCUMENTTYPE' 'OTF'.
      swc_set_element container 'NO_DIALOG' 'X'.
    else.
    * * Create with dialog
      swc_set_element container 'NO_DIALOG' ' '.
    endif.
    swc_call_method message 'Create' container.
    perform error_handling(rssobcitest11).
    * Create attachment (RAW document from internal table)
    SWC_CLEAR_CONTAINER CONTAINER.
    *att_bor_obj-objtype = 'MESSAGE'.
    *swc_set_element container 'ATTACHMENT' pdf.
    *swc_set_element container 'ATTACHMENT' otf.
    swc_set_element container 'ATTACHMENT' context.
    swc_set_element container 'ATTACHMENTTITLE' 'Anexo'.
    swc_set_element container 'AttachmentType' 'OTF'.
    *swc_set_element container 'DocumentSize' 0.
    swc_set_element container 'DocumentSize' file_size.
    *swc_set_table container 'DocumentContent' itab.
    SWC_CALL_METHOD MESSAGE 'Attach' CONTAINER.
    PERFORM ERROR_HANDLING(RSSOBCITEST11).
    *SWC_CLEAR_CONTAINER CONTAINER.
    *SWC_SET_ELEMENT CONTAINER 'EditorSettings' 'D'.
    *SWC_SET_ELEMENT CONTAINER 'STARTING_AT_X' '5'.
    *SWC_SET_ELEMENT CONTAINER 'STARTING_AT_Y' '5'.
    *SWC_SET_ELEMENT CONTAINER 'EnableApplObjAttachments' 'X'.
    *SWC_CALL_METHOD MESSAGE 'EditRecipientList' CONTAINER.
    *PERFORM ERROR_HANDLING(RSSOBCITEST11).
    * Einen Empfänger (interner Benutzer) automatisch hinzufügen
    * Recipient-Objekt anlegen
    swc_clear_container container.
    swc_create_object recipient 'Recipient' space.
    swc_set_element container 'AddressString' sy-uname.
    swc_set_element container 'TypeId' 'B'.
    swc_call_method recipient 'CreateAddress' container.
    perform error_handling(rssobcitest11).
    * Kopie des Recipient-Objekts anfügen
    swc_clear_container container.
    swc_set_element container 'NewRecipient' recipient.
    swc_call_method message 'AddCopyOfRecipient' container.
    perform error_handling(rssobcitest11).
    * Outbox-Flag setzen
    swc_clear_container container.
    swc_set_element container 'OutboxFlag' 'X'.
    swc_call_method message 'SetOutboxFlag' container.
    perform error_handling(rssobcitest11).
    * Empfängerliste editieren
    swc_clear_container container.
    swc_call_method message 'EditRecipientList' container.
    perform error_handling(rssobcitest11).
    swc_get_table container 'RecipientsInfo' object_list.
    if sy-subrc = 8.
    * Kopiertes Message-Objekt versenden
      swc_clear_container container.
      swc_call_method message 'Submit' container.
      perform error_handling(rssobcitest11).
      swc_get_table container 'RecipientsInfo' object_list.
    endif.
    swc_get_element container 'SentToAll' sent_to_all.
    * Kopiertes Message-Objekt sichern
    swc_clear_container container.
    swc_call_method message 'Save' container.
    perform error_handling(rssobcitest11).
    * Protokollausgabe:
    * Key des Message-Objekts ermitteln
    *SWC_GET_OBJECT_KEY MESSAGE OBJKEY.
    *WRITE: / 'Key des Messageobjekts', OBJKEY.
    * Protokollausgabe:
    perform write_recipient_info(rssobcitest11) tables object_list
                                                using  sent_to_all.
    * Freigeben der Referenzen
    * MESSAGE-Objekt
    swc_free_object message.
    * RECIPIENT-Objekt
    swc_free_object recipient.
    commit work.
    ENDFUNCTION.

Maybe you are looking for