PCA_DOCUMENT_TYPE_CHECK SAP Function module

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

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

Pattern for FM PCA_DOCUMENT_TYPE_CHECK - PCA DOCUMENT TYPE CHECK

CALL FUNCTION 'PCA_DOCUMENT_TYPE_CHECK' "
  EXPORTING
    i_docty =                   " t889-docty
    i_plact =                   " t889-plact
*   i_rbukrs = SPACE            " glpct-rbukrs
*   i_ryear = SPACE             " glpct-ryear
*   i_docnr = SPACE             " glpca-docnr
*   i_textflag = SPACE          " sy-datar
*   i_langu = SY-LANGU          " sy-langu
  IMPORTING
    e_t889 =                    " t889
    e_t889a =                   " t889a
    e_nriv =                    " nriv
    e_bltxt =                   " t889te-txt
  EXCEPTIONS
    DOCTY_NOT_VALID = 1         "
    WRONG_PLACT = 2             "
    OBJECT_NOT_VALID = 3        "
    NO_RANGE_FOUND = 4          "
    DOCNR_ALREADY_EXIST = 5     "
    INTERNAL_NUMBER_RANGE = 6   "
    MISSING_DOCNR = 7           "
    EXTERNAL_NUMBER_NOT_ALLOWED = 8  "
    WRONG_PARAMETER = 9         "
    .  "  PCA_DOCUMENT_TYPE_CHECK

ABAP code example for Function Module PCA_DOCUMENT_TYPE_CHECK

The ABAP code below is a full code listing to execute function module PCA_DOCUMENT_TYPE_CHECK 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_t889  
 
 TYPE T889
,
ld_e_t889a  
 
 TYPE T889A
,
ld_e_nriv  
 
 TYPE NRIV
,
ld_e_bltxt  
 
 TYPE T889TE-TXT
.

 

SELECT single DOCTY 
  FROM T889 
  INTO @DATA(ld_i_docty).

 

SELECT single PLACT 
  FROM T889 
  INTO @DATA(ld_i_plact).

 

SELECT single RBUKRS 
  FROM GLPCT 
  INTO @DATA(ld_i_rbukrs).

 

SELECT single RYEAR 
  FROM GLPCT 
  INTO @DATA(ld_i_ryear).

 

SELECT single DOCNR 
  FROM GLPCA 
  INTO @DATA(ld_i_docnr).


DATA(ld_i_textflag) = 'some text here'.

DATA(ld_i_langu) = 'Check type of data required'.
.

CALL FUNCTION 'PCA_DOCUMENT_TYPE_CHECK'
  EXPORTING
    i_docty =                    ld_i_docty
    i_plact =                    ld_i_plact
*   i_rbukrs =                   ld_i_rbukrs
*   i_ryear =                    ld_i_ryear
*   i_docnr =                    ld_i_docnr
*   i_textflag =                 ld_i_textflag
*   i_langu =                    ld_i_langu
  IMPORTING
    e_t889 =                     ld_e_t889
    e_t889a =                    ld_e_t889a
    e_nriv =                     ld_e_nriv
    e_bltxt =                    ld_e_bltxt
  EXCEPTIONS
    DOCTY_NOT_VALID =            1
    WRONG_PLACT =                2
    OBJECT_NOT_VALID =           3
    NO_RANGE_FOUND =             4
    DOCNR_ALREADY_EXIST =        5
    INTERNAL_NUMBER_RANGE =      6
    MISSING_DOCNR =              7
    EXTERNAL_NUMBER_NOT_ALLOWED =    8
    WRONG_PARAMETER =            9
    .  "  PCA_DOCUMENT_TYPE_CHECK

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
ELSEIF SY-SUBRC EQ 3. "Exception
  "Add code for exception here
ELSEIF SY-SUBRC EQ 4. "Exception
  "Add code for exception here
ELSEIF SY-SUBRC EQ 5. "Exception
  "Add code for exception here
ELSEIF SY-SUBRC EQ 6. "Exception
  "Add code for exception here
ELSEIF SY-SUBRC EQ 7. "Exception
  "Add code for exception here
ELSEIF SY-SUBRC EQ 8. "Exception
  "Add code for exception here
ELSEIF SY-SUBRC EQ 9. "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_t889
 
 TYPE T889 ,
ld_i_docty
 
 TYPE T889-DOCTY ,
ld_e_t889a
 
 TYPE T889A ,
ld_i_plact
 
 TYPE T889-PLACT ,
ld_e_nriv
 
 TYPE NRIV ,
ld_i_rbukrs
 
 TYPE GLPCT-RBUKRS ,
ld_e_bltxt
 
 TYPE T889TE-TXT ,
ld_i_ryear
 
 TYPE GLPCT-RYEAR ,
ld_i_docnr
 
 TYPE GLPCA-DOCNR ,
ld_i_textflag
 
 TYPE SY-DATAR ,
ld_i_langu
 
 TYPE SY-LANGU .



SELECT single DOCTY 
  FROM T889 
  INTO ld_i_docty.


SELECT single PLACT 
  FROM T889 
  INTO ld_i_plact.


SELECT single RBUKRS 
  FROM GLPCT 
  INTO ld_i_rbukrs.


SELECT single RYEAR 
  FROM GLPCT 
  INTO ld_i_ryear.


SELECT single DOCNR 
  FROM GLPCA 
  INTO ld_i_docnr.

ld_i_textflag = 'some text here'.
ld_i_langu = 'Check type of data required'.