CJPS_GET_WBS_ELEMENT SAP Function module

CJPS_GET_WBS_ELEMENT 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 CJPS_GET_WBS_ELEMENT into the relevant SAP transaction such as SE37 or SE80.

Associated Function Group: CJPS
Released Date: Not Released
Processing type: Normal fucntion module

Pattern for FM CJPS_GET_WBS_ELEMENT - CJPS GET WBS ELEMENT

CALL FUNCTION 'CJPS_GET_WBS_ELEMENT' "
* EXPORTING
*   i_index = 1                 " sy-tabix
*   i_objnr = SPACE             " prpss-objnr
*   i_posid = SPACE             " prpss-posid
*   i_pspnr = '00000000'        " prpss-pspnr
*   no_buffer = SPACE           " rcwbs-sel01
  IMPORTING
    e_prps =                    " v_prpss1
    ktext =                     " c
  EXCEPTIONS
    INPUT_ERROR = 1             "
    NOT_FOUND = 2               "
    .  "  CJPS_GET_WBS_ELEMENT

ABAP code example for Function Module CJPS_GET_WBS_ELEMENT

The ABAP code below is a full code listing to execute function module CJPS_GET_WBS_ELEMENT 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_prps  
 
 TYPE V_PRPSS1
,
ld_ktext  
 
 TYPE C
.


DATA(ld_i_index) = '123 '.
 

SELECT single OBJNR 
  FROM PRPSS 
  INTO @DATA(ld_i_objnr).

 

SELECT single POSID 
  FROM PRPSS 
  INTO @DATA(ld_i_posid).

 

SELECT single PSPNR 
  FROM PRPSS 
  INTO @DATA(ld_i_pspnr).



DATA(ld_no_buffer) = some text here
.

CALL FUNCTION 'CJPS_GET_WBS_ELEMENT'
* EXPORTING
*   i_index =                    ld_i_index
*   i_objnr =                    ld_i_objnr
*   i_posid =                    ld_i_posid
*   i_pspnr =                    ld_i_pspnr
*   no_buffer =                  ld_no_buffer
  IMPORTING
    e_prps =                     ld_e_prps
    ktext =                      ld_ktext
  EXCEPTIONS
    INPUT_ERROR =                1
    NOT_FOUND =                  2
    .  "  CJPS_GET_WBS_ELEMENT

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_e_prps
 
 TYPE V_PRPSS1 ,
ld_i_index
 
 TYPE SY-TABIX ,
ld_ktext
 
 TYPE C ,
ld_i_objnr
 
 TYPE PRPSS-OBJNR ,
ld_i_posid
 
 TYPE PRPSS-POSID ,
ld_i_pspnr
 
 TYPE PRPSS-PSPNR ,
ld_no_buffer
 
 TYPE RCWBS-SEL01 .


ld_i_index = '123 '.

SELECT single OBJNR 
  FROM PRPSS 
  INTO ld_i_objnr.


SELECT single POSID 
  FROM PRPSS 
  INTO ld_i_posid.


SELECT single PSPNR 
  FROM PRPSS 
  INTO ld_i_pspnr.


ld_no_buffer = some text here