cancel
Showing results for 
Search instead for 
Did you mean: 

hi naresh this is what i am trying to do with driver program

Former Member
0 Kudos

REPORT ZF111_IN_CHECK.

DATA: zf110_in_check type rs38l_zf110_in_check.

c_formname = zf110_in_check.

TYPES: Begin of zf110_in_check,

reguh like reguh,

regup like regup,

regud like regud,

t042z like t042z,

fsabe like fsabe,

end of zf110_in_check.

CALL FUNCTION '/1BCDWB/SF00000156'

EXPORTING

formname = c_formname

IMPORTING

fm_name = /1BCDWB/SF00000156

EXCEPTIONS

no_form = 1

no_function_module = 2

OTHERS = 3.

IF sy-subrc <> 0.

  • MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

  • WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

...........................CALL SMARTFORM............................

CALL FUNCTION /1BCDWB/SF00000156

EXPORTING

control_parameters = st_control_parameters

output_options = st_output_options

IMPORTING

document_output_info = st_document_output_info

job_output_info = st_job_output_info

job_output_options = st_job_output_options

EXCEPTIONS

formatting_error = 1

internal_error = 2

send_error = 3

user_canceled = 4

OTHERS = 5.

IF sy-subrc <> 0.

  • MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

  • WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

endif.

Accepted Solutions (0)

Answers (1)

Answers (1)

Former Member
0 Kudos

hi rahul don't wht u r doing but i have change u r code as follows

REPORT ZF111_IN_CHECK.
DATA: C_FORMNAME TYPE RS38L_FNAM,
      ST_CONTROL_PARAMETERS   TYPE SSFCTRLOP,
      ST_OUTPUT_OPTIONS       TYPE SSFCOMPOP,
      ST_DOCUMENT_OUTPUT_INFO TYPE SSFCRESPD,
      ST_JOB_OUTPUT_INFO      TYPE SSFCRESCL,
      ST_JOB_OUTPUT_OPTIONS   TYPE SSFCRESOP.

TYPES: BEGIN OF ZF110_IN_CHECK,
          REGUH LIKE REGUH,
          REGUP LIKE REGUP,
          REGUD LIKE REGUD,
          T042Z LIKE T042Z,
          FSABE LIKE FSABE,
END OF ZF110_IN_CHECK.

ST_CONTROL_PARAMETERS-DEVICE    = 'PRINTER'.
ST_CONTROL_PARAMETERS-NO_DIALOG  = 'X'.



*Get the active FM name of the smartform
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
  EXPORTING
    FORMNAME                 = 'ZF110_IN_CHECK'
*   VARIANT                  = ' '
*   DIRECT_CALL              = ' '
 IMPORTING
   FM_NAME                  = C_FORMNAME
 EXCEPTIONS
   NO_FORM                  = 1
   NO_FUNCTION_MODULE       = 2
   OTHERS                   = 3
          .
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.


*...........................CALL SMARTFORM............................*

CALL FUNCTION C_FORMNAME
  EXPORTING
    CONTROL_PARAMETERS   = ST_CONTROL_PARAMETERS
  IMPORTING
    DOCUMENT_OUTPUT_INFO = ST_DOCUMENT_OUTPUT_INFO
    JOB_OUTPUT_INFO      = ST_JOB_OUTPUT_INFO
    JOB_OUTPUT_OPTIONS   = ST_JOB_OUTPUT_OPTIONS
  EXCEPTIONS
    FORMATTING_ERROR     = 1
    INTERNAL_ERROR       = 2
    SEND_ERROR           = 3
    USER_CANCELED        = 4
    OTHERS               = 5.
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.