Skip to Content
0
Former Member
Jan 11, 2008 at 09:32 AM

screen painters!!!

19 Views

I AM POSTING A PROGRAM BELOW WHICH IS INTENDED TO CREATE A SCREEN WITH NAME,EMP.ID , AGE ETC. I WANT A SCREEN TO POP-UP IF THE USER ENTERS THE NAME WHICH IS LESS THAN 9 CHARACTERS.........PLEASE RESOLVE THE PROBLEM.......

REPORT Z_MPP.

data: field1(10) , field2(20) , field3(30) , field4(40) , field5(50).

data: ok_code type sy-ucomm,

save_ok type sy-ucomm.

call screen 100.

&----


*& Module USER_COMMAND_0100 INPUT

&----


  • text

----


module USER_COMMAND_0100 input.

SAVE_OK = OK_CODE.

CLEAR OK_CODE.

DATA: C TYPE I , name(9) type c.

C = 9.

case save_ok.

when 'push1'.

if name <> c.

message 'Enter a name with a minimum of 9 characters' type 'I'.

endif.

when 'push1'.

CALL SCREEN 200.

endcase.

endmodule. " USER_COMMAND_0100 INPUT

*CASE SAVE_OK.

*

*WHEN 'PUSH1'.

*

*IF 'NAME' LT C.

*MESSAGE 'ENTER A NAME WITH MINIMUM OF 9 CHARACTERS'.

*ENDIF.

&----


*& Module USER_COMMAND_0200 INPUT

&----


  • text

----


module USER_COMMAND_0200 input.

CASE OK_CODE.

WHEN 'PUSH2'.

MESSAGE 'THE FORM IS SUBMITTED SUCCESSFULLY' TYPE 'I'.

endcase.

ENDMODULE.

Edited by: Srinivasan Ganapathy on Jan 11, 2008 10:38 AM

Edited by: Srinivasan Ganapathy on Jan 11, 2008 10:41 AM