Import/Export dynpro not working

Question

IMPORT DYNPRO h f e m ID id
http://help.sap.com/abapdocu_70/en/ABAPIMPORT_DYNPRO.htm
I would like to use IMPORT DYNPRO to import screen attributes and program flow and then perform necessary changes and export/generate the modified screen.
well i used the sample from http://www.sapfans.com/sapfans/repos/poonam.htm, but regardless of how many times I tried, I couldn't get it to work. I'm still stuck at the first step, IMPORT DYNPRO will return sy-subrc = 4 (screen does not exist) no matter what program/screen I use.
Any idea?, Thanks
Edited by: afro100 on Oct 22, 2009 9:45 AM
Edited by: afro100 on Oct 25, 2009 8:24 AM

Answer 1

See the following example
Double click on the method name; on the editor write the following code:
METHOD onactionaction_find .
  DATA: node_node_vbak           TYPE REF TO if_wd_context_node,
    elem_node_vbak                      TYPE REF TO if_wd_context_element,
    stru_node_vbak                        TYPE if_input_view=>element_node_vbak .
navigate from <CONTEXT> to <NODE_VBAK> via lead selection
  node_node_vbak = wd_context->get_child_node( name = if_input_view=>wdctx_node_vbak ).
get element via lead selection
  elem_node_vbak = node_node_vbak->get_element(  ).
get all declared attributes
  elem_node_vbak->get_static_attributes(
   IMPORTING static_attributes = stru_node_vbak ).
  DATA: ls_where(72) TYPE c,
        lt_where LIKE TABLE OF ls_where,
        lt_vbak TYPE STANDARD TABLE OF zstr_vbak.
create where condition
  IF NOT stru_node_vbak-vbeln EQ ''.
    CONCATENATE 'VBELN = ''' stru_node_vbak-vbeln '''' INTO ls_where.
    APPEND ls_where TO lt_where.
  ENDIF.
  IF NOT stru_node_vbak-erdat EQ '00000000'.
    CONCATENATE 'ERDAT = ''' stru_node_vbak-erdat '''' INTO ls_where.
    IF stru_node_vbak-vbeln NE ''.
      CONCATENATE 'AND' ls_where INTO ls_where SEPARATED BY space.
    ENDIF.
    APPEND ls_where TO lt_where.
  ENDIF.
  SELECT VBELN ERDAT ERZET ERNAM ANGDT BNDDT AUDAT VBTYP TRVOG AUART
         AUGRU GWLDT SUBMI LIFSK FAKSK NETWR WAERK VKORG VTWEG SPART
         VKGRP VKBUR GSBER GSKST GUEBG GUEEN KNUMV
  FROM vbak INTO TABLE lt_vbak WHERE (lt_where).
  DATA:
    node_node_alv                       TYPE REF TO if_wd_context_node,
    stru_node_alv                       TYPE if_input_view=>element_node_alv .
navigate from <CONTEXT> to <NODE_ALV> via lead selection
  node_node_alv = wd_context->get_child_node( name = if_input_view=>wdctx_node_alv ).
get all declared attributes
  node_node_alv->bind_table( lt_vbak ).
ENDMETHOD