SAP Function Modules

ISH_PATREDOMA_SAVE SAP Function module







ISH_PATREDOMA_SAVE is a standard SAP function module available within R/3 SAP systems depending on your version and release level. Below is the pattern details for this FM showing its interface including any import and export parameters, exceptions etc as well as any documentation contributions (Comments) specific to the object.

See here to view full function module documentation and code listing, simply by entering the name ISH_PATREDOMA_SAVE into the relevant SAP transaction such as SE37 or SE80.

Associated Function Group: N_API_REDOMA
Released Date: Not Released
Processing type: Normal fucntion module
Normal function module settings


Pattern for FM ISH_PATREDOMA_SAVE - ISH PATREDOMA SAVE





CALL FUNCTION 'ISH_PATREDOMA_SAVE' "
  EXPORTING
    i_einri =                   " einri         Institution
    i_patnr =                   " patnr         Patient Number
  IMPORTING
    e_retmaxtype =              " ish_bapiretmaxty  Message Type That Occurred Most
* TABLES
*   it_vnredo =                 " ish_t_vnredo
*   it_vnwoinc =                " vnwoinc
*   it_vnredodia =              " vnredoma_diag  Current Diagnoses
*   et_return =                 " bapiret2      Message Table
*   et_nredo =                  " ish_t_nredo
*   et_nwoinc =                 " nwoinc
*   et_redodia =                " nredoma_diag
    .  "  ISH_PATREDOMA_SAVE

ABAP code example for Function Module ISH_PATREDOMA_SAVE





The ABAP code below is a full code listing to execute function module ISH_PATREDOMA_SAVE including all data declarations. The code uses the latest in-line data DECLARATION SYNTAX but I have included an ABAP code snippet at the end to show how declarations would look using the original method of declaring data variables up front. This will allow you to compare and fully understand the new inline method. Please note some of the newer syntax such as the @DATA is not available until a later 4.70 service pack (SP8).

DATA:
ld_e_retmaxtype  TYPE ISH_BAPIRETMAXTY ,
it_it_vnredo  TYPE STANDARD TABLE OF ISH_T_VNREDO,"TABLES PARAM
wa_it_vnredo  LIKE LINE OF it_it_vnredo ,
it_it_vnwoinc  TYPE STANDARD TABLE OF VNWOINC,"TABLES PARAM
wa_it_vnwoinc  LIKE LINE OF it_it_vnwoinc ,
it_it_vnredodia  TYPE STANDARD TABLE OF VNREDOMA_DIAG,"TABLES PARAM
wa_it_vnredodia  LIKE LINE OF it_it_vnredodia ,
it_et_return  TYPE STANDARD TABLE OF BAPIRET2,"TABLES PARAM
wa_et_return  LIKE LINE OF it_et_return ,
it_et_nredo  TYPE STANDARD TABLE OF ISH_T_NREDO,"TABLES PARAM
wa_et_nredo  LIKE LINE OF it_et_nredo ,
it_et_nwoinc  TYPE STANDARD TABLE OF NWOINC,"TABLES PARAM
wa_et_nwoinc  LIKE LINE OF it_et_nwoinc ,
it_et_redodia  TYPE STANDARD TABLE OF NREDOMA_DIAG,"TABLES PARAM
wa_et_redodia  LIKE LINE OF it_et_redodia .

DATA(ld_i_einri) = 'Check type of data required'.
DATA(ld_i_patnr) = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_it_vnredo to it_it_vnredo.

"populate fields of struture and append to itab
append wa_it_vnwoinc to it_it_vnwoinc.

"populate fields of struture and append to itab
append wa_it_vnredodia to it_it_vnredodia.

"populate fields of struture and append to itab
append wa_et_return to it_et_return.

"populate fields of struture and append to itab
append wa_et_nredo to it_et_nredo.

"populate fields of struture and append to itab
append wa_et_nwoinc to it_et_nwoinc.

"populate fields of struture and append to itab
append wa_et_redodia to it_et_redodia. . CALL FUNCTION 'ISH_PATREDOMA_SAVE' EXPORTING i_einri = ld_i_einri i_patnr = ld_i_patnr IMPORTING e_retmaxtype = ld_e_retmaxtype * TABLES * it_vnredo = it_it_vnredo * it_vnwoinc = it_it_vnwoinc * it_vnredodia = it_it_vnredodia * et_return = it_et_return * et_nredo = it_et_nredo * et_nwoinc = it_et_nwoinc * et_redodia = it_et_redodia . " ISH_PATREDOMA_SAVE
IF SY-SUBRC EQ 0. "All OK ENDIF.







ABAP code to compare 7.40 inline data declaration with original syntax

The below ABAP code uses the older none in-line data declarations. This allows you to see the coding differences/benefits of the later inline syntax. It may also be useful if you are using an older version of SAP as some of the newer syntax above, such as the @DATA is not available until 4.70 EHP 8.

DATA:
ld_e_retmaxtype  TYPE ISH_BAPIRETMAXTY ,
ld_i_einri  TYPE EINRI ,
it_it_vnredo  TYPE STANDARD TABLE OF ISH_T_VNREDO ,
wa_it_vnredo  LIKE LINE OF it_it_vnredo,
ld_i_patnr  TYPE PATNR ,
it_it_vnwoinc  TYPE STANDARD TABLE OF VNWOINC ,
wa_it_vnwoinc  LIKE LINE OF it_it_vnwoinc,
it_it_vnredodia  TYPE STANDARD TABLE OF VNREDOMA_DIAG ,
wa_it_vnredodia  LIKE LINE OF it_it_vnredodia,
it_et_return  TYPE STANDARD TABLE OF BAPIRET2 ,
wa_et_return  LIKE LINE OF it_et_return,
it_et_nredo  TYPE STANDARD TABLE OF ISH_T_NREDO ,
wa_et_nredo  LIKE LINE OF it_et_nredo,
it_et_nwoinc  TYPE STANDARD TABLE OF NWOINC ,
wa_et_nwoinc  LIKE LINE OF it_et_nwoinc,
it_et_redodia  TYPE STANDARD TABLE OF NREDOMA_DIAG ,
wa_et_redodia  LIKE LINE OF it_et_redodia.

ld_i_einri = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_it_vnredo to it_it_vnredo.
ld_i_patnr = 'Check type of data required'.

"populate fields of struture and append to itab
append wa_it_vnwoinc to it_it_vnwoinc.

"populate fields of struture and append to itab
append wa_it_vnredodia to it_it_vnredodia.

"populate fields of struture and append to itab
append wa_et_return to it_et_return.

"populate fields of struture and append to itab
append wa_et_nredo to it_et_nredo.

"populate fields of struture and append to itab
append wa_et_nwoinc to it_et_nwoinc.

"populate fields of struture and append to itab
append wa_et_redodia to it_et_redodia.

Contribute (Add Comments)

Please help keep this info upto date and use the comments section below to add useful hints, tips and information specific to this SAP function. This will then be available for you and other users to easily find by simply searching on the object name ISH_PATREDOMA_SAVE or its description.