SAP Function Modules
ISH_PROCEDURE_DOCUMENT_FILL SAP Function module
ISH_PROCEDURE_DOCUMENT_FILL 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_PROCEDURE_DOCUMENT_FILL into the relevant SAP transaction such as SE37 or SE80.
Associated Function Group:
N042
Released Date:
Not Released
Processing type: Normal fucntion module
Pattern for FM ISH_PROCEDURE_DOCUMENT_FILL - ISH PROCEDURE DOCUMENT FILL
CALL FUNCTION 'ISH_PROCEDURE_DOCUMENT_FILL' "
EXPORTING
ss_einri = " tn01-einri Current Institution
ss_falnr = " nfal-falnr Current Case
* ss_only_maincode = ' ' " npdok-xfeld
* ss_only_drg = ' ' " npdok-xfeld
* ss_lfdbew = " nbew-lfdnr
* ss_read_nicp = 'X' " ish_on_off
* ss_language = SY-LANGU " sy-langu
* ss_uniretcase = OFF " ish_on_off
* ss_only_official = ' ' " npdok-xfeld
* TABLES
* ss_nbew = " vnbew
* ss_nicp = " rnicp
* ss_rnf62 = " rnf62
* ss_rnf63 = " rnf63
* ss_rnf64 = " rnf64
* ss_rnf29 = " rnf29
* ss_nlicz = " nlicz IS-H: Table of Service-to-Surgical Procedures Code Asgmts
* ss_ndicz = " ndicz IS-H: Table of Diagnosis-to-Surgical Procedures Code Asgmts
EXCEPTIONS
NO_PROCEDURES_FOUND = 1 "
WRONG_LFDBEW = 2 "
. " ISH_PROCEDURE_DOCUMENT_FILL
ABAP code example for Function Module ISH_PROCEDURE_DOCUMENT_FILL
The ABAP code below is a full code listing to execute function module ISH_PROCEDURE_DOCUMENT_FILL 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).
| it_ss_nbew | TYPE STANDARD TABLE OF VNBEW,"TABLES PARAM |
| wa_ss_nbew | LIKE LINE OF it_ss_nbew , |
| it_ss_nicp | TYPE STANDARD TABLE OF RNICP,"TABLES PARAM |
| wa_ss_nicp | LIKE LINE OF it_ss_nicp , |
| it_ss_rnf62 | TYPE STANDARD TABLE OF RNF62,"TABLES PARAM |
| wa_ss_rnf62 | LIKE LINE OF it_ss_rnf62 , |
| it_ss_rnf63 | TYPE STANDARD TABLE OF RNF63,"TABLES PARAM |
| wa_ss_rnf63 | LIKE LINE OF it_ss_rnf63 , |
| it_ss_rnf64 | TYPE STANDARD TABLE OF RNF64,"TABLES PARAM |
| wa_ss_rnf64 | LIKE LINE OF it_ss_rnf64 , |
| it_ss_rnf29 | TYPE STANDARD TABLE OF RNF29,"TABLES PARAM |
| wa_ss_rnf29 | LIKE LINE OF it_ss_rnf29 , |
| it_ss_nlicz | TYPE STANDARD TABLE OF NLICZ,"TABLES PARAM |
| wa_ss_nlicz | LIKE LINE OF it_ss_nlicz , |
| it_ss_ndicz | TYPE STANDARD TABLE OF NDICZ,"TABLES PARAM |
| wa_ss_ndicz | LIKE LINE OF it_ss_ndicz . |
SELECT single EINRI
FROM TN01
INTO @DATA(ld_ss_einri).
SELECT single FALNR
FROM NFAL
INTO @DATA(ld_ss_falnr).
DATA(ld_ss_only_maincode) = some text here
DATA(ld_ss_only_drg) = some text here
SELECT single LFDNR
FROM NBEW
INTO @DATA(ld_ss_lfdbew).
DATA(ld_ss_read_nicp) = 'Check type of data required'.
DATA(ld_ss_language) = 'Check type of data required'.
DATA(ld_ss_uniretcase) = 'Check type of data required'.
DATA(ld_ss_only_official) = some text here
"populate fields of struture and append to itab
append wa_ss_nbew to it_ss_nbew.
"populate fields of struture and append to itab
append wa_ss_nicp to it_ss_nicp.
"populate fields of struture and append to itab
append wa_ss_rnf62 to it_ss_rnf62.
"populate fields of struture and append to itab
append wa_ss_rnf63 to it_ss_rnf63.
"populate fields of struture and append to itab
append wa_ss_rnf64 to it_ss_rnf64.
"populate fields of struture and append to itab
append wa_ss_rnf29 to it_ss_rnf29.
"populate fields of struture and append to itab
append wa_ss_nlicz to it_ss_nlicz.
"populate fields of struture and append to itab
append wa_ss_ndicz to it_ss_ndicz. . CALL FUNCTION 'ISH_PROCEDURE_DOCUMENT_FILL' EXPORTING ss_einri = ld_ss_einri ss_falnr = ld_ss_falnr * ss_only_maincode = ld_ss_only_maincode * ss_only_drg = ld_ss_only_drg * ss_lfdbew = ld_ss_lfdbew * ss_read_nicp = ld_ss_read_nicp * ss_language = ld_ss_language * ss_uniretcase = ld_ss_uniretcase * ss_only_official = ld_ss_only_official * TABLES * ss_nbew = it_ss_nbew * ss_nicp = it_ss_nicp * ss_rnf62 = it_ss_rnf62 * ss_rnf63 = it_ss_rnf63 * ss_rnf64 = it_ss_rnf64 * ss_rnf29 = it_ss_rnf29 * ss_nlicz = it_ss_nlicz * ss_ndicz = it_ss_ndicz EXCEPTIONS NO_PROCEDURES_FOUND = 1 WRONG_LFDBEW = 2 . " ISH_PROCEDURE_DOCUMENT_FILL
IF SY-SUBRC EQ 0. "All OK ELSEIF SY-SUBRC EQ 1. "Exception "Add code for exception here ELSEIF SY-SUBRC EQ 2. "Exception "Add code for exception here 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_ss_einri | TYPE TN01-EINRI , |
| it_ss_nbew | TYPE STANDARD TABLE OF VNBEW , |
| wa_ss_nbew | LIKE LINE OF it_ss_nbew, |
| ld_ss_falnr | TYPE NFAL-FALNR , |
| it_ss_nicp | TYPE STANDARD TABLE OF RNICP , |
| wa_ss_nicp | LIKE LINE OF it_ss_nicp, |
| ld_ss_only_maincode | TYPE NPDOK-XFELD , |
| it_ss_rnf62 | TYPE STANDARD TABLE OF RNF62 , |
| wa_ss_rnf62 | LIKE LINE OF it_ss_rnf62, |
| ld_ss_only_drg | TYPE NPDOK-XFELD , |
| it_ss_rnf63 | TYPE STANDARD TABLE OF RNF63 , |
| wa_ss_rnf63 | LIKE LINE OF it_ss_rnf63, |
| ld_ss_lfdbew | TYPE NBEW-LFDNR , |
| it_ss_rnf64 | TYPE STANDARD TABLE OF RNF64 , |
| wa_ss_rnf64 | LIKE LINE OF it_ss_rnf64, |
| ld_ss_read_nicp | TYPE ISH_ON_OFF , |
| it_ss_rnf29 | TYPE STANDARD TABLE OF RNF29 , |
| wa_ss_rnf29 | LIKE LINE OF it_ss_rnf29, |
| ld_ss_language | TYPE SY-LANGU , |
| it_ss_nlicz | TYPE STANDARD TABLE OF NLICZ , |
| wa_ss_nlicz | LIKE LINE OF it_ss_nlicz, |
| ld_ss_uniretcase | TYPE ISH_ON_OFF , |
| it_ss_ndicz | TYPE STANDARD TABLE OF NDICZ , |
| wa_ss_ndicz | LIKE LINE OF it_ss_ndicz, |
| ld_ss_only_official | TYPE NPDOK-XFELD . |
SELECT single EINRI
FROM TN01
INTO ld_ss_einri.
"populate fields of struture and append to itab
append wa_ss_nbew to it_ss_nbew.
SELECT single FALNR
FROM NFAL
INTO ld_ss_falnr.
"populate fields of struture and append to itab
append wa_ss_nicp to it_ss_nicp.
ld_ss_only_maincode = some text here
"populate fields of struture and append to itab
append wa_ss_rnf62 to it_ss_rnf62.
ld_ss_only_drg = some text here
"populate fields of struture and append to itab
append wa_ss_rnf63 to it_ss_rnf63.
SELECT single LFDNR
FROM NBEW
INTO ld_ss_lfdbew.
"populate fields of struture and append to itab
append wa_ss_rnf64 to it_ss_rnf64.
ld_ss_read_nicp = 'Check type of data required'.
"populate fields of struture and append to itab
append wa_ss_rnf29 to it_ss_rnf29.
ld_ss_language = 'Check type of data required'.
"populate fields of struture and append to itab
append wa_ss_nlicz to it_ss_nlicz.
ld_ss_uniretcase = 'Check type of data required'.
"populate fields of struture and append to itab
append wa_ss_ndicz to it_ss_ndicz.
ld_ss_only_official = some text here
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_PROCEDURE_DOCUMENT_FILL or its description.