Application Development and Automation 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: 
Read only

Hide Selection-Screen from the node Contract in abap

former_member383962
Participant
0 Likes
611

Hello Experts,

I create a 'Z' Copy of standard report name: RFRECEPROCESS_SHOW Tcode:RECESH

Here they used Nodes For contract.

In that node some selection screens are available. I want to hide that selection screen and pass the direct values . is it possible...?

code:

REPORT ZK_TEST_DR.

************************************************************************
TABLES:
************************************************************************
  tivcerule.
************************************************************************
DATA:
************************************************************************
  gt_intreno TYPE re_t_intreno,
  gf_period  TYPE recabool VALUE abap_false.

data: lv_cf type char1 value '2'.

DATA:
  go_task_handler TYPE REF TO if_reca_task_handler.
************************************************************************
NODES:
************************************************************************
  bpobjrel,
  bus_object_x,
  contract,
  rebdldbroot.
************************************************************************
SELECTION-SCREEN BEGIN OF BLOCK proc WITH FRAME TITLE TEXT-pro.
PARAMETERS: p_extid TYPE recaprocessextid NO-DISPLAY.
SELECTION-SCREEN END OF BLOCK proc.
************************************************************************-- Valuation Rule
SELECTION-SCREEN BEGIN OF BLOCK sele WITH FRAME TITLE TEXT-sel.
SELECT-OPTIONS:
  s_cerule FOR tivcerule-cerule no-DISPLAY.
SELECTION-SCREEN END OF BLOCK sele.
************************************************************************
SELECTION-SCREEN BEGIN OF BLOCK view WITH FRAME TITLE TEXT-vie.
*PARAMETERS: p_veval TYPE receevalview  NO-DISPLAY. "OBLIGATORY.
*            AS LISTBOX VISIBLE LENGTH 40 USER-COMMAND dost .
data: p_veval type receevalview value '2'.
PARAMETERS: p_year   TYPE receyear NO-DISPLAY.
PARAMETERS: p_period TYPE receperiod NO-DISPLAY.
PARAMETERS: p_lps    TYPE recabool   NO-DISPLAY. "last posted step
PARAMETERS: p_tno    TYPE recetermno NO-DISPLAY. "term number
PARAMETERS: p_hld    TYPE sydatum    NO-DISPLAY. "date for highlight
PARAMETERS: p_hla    TYPE tfm_bbwhr  NO-DISPLAY. "amount for highlight actual
PARAMETERS: p_hla_p  TYPE tfm_bbwhr  NO-DISPLAY. "amount for highlight plan
PARAMETERS: p_usefy  TYPE recabool NO-DISPLAY.
SELECTION-SCREEN END OF BLOCK view.
************************************************************************

INCLUDE ifreca_parallel_screen.

************************************************************************
GET rebdldbroot.
************************************************************************
IF NOT p_extid IS INITIAL.
  REJECT.
ENDIF.
************************************************************************
GET contract.
************************************************************************
PERFORM get_contract USING contract.
************************************************************************
INITIALIZATION.

***********************************************************************
*
****---Some Logics--------****
*
************************************************************************

any suggestions please...??

Thanks in advance....

Hello Experts,

I create a 'Z' Copy of standard report name: RFRECEPROCESS_SHOW Tcode:RECESH

Here they used Nodes For contract.

In that node some selection screens are available. I want to hide that selection screen and pass the direct values . is it possible...?

code:

REPORT ZK_TEST_DR.

************************************************************************
TABLES:
************************************************************************
  tivcerule.
************************************************************************
DATA:
************************************************************************
  gt_intreno TYPE re_t_intreno,
  gf_period  TYPE recabool VALUE abap_false.

data: lv_cf type char1 value '2'.

DATA:
  go_task_handler TYPE REF TO if_reca_task_handler.
************************************************************************
NODES:
************************************************************************
  bpobjrel,
  bus_object_x,
  contract,
  rebdldbroot.
************************************************************************
SELECTION-SCREEN BEGIN OF BLOCK proc WITH FRAME TITLE TEXT-pro.
PARAMETERS: p_extid TYPE recaprocessextid NO-DISPLAY.
SELECTION-SCREEN END OF BLOCK proc.
************************************************************************-- Valuation Rule
SELECTION-SCREEN BEGIN OF BLOCK sele WITH FRAME TITLE TEXT-sel.
SELECT-OPTIONS:
  s_cerule FOR tivcerule-cerule no-DISPLAY.
SELECTION-SCREEN END OF BLOCK sele.
************************************************************************
SELECTION-SCREEN BEGIN OF BLOCK view WITH FRAME TITLE TEXT-vie.
*PARAMETERS: p_veval TYPE receevalview  NO-DISPLAY. "OBLIGATORY.
*            AS LISTBOX VISIBLE LENGTH 40 USER-COMMAND dost .
data: p_veval type receevalview value '2'.
PARAMETERS: p_year   TYPE receyear NO-DISPLAY.
PARAMETERS: p_period TYPE receperiod NO-DISPLAY.
PARAMETERS: p_lps    TYPE recabool   NO-DISPLAY. "last posted step
PARAMETERS: p_tno    TYPE recetermno NO-DISPLAY. "term number
PARAMETERS: p_hld    TYPE sydatum    NO-DISPLAY. "date for highlight
PARAMETERS: p_hla    TYPE tfm_bbwhr  NO-DISPLAY. "amount for highlight actual
PARAMETERS: p_hla_p  TYPE tfm_bbwhr  NO-DISPLAY. "amount for highlight plan
PARAMETERS: p_usefy  TYPE recabool NO-DISPLAY.
SELECTION-SCREEN END OF BLOCK view.
************************************************************************

INCLUDE ifreca_parallel_screen.

************************************************************************
GET rebdldbroot.
************************************************************************
IF NOT p_extid IS INITIAL.
  REJECT.
ENDIF.
************************************************************************
GET contract.
************************************************************************
PERFORM get_contract USING contract.
************************************************************************
INITIALIZATION.

***********************************************************************
*
****---Some Logics--------****
*
************************************************************************

any suggestions please...??

Thanks in advance....

0 REPLIES 0