‎2009 Mar 23 3:07 AM
Hi to All,
I had applied modif id to the selection-options in the selection screen but when i use AT SELECTION-SCREEN OUTPUT and Loop a screen a small input box is displayed before every selection-options.
Given below is the code that had problem :--
PARAMETERS: OA_WISE RADIOBUTTON GROUP RAD1 user-command ijkl,
DA_WISE RADIOBUTTON GROUP RAD1 DEFAULT 'X'.
*
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-002.
SELECT-OPTIONS PERIOD1 FOR VBAK-ERDAT modif id GP1.
SELECT-OPTIONS SALORD FOR VBAK-VBELN modif id GP1.
PARAMETERS CONDS TYPE CHECKBOX user-command abcd modif id GP1.
SELECT-OPTIONS: SO_COND FOR KONV-KSCHL NO INTERVALS modif id G11.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-003.
SELECT-OPTIONS PERIOD2 FOR VBRK-FKDAT modif id GP2.
SELECT-OPTIONS BILLNO FOR VBRK-VBELN modif id GP2.
PARAMETERS COND TYPE CHECKBOX user-command EFGH modif id GP2.
SELECT-OPTIONS BILL_CON FOR KONV-KSCHL NO INTERVALS MODIF ID G22.
SELECTION-SCREEN END OF BLOCK B2.
FOR SELECION SCREEN OUTPUT
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF OA_WISE = 'X'. " ENABLING Sales Order SELECTION BOX
IF SCREEN-GROUP1 = 'GP1'.
screen-invisible = '0'.
screen-input = '1'.
modify screen.
endif.
if screen-group1 = 'GP2' OR screen-group1 = 'G22'.
screen-invisible = '1'.
screen-input = '0'.
modify screen.
endif.
FOR SO PRICING CONDITION
IF CONDS = 'X'.
IF SCREEN-GROUP1 = 'G11'.
SCREEN-INPUT = 0.
ENDIF.
ELSE.
IF SCREEN-GROUP1 = 'G11'.
SCREEN-INPUT = 1.
ENDIF.
ENDIF.
MODIFY SCREEN.
END OF SO PRICING CONDITION.
ELSE.
if screen-group1 = 'GP1' OR screen-group1 = 'G11'. " ENABLING BILL SELECTION BOX
screen-invisible = '1'.
screen-input = '0'.
modify screen.
endif.
if screen-group1 = 'GP2' OR screen-group1 = 'G22'.
screen-invisible = '0'.
screen-input = '1'.
modify screen.
endif.
FOR BILL PRICING CONDITION
IF COND = 'X'.
IF SCREEN-GROUP1 = 'G22'.
SCREEN-INPUT = 0.
ENDIF.
ELSE.
IF SCREEN-GROUP1 = 'G22'.
SCREEN-INPUT = 1.
ENDIF.
ENDIF.
MODIFY SCREEN.
END OF PRICING CONDITION
ENDIF.
ENDLOOP. " FOR LOOP AT SCREEN
"END OF SELECTION SCREEN OUTPUT.
Please suggest the solution.
Thanks in advance
Neraj Rao
‎2009 Mar 23 4:04 AM
Hi Neeraj,
Remove the line screen-input = '1' in ur code. This will remove box before select-options.
Ur code:
PARAMETERS: OA_WISE RADIOBUTTON GROUP RAD1 user-command ijkl,
DA_WISE RADIOBUTTON GROUP RAD1 DEFAULT 'X'.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-002.
SELECT-OPTIONS PERIOD1 FOR VBAK-ERDAT modif id GP1.
SELECT-OPTIONS SALORD FOR VBAK-VBELN modif id GP1.
PARAMETERS CONDS TYPE CHECKBOX user-command abcd modif id GP1.
SELECT-OPTIONS: SO_COND FOR KONV-KSCHL NO INTERVALS modif id G11.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-003.
SELECT-OPTIONS PERIOD2 FOR VBRK-FKDAT modif id GP2.
SELECT-OPTIONS BILLNO FOR VBRK-VBELN modif id GP2.
PARAMETERS COND TYPE CHECKBOX user-command EFGH modif id GP2.
SELECT-OPTIONS BILL_CON FOR KONV-KSCHL NO INTERVALS MODIF ID G22.
SELECTION-SCREEN END OF BLOCK B2.
FOR SELECION SCREEN OUTPUT
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF OA_WISE = 'X'. " ENABLING Sales Order SELECTION BOX
IF SCREEN-GROUP1 = 'GP1'.
screen-invisible = '0'.
screen-input = '1'. <----
Remove this line
modify screen.
endif.
if screen-group1 = 'GP2' OR screen-group1 = 'G22'.
screen-invisible = '1'.
screen-input = '0'.
modify screen.
endif.
FOR SO PRICING CONDITION
IF CONDS = 'X'.
IF SCREEN-GROUP1 = 'G11'.
SCREEN-INPUT = 0.
ENDIF.
ELSE.
IF SCREEN-GROUP1 = 'G11'.
SCREEN-INPUT = 1. <----
Remove this line
ENDIF.
ENDIF.
MODIFY SCREEN.
END OF SO PRICING CONDITION.
ELSE.
if screen-group1 = 'GP1' OR screen-group1 = 'G11'. " ENABLING BILL SELECTION BOX
screen-invisible = '1'.
screen-input = '0'.
modify screen.
endif.
if screen-group1 = 'GP2' OR screen-group1 = 'G22'.
screen-invisible = '0'.
screen-input = '1'. <----
Remove this line
modify screen.
endif.
FOR BILL PRICING CONDITION
IF COND = 'X'.
IF SCREEN-GROUP1 = 'G22'.
SCREEN-INPUT = 0.
ENDIF.
ELSE.
IF SCREEN-GROUP1 = 'G22'.
SCREEN-INPUT = 1. <----
Remove this line
ENDIF.
ENDIF.
MODIFY SCREEN.
END OF PRICING CONDITION
ENDIF.
ENDLOOP. " FOR LOOP AT SCREEN
"END OF SELECTION SCREEN OUTPUT.
MIght solve ur problem.
Thanks..
‎2009 Mar 23 3:46 AM
Hi,
I copied the same code, its working fine.
Remember when you use:-
screen-invisible = 1.Then dnt use:-
screen-input = 1. "or
screen-input = 0.
Else when you use:-
screen-invisible = 0.Then you can use:-
screen-input = 1.Please check again.
Regards,
Tarun
Edited by: Tarun Gambhir on Mar 23, 2009 9:35 AM
‎2009 Mar 23 4:04 AM
Hi Neeraj,
Remove the line screen-input = '1' in ur code. This will remove box before select-options.
Ur code:
PARAMETERS: OA_WISE RADIOBUTTON GROUP RAD1 user-command ijkl,
DA_WISE RADIOBUTTON GROUP RAD1 DEFAULT 'X'.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-002.
SELECT-OPTIONS PERIOD1 FOR VBAK-ERDAT modif id GP1.
SELECT-OPTIONS SALORD FOR VBAK-VBELN modif id GP1.
PARAMETERS CONDS TYPE CHECKBOX user-command abcd modif id GP1.
SELECT-OPTIONS: SO_COND FOR KONV-KSCHL NO INTERVALS modif id G11.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-003.
SELECT-OPTIONS PERIOD2 FOR VBRK-FKDAT modif id GP2.
SELECT-OPTIONS BILLNO FOR VBRK-VBELN modif id GP2.
PARAMETERS COND TYPE CHECKBOX user-command EFGH modif id GP2.
SELECT-OPTIONS BILL_CON FOR KONV-KSCHL NO INTERVALS MODIF ID G22.
SELECTION-SCREEN END OF BLOCK B2.
FOR SELECION SCREEN OUTPUT
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF OA_WISE = 'X'. " ENABLING Sales Order SELECTION BOX
IF SCREEN-GROUP1 = 'GP1'.
screen-invisible = '0'.
screen-input = '1'. <----
Remove this line
modify screen.
endif.
if screen-group1 = 'GP2' OR screen-group1 = 'G22'.
screen-invisible = '1'.
screen-input = '0'.
modify screen.
endif.
FOR SO PRICING CONDITION
IF CONDS = 'X'.
IF SCREEN-GROUP1 = 'G11'.
SCREEN-INPUT = 0.
ENDIF.
ELSE.
IF SCREEN-GROUP1 = 'G11'.
SCREEN-INPUT = 1. <----
Remove this line
ENDIF.
ENDIF.
MODIFY SCREEN.
END OF SO PRICING CONDITION.
ELSE.
if screen-group1 = 'GP1' OR screen-group1 = 'G11'. " ENABLING BILL SELECTION BOX
screen-invisible = '1'.
screen-input = '0'.
modify screen.
endif.
if screen-group1 = 'GP2' OR screen-group1 = 'G22'.
screen-invisible = '0'.
screen-input = '1'. <----
Remove this line
modify screen.
endif.
FOR BILL PRICING CONDITION
IF COND = 'X'.
IF SCREEN-GROUP1 = 'G22'.
SCREEN-INPUT = 0.
ENDIF.
ELSE.
IF SCREEN-GROUP1 = 'G22'.
SCREEN-INPUT = 1. <----
Remove this line
ENDIF.
ENDIF.
MODIFY SCREEN.
END OF PRICING CONDITION
ENDIF.
ENDLOOP. " FOR LOOP AT SCREEN
"END OF SELECTION SCREEN OUTPUT.
MIght solve ur problem.
Thanks..
‎2009 Mar 23 4:10 AM
‎2012 Mar 02 6:48 AM
‎2012 Mar 02 6:48 AM