Hi Gurus.
I have a program with H99B_OPEN_LFORM_JOB function and I need undesrtand why in form the field CPF dont show the last number.
Then i get the value of parameter i_folname and I acces the transaction smartforms but dont exist the I try in Se71 and dont exist .
How Can I find the form print to chage it?
See the code:
*&---------------------------------------------------------------------*
*& Form PRINT_FORM
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* -->P_P_FORM text
* -->P_GO_CL_TERM text
*----------------------------------------------------------------------*
FORM print_form USING pv_fgroup TYPE p_99b_fogroup
pv_form TYPE p_99b_formlogc
pv_prcop TYPE itcpp-tdcopies
po_cl_term TYPE REF TO zcl_hrpaybr_term.
DATA ls_options TYPE itcpo.
DATA ls_term_data TYPE zhrpaybr_s_term.
DATA lt_term_data TYPE zhrpaybr_t_term.
* Get the Data generated by the class
po_cl_term->get_data( IMPORTING et_data = lt_term_data ).
IF lt_term_data[] IS INITIAL.
RETURN.
ENDIF.
SELECT SINGLE fogroup INTO pv_fgroup FROM t799bmfg
WHERE molga = pbr99_molga
AND folname = pv_form.
* Get the print parameters according to user
PERFORM get_print_parameters USING pv_prcop
CHANGING ls_options.
CALL FUNCTION 'H99B_OPEN_LFORM_JOB'
EXPORTING
i_molga = pbr99_molga
i_fogroup = pv_fgroup
i_folname = pv_form
options = ls_options
EXCEPTIONS
fotype_invalid = 1
job_not_opened = 2
OTHERS = 3.
IF sy-subrc <> 0.
MESSAGE e008(pla).
* Não foi possível abrir o job de impressão
ENDIF.
LOOP AT lt_term_data[] INTO ls_term_data.
* Write the form for the employee (Independent of output technology)
CALL FUNCTION 'H99B_OUTPUT_LFORM'
EXPORTING
i_molga = pbr99_molga
i_fogroup = pv_fgroup
i_folname = pv_form
i_data_struc = ls_term_data
EXCEPTIONS
error = 1
fotype_invalid = 2
OTHERS = 3.
IF sy-subrc <> 0.
MESSAGE e010(pla).
* Erro na impressão de formulário
ENDIF.
ENDLOOP.
* Close Form
CALL FUNCTION 'H99B_CLOSE_LFORM_JOB'
EXCEPTIONS
fotype_invalid = 1
closing_error = 2
OTHERS = 3.
IF sy-subrc <> 0.
MESSAGE e009(pla).
* Não foi possível fechar o job de impressão
ENDIF.
ENDFORM. " PRINT_FORM
The value of i_folname is ZHR_BR_TERM3_SFO