Submit data to an ABAP program from an offline form

Question

Hello Forms experts,
the requirement goes like this: I have an internal table that will be passed to the form (via interface context) in the form the data will be changed by the user and the changes must be reflected in the internal table.-
I have to send back data from a table which data is modified inside a PDF form and send it back to an ABAP program for further process.
So far my development goes like this
- I have an ABAP program where I defined an internal table with the data to fill the table in the pdf form.
- I created an Interface that has one Import parameter (other than docparams) defined as the internal table that will have the data passed from this program to the form. this context interface object is bound to the form context and is put into the form layout by dragging and dropping from the data view. so the binding are done correctly.
- In my program I called the Function module that generates the form by using this function
    CALL FUNCTION 'FP_FUNCTION_MODULE_NAME'
        EXPORTING i_name = 'my_form_name'
       IMPORTING e_function_name = lv_function_name ....
this gives me the name of the function module associated to the form name I am passing by.
- I call the function module gave by the previous call
    CALL FUNCTION lv_function_name
        EXPORTING /1bcdwb/docparams = docparams
                           /1bcdwb/itable = itable
        IMPORTING
                          /1bcdwb/formoutput = formoutput
this will raise the pdf file preview where I can modify the data of some fields (not every field, due to key contrainst)
Now I have a problem, because in one hand the forums I read all talks about the Web Service using but to do it, I have to bind each table field to a field in the web service, loosing the bind from the internal table.
does the IMPORTING part in the CALL FUNCTION lv_function_name can have another parameter for the modified data in the form table so in my program i can get this object and continue working with the internal table ??
any suggestion, question, observation or comment is welcome.
in advance, thanks a lot.
EDIT:
Workaround:
download the pdf file into local computer. upload the file into the system and get the data from that pdf to update the data in the internal table... is that possible??
other option: Is there any chance to get the context attribute that represents the table from the interface context to the function module that called this form at the first place?
Edited by: Mauricio Poblete on Mar 23, 2010 10:17 PM

Answer 1

thanks everyone who reply this thread,
I tried several solutions: the standar one is to use the TRANSFORMATION method and modify the specifications in the ID object.
but the solution I took to do it was this one.
  DATA: lt_file_table TYPE filetable,
        lv_rc TYPE i,
        lv_filename TYPE string,
        lv_filelength TYPE i,
     lt_rawtab type STANDARD TABLE of ZSMSC_TAB.
        lt_rawtab TYPE TABLE OF char255.
  CALL METHOD cl_gui_frontend_services=>file_open_dialog
    CHANGING
      file_table              = lt_file_table
      rc                      = lv_rc
   USER_ACTION             =
   FILE_ENCODING           =
    EXCEPTIONS
      file_open_dialog_failed = 1
      cntl_error              = 2
      error_no_gui            = 3
      not_supported_by_gui    = 4
      OTHERS                  = 5.
  IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
           WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
  READ TABLE lt_file_table
       INTO lv_filename
       INDEX 1.
*lv_filename = p_pdf.
  cl_gui_frontend_services=>gui_upload(
    EXPORTING
      filename                = lv_filename
      filetype                = 'BIN'          "Binary
    IMPORTING
      filelength              = lv_filelength
    CHANGING
      data_tab                = lt_rawtab
    EXCEPTIONS
      file_open_error         = 1
      file_read_error         = 2
      no_batch                = 3
      gui_refuse_filetransfer = 4
      invalid_type            = 5
      no_authority            = 6
      unknown_error           = 7
      bad_data_format         = 8
      header_not_allowed      = 9
      separator_not_allowed   = 10
      header_too_long         = 11
      unknown_dp_error        = 12
      access_denied           = 13
      dp_out_of_memory        = 14
      disk_full               = 15
      dp_timeout              = 16
      not_supported_by_gui    = 17
      error_no_gui            = 18
      OTHERS                  = 19 ).
Get FP reference
  DATA: lo_fp TYPE REF TO if_fp VALUE IS INITIAL.
  lo_fp = cl_fp=>get_reference( ).
For handling exceptions
  DATA: lo_fpex TYPE REF TO cx_fp_runtime VALUE IS INITIAL.
  TRY.
  Create PDF Object using destination 'ADS' (<-- this is how it is
  defined in SM59)
      DATA: lo_pdfobj TYPE REF TO if_fp_pdf_object VALUE IS INITIAL,
            pdf_data TYPE xstring.
      CALL FUNCTION 'SCMS_BINARY_TO_XSTRING'
    EXPORTING
      input_length       = lv_filelength
  FIRST_LINE         = 0
  LAST_LINE          = 0
   IMPORTING
     buffer             = pdf_data
    TABLES
      binary_tab         = lt_rawtab
EXCEPTIONS
  FAILED             = 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.
      lo_pdfobj = lo_fp->create_pdf_object( connection = 'ADS' ).
  Set document
      lo_pdfobj->set_document(
        EXPORTING
          pdfdata = pdf_data ).
  Tell PDF object to extract data
      lo_pdfobj->set_extractdata( ).
  Execute the call to ADS
      lo_pdfobj->execute( ).
      DATA: xml_data TYPE xstring,
      lt_xml_data TYPE STANDARD TABLE OF xstring,
      t_return TYPE STANDARD TABLE OF bapiret2,
      t_per_info TYPE STANDARD TABLE OF smum_xmltb,
      lfs_per_info TYPE smum_xmltb,
      ls_zcrm_oppt_info  TYPE ZCRM_OPPT_INFO,
      lt_zcrm_oppt_info type ZCRMT_OPPT_INFO,
      tag_open TYPE TDSFFLAG.
      APPEND xml_data TO lt_xml_data.
      lo_pdfobj->get_data(
        IMPORTING
          formdata = xml_data ).
      CALL FUNCTION 'SMUM_XML_PARSE'
        EXPORTING
          xml_input = xml_data
        TABLES
          xml_table = t_per_info
          return    = t_return.
  LOOP AT t_per_info INTO lfs_per_info.
    CASE lfs_per_info-cname.
      WHEN 'OPPT_ID'.
        ls_zcrm_oppt_info-OPPT_ID = lfs_per_info-cvalue.
      WHEN 'EXPORT_STAMP'. "this is the last field in the record.
        ls_zcrm_oppt_info-EXPORT_STAMP = lfs_per_info-cvalue.
        append ls_zcrm_oppt_info to lt_zcrm_oppt_info.
        clear ls_zcrm_oppt_info.
        tag_open = ''.
      WHEN OTHERS.
    ENDCASE.
  ENDLOOP.
itable = lt_zcrm_oppt_info.
hope i solve another question.