Need a pop-up only to text info and for a checkbox !!!

Question:
Hi
I need to display an information in a pop-up.
The information can be 1 to 100 lines (or more).
In the information window I would like a checkbox.
I have tried something like this:
select  * from  table_a into corresponding fields
of table g_tablea_tab
       where   datef  =< sy-datum
       and    datet  =>  sy-datum.
call screen 500 starting at 5 5 ending at 50 10.
*****************************
module STATUS_0500 output.
  SET PF-STATUS 'STATUS300'.
   loop a tg_tablea_tab.
     write:/ g_tablea_tab-text.
   endloop.
 write:/ a_check as checkbox.
Nothing is displayed in the window...
Any suggest ?
Answer:
I think you need a 'LEAVE TO LIST PROCESSING' command before calling your output screen.
_________________
Regards,
Angelis.
Answer:
Sorry, it doesn't help....
I have just tried it ..
Answer:
Probably the wrong place (not got the time to try out), but to include those Write statements you do need to LEAVE TO LIST-PROCESSING.
Take a look at the F1 help on the above command for more info.
_________________
Regards,
Angelis.
Answer:
Try writing leave to list-processing and return to screen 0. in PAI.
Cheers
Vijay
Answer:
Hmm. it doesn't work
Answer:
Yes!!!!!
Now it is solved
My code is as following:
call screen 0500 starting at 10 10
                   ending   at 75 25.
Screen 500 have following in the flowlogic:
PROCESS BEFORE OUTPUT.
module set_cua_status_0500.
MODULE PREPARE_OUTPUT_0500.
PROCESS AFTER INPUT.
module ok_code_0100.
And the code in the flow logic is:
*&---------------------------------------------------------------------*
*&      Module  PREPARE_OUTPUT_0500  OUTPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
module PREPARE_OUTPUT_0500 output.
  leave to list-processing and return to screen 100.
  new-page line-size 132.
  skip to line 3.
   loop at g_yybc0024_tab.
    write:/ g_yybc0024_tab-text.
  endloop.
endmodule.                 " PREPARE_OUTPUT_0500  OUTPUT
*&---------------------------------------------------------------------*
*&      Module  set_cua_status_0500  OUTPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
module set_cua_status_0500 output.
  suppress dialog.
  set titlebar '000' with TEXT-001.
      set pf-status 'POPDECI'.
endmodule.                 " set_cua_status_0500  OUTPUT
*&---------------------------------------------------------------------*
*&      Module  ok_code_0100  INPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
module ok_code_0100 input.
g_function = ok_code.
CLEAR OK_CODE.
SET SCREEN 0.
LEAVE SCREEN.
endmodule.                 " ok_code_0100  INPUT
Thanks for the feedbacks etc.
wkr
Lasse

More Articles:

minisap.where to download ?
I have a small problem with a maintenance view.?
Working with files on pc and app server?
Populating ranges?
Company Logo in HR Forms?
Select-options?