Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

smartform- Missing parameter in CALL FUNCTION

dipaknakum
Explorer
0 Kudos

*&---------------------------------------------------------------------*
*& Report ZRTGS_PRINTING
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT ZRTGS_PRINTING.
TABLES : LFA1,LFBK,ACDOCA.
TYPES : begin of TY_FINAL,
DATE type LFA1-ERDAT,
BENIF_NAME TYPE LFA1-NAME1,
BENIF_ACNO TYPE LFBK-BANKN,
CONF_BENIF_ACNO TYPE LFBK-BANKN,
BENIF_BANK TYPE LFA1-NAME1,
BENIF_BRANCH TYPE LFA1-NAME1,
BENIF_IFSC TYPE LFBK-BANKL,
BENIF_CITY TYPE LFA1-ORT01,
BENIF_AMT_RS TYPE PC207-BETRG,
* BENIF_AMT_RS type p LENGTH 8 decimalS 2,
BENIF_AMT_WRD(100) TYPE c,
end of TY_FINAL.

DATA : IT_FINAL TYPE TABLE OF TY_FINAL,
WA_FINAL TYPE TY_FINAL.

DATA: FNAME TYPE rs38l_fnam.

SELECTION-SCREEN:BEGIN OF BLOCK TEST2 WITH FRAME TITLE text-002.
PARAMETERS : P_DATE TYPE LFA1-ERDAT,
P_B_NAME TYPE LFA1-NAME1,
P_ACNO TYPE LFBK-BANKN,
P_CACNO TYPE LFBK-BANKN,
P_BANK TYPE LFA1-NAME1,
P_BRAN TYPE LFA1-NAME1,
P_IFSC TYPE LFBK-BANKL,
P_CITY TYPE LFA1-ORT01,
P_AMRRS TYPE PC207-BETRG.
SELECTION-SCREEN : END OF BLOCK TEST2.

AT SELECTION-SCREEN.

IF NOT P_ACNO EQ P_CACNO.
MESSAGE 'Beneficiary A/C Number & Confirm A/c Number Not Same !!!' TYPE 'E'.
ENDIF.

DATA WORDS(100) TYPE C.
CALL FUNCTION 'HR_IN_CHG_INR_WRDS'
EXPORTING
AMT_IN_NUM = P_AMRRS
IMPORTING
AMT_IN_WORDS = WORDS
EXCEPTIONS
DATA_TYPE_MISMATCH = 1
OTHERS = 2.

IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

WA_FINAL-DATE = P_DATE.
WA_FINAL-BENIF_NAME = P_B_NAME.
WA_FINAL-BENIF_ACNO = P_ACNO.
WA_FINAL-CONF_BENIF_ACNO = P_CACNO.
WA_FINAL-BENIF_BANK = P_BANK.
WA_FINAL-BENIF_BRANCH = P_BRAN.
WA_FINAL-BENIF_IFSC = P_IFSC.
WA_FINAL-BENIF_CITY = P_CITY.
WA_FINAL-BENIF_AMT_RS = P_AMRRS.
WA_FINAL-BENIF_AMT_WRD = WORDS.

INSERT WA_FINAL INTO TABLE IT_FINAL.

*WA_FINAL-BENIF_AMT_RS = P_AMRRS.

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
FORMNAME = 'ZRTGS_PRINTING'
* VARIANT = ' '
* DIRECT_CALL = ' '
IMPORTING
FM_NAME = FNAME
EXCEPTIONS
NO_FORM = 1
NO_FUNCTION_MODULE = 2
OTHERS = 3.
IF SY-SUBRC <> 0.
* Implement suitable error handling here
ENDIF.

CALL FUNCTION FNAME
* EXPORTING
* WA_FINAL = WA_FINAL
TABLES
LT_FINAL = IT_FINAL
EXCEPTIONS
FORMATTING_ERROR = 1
INTERNAL_ERROR = 2
SEND_ERROR = 3
USER_CANCELED = 4
OTHERS = 5.
IF SY-SUBRC <> 0.
* Implement suitable error handling here
ENDIF.

2 REPLIES 2

raymond_giuseppi
Active Contributor
0 Kudos

First search in online help and read some document on how to cakk the Smart Form generated FM.

Hint: You can easily identify the generated FM in the transaction Smartforms, look for mandatory parameters in the FM definition and use its name to add the call in your code thru the 'pattern' function, then replace the generated name with the variable returned by SSF_FUNCTION_MODULE_NAME)

0 Kudos

Hi DIPAK NAKUM ,

Please compare both LT_FINAL & IT_FINAL structure, then you will find the exact field.