Thanks again.
Ya..followup is created without the product and quantity.
Please find my below code.
ls_orderadm_h-process_type = 'ZOR'.
ls_input_names-fieldname = 'PROCESS_TYPE'.
INSERT ls_input_names INTO TABLE ls_input_field-field_names.
* add to header data
ls_orderadm_h-guid = lv_header_guid .
INSERT ls_orderadm_h INTO TABLE lt_orderadm_h_hlp.
* add to input fields
ls_input_field-objectname = 'ORDERADM_H'.
ls_input_field-ref_handle = '100'.
INSERT ls_input_field INTO TABLE lt_input_field.
REFRESH ls_input_field-field_names.
ls_predecessor-pred_guid = lv_header_ref.
ls_predecessor-handle = ls_orderadm_h-handle.
INSERT ls_predecessor INTO TABLE lt_predecessor.
CALL FUNCTION 'CRM_COPY_PROCESS_PREPARE'
EXPORTING
it_orderadm_h = lt_orderadm_h_hlp
it_orderadm_i_ref = lt_orderadm_i_ref
it_predecessor = lt_predecessor
iv_vona_kind = 'A'
IMPORTING
* ET_DOC_FLOW =
et_orderadm_i = lt_orderadm_i
et_orderadm_h = lt_orderadm_h
CHANGING
ct_input_fields = lt_input_field
* EXCEPTIONS
* ERROR_OCCURRED = 1
* OTHERS = 2
.
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.
DATA :lt_doc_link3 TYPE crmt_doc_flow_extdt,
ls_doc_link3 TYPE crmt_doc_flow_extd,
lt_input_field1 TYPE crmt_input_field_tab,
ls_input_field1 TYPE crmt_input_field,
ls_inputnames1 TYPE crmt_input_field_names,
lt_inputnames1 TYPE crmt_input_field_names_tab.
BREAK-POINT.
CALL FUNCTION 'CRM_ORDER_MAINTAIN'
* EXPORTING
* IMPORTING
* ET_EXCEPTION =
CHANGING
ct_orderadm_h = lt_orderadm_h
ct_orderadm_i = lt_orderadm_i
ct_input_fields = lt_input_field
* CV_LOG_HANDLE =
* CT_PARTNER_ATTRIBUTES =
* ct_doc_flow = lt_doc_link3
* EXCEPTIONS
* ERROR_OCCURRED = 1
* DOCUMENT_LOCKED = 2
* NO_CHANGE_ALLOWED = 3
* NO_AUTHORITY = 4
* OTHERS = 5
.
Thanks
Anil