01-30-2009 6:49 AM
hi to all experts,
this is my code
when i debug the code and the checkob p_kz_e4 is checked it is not taking the value as 'X'
what could be reason .
TABLES:viaufkst,aufk,rihea,tj02t,tj20,tj30,tj30t,tj02.
INCLUDE ppio_entry_sysstate_check.
DATA: yx VALUE 'X'.
DATA : IT_OUTPUT TYPE TABLE OF AUFK,
WA_OUTPUT LIKE LINE OF IT_OUTPUT.
*-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
* SELECTION SCREEN
*-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-f06.
SELECT-OPTIONS:so_aufnr FOR viaufkst-aufnr OBLIGATORY,
so_erdat FOR viaufkst-erdat.
PARAMETERS: p_auart LIKE viaufkst-auart DEFAULT 'ZRS'.
SELECTION-SCREEN END OF BLOCK b2 .
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-f07.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN:
COMMENT 1(10) text-sys FOR FIELD p_syst1,
POSITION 11.
PARAMETERS:
p_syst1 LIKE tj02t-txt04 ,
p_sysh1 LIKE jest-stat NO-DISPLAY.
SELECTION-SCREEN
POSITION 17.
PARAMETERS:
p_kz_e1 LIKE rcosa-excl1 .
SELECTION-SCREEN:
COMMENT 18(5) text-exc FOR FIELD p_kz_e1,
COMMENT 24(3) text-and FOR FIELD p_syst1,
POSITION 30.
PARAMETERS:
p_syst2 LIKE tj02t-txt04,
p_sysh2 LIKE jest-stat NO-DISPLAY.
SELECTION-SCREEN
POSITION 35.
PARAMETERS:
p_kz_e2 LIKE rcosa-excl1.
SELECTION-SCREEN:
COMMENT 36(5) text-exc FOR FIELD p_kz_e2,
COMMENT 42(3) text-and FOR FIELD p_syst2,
POSITION 48.
PARAMETERS:
p_syst3 LIKE tj02t-txt04 ,
p_sysh3 LIKE jest-stat NO-DISPLAY.
SELECTION-SCREEN
POSITION 54.
PARAMETERS:
p_kz_e3 LIKE rcosa-excl1.
SELECTION-SCREEN:
COMMENT 55(5) text-exc FOR FIELD p_kz_e3,
COMMENT 60(3) text-and FOR FIELD p_syst3,
POSITION 65.
PARAMETERS:
p_syst4 LIKE tj02t-txt04,
p_sysh4 LIKE jest-stat NO-DISPLAY.
SELECTION-SCREEN
POSITION 71.
PARAMETERS:
p_kz_e4 LIKE rcosa-excl1.
SELECTION-SCREEN:
COMMENT 75(4) text-exc FOR FIELD p_kz_e4.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.
*--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
* END OF SELECTION SCREEN DECLARATION
*--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
*----------------------------------------------------------AT SELECTION-SCREEN ON VALUE REQUEST-----------------------------------------------------------------------------------
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_syst1.
DATA: stsma LIKE atj49-stsma.
DATA: f4_cstate LIKE atj49-cstate.
PERFORM value_state(saplcoss) USING stsma CHANGING f4_cstate
p_syst1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_syst2.
DATA: stsma LIKE atj49-stsma.
DATA: f4_cstate LIKE atj49-cstate.
PERFORM value_state(saplcoss) USING stsma CHANGING f4_cstate
p_syst2.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_syst3.
DATA: stsma LIKE atj49-stsma.
DATA: f4_cstate LIKE atj49-cstate.
PERFORM value_state(saplcoss) USING stsma CHANGING f4_cstate
p_syst3.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_syst4.
DATA: stsma LIKE atj49-stsma.
DATA: f4_cstate LIKE atj49-cstate.
PERFORM value_state(saplcoss) USING stsma CHANGING f4_cstate
p_syst4.
AT SELECTION-SCREEN ON p_syst1.
PERFORM system_state_check USING yx CHANGING p_syst1 p_sysh1.
AT SELECTION-SCREEN ON p_syst2.
PERFORM system_state_check USING yx CHANGING p_syst2 p_sysh2.
AT SELECTION-SCREEN ON p_syst3.
PERFORM system_state_check USING yx CHANGING p_syst3 p_sysh3.
AT SELECTION-SCREEN ON p_syst4.
PERFORM system_state_check USING yx CHANGING p_syst4 p_sysh4.
01-30-2009 6:57 AM
hi,
CHECK BOX SYNTAX:
PARAMETERS: p_kz_e4 TYPE excl1 AS CHECK BOX . or
PARAMETERS: p_kz_e4 TYPE C AS CHECK BOX
01-30-2009 6:57 AM
hi,
CHECK BOX SYNTAX:
PARAMETERS: p_kz_e4 TYPE excl1 AS CHECK BOX . or
PARAMETERS: p_kz_e4 TYPE C AS CHECK BOX
01-30-2009 7:00 AM
01-30-2009 7:03 AM
01-30-2009 7:07 AM
Hi,
To all,
If you guys would have care to give a better look at the declaration ,
PARAMETERS:
p_kz_e4 LIKE rcosa-excl1.
this will give you a check box!!!!!!
Mohammed,
Please check in you codes where you are clearing the checkbox..
Regards,
Dev.