topic Re: problem after selection screen -reg in Application Development and Automation Discussions

problem after selection screen -reg

Former Member — Thu, 28 Jun 2007 12:22:10 GMT

Hi all

My program is not getting executed after giving the selection screen options.

can anybody suggest me what could be the problem was.

Here is my script.

REPORT ZVS_SELECT_FLIGHT .

tables: SFLIGHT.

TYPES: BEGIN OF TY_SFLIGHT,

CARRID LIKE SFLIGHT-CARRID,

CONNID LIKE SFLIGHT-CONNID,

FLDATE LIKE SFLIGHT-FLDATE,

PRICE LIKE SFLIGHT-PRICE,

CURRENCY LIKE SFLIGHT-CURRENCY,

PLANETYPE LIKE SFLIGHT-PLANETYPE,

SEATSMAX LIKE SFLIGHT-SEATSMAX,

SEATSOCC LIKE SFLIGHT-SEATSOCC,

END OF TY_SFLIGHT.

DATA: IT_SFLIGHT TYPE TY_SFLIGHT occurs 1,

WA_SFLIGHT TYPE TY_SFLIGHT.

SELECTION-SCREEN BEGIN OF BLOCK B1 with frame title text-001.

select-options so_carid for sflight-carrid no-extension no intervals

obligatory.

SELECTION-SCREEN END OF BLOCK B1.

loop at it_sflight into wa_sflight.

select * from sflight into CORRESPONDING FIELDS OF wa_SFLIGHT where carrid = so_carid.

append wa_sflight to it_sflight.

endselect.

endloop.

LOOP AT IT_SFLIGHT into WA_SFLIGHT .

write: / wa_sflight-carrid,

wa_sflight-connid,

wa_sflight-fldate,

wa_sflight-price,

wa_sflight-currency,

wa_sflight-planetype,

wa_sflight-seatsmax,

wa_sflight-seatsocc.

endloop.

Thanks in adv

sateesh

Re: problem after selection screen -reg

Former Member — Thu, 28 Jun 2007 12:25:04 GMT

hi,

there is a mistake in your progrm check the code below.

REPORT ZVS_SELECT_FLIGHT .

tables: SFLIGHT.

TYPES: BEGIN OF TY_SFLIGHT,

CARRID LIKE SFLIGHT-CARRID,

CONNID LIKE SFLIGHT-CONNID,

FLDATE LIKE SFLIGHT-FLDATE,

PRICE LIKE SFLIGHT-PRICE,

CURRENCY LIKE SFLIGHT-CURRENCY,

PLANETYPE LIKE SFLIGHT-PLANETYPE,

SEATSMAX LIKE SFLIGHT-SEATSMAX,

SEATSOCC LIKE SFLIGHT-SEATSOCC,

END OF TY_SFLIGHT.

DATA: IT_SFLIGHT TYPE TY_SFLIGHT occurs 1,

WA_SFLIGHT TYPE TY_SFLIGHT.

SELECTION-SCREEN BEGIN OF BLOCK B1 with frame title text-001.

select-options so_carid for sflight-carrid no-extension no intervals

obligatory.

SELECTION-SCREEN END OF BLOCK B1.

loop at it_sflight into wa_sflight. "remove this

select * from sflight into CORRESPONDING FIELDS OF wa_SFLIGHT where carrid in so_carid.

append wa_sflight to it_sflight.

endselect.

endloop. "remove this

LOOP AT IT_SFLIGHT into WA_SFLIGHT .

write: / wa_sflight-carrid,

wa_sflight-connid,

wa_sflight-fldate,

wa_sflight-price,

wa_sflight-currency,

wa_sflight-planetype,

wa_sflight-seatsmax,

wa_sflight-seatsocc.

endloop.

regards,

Navneeth K.

Message was edited by:

Navneeth Bothra

Re: problem after selection screen -reg

Former Member — Thu, 28 Jun 2007 12:25:23 GMT

Hi,

In your select query, instead of carrid = so_carid, change it into carrid IN so_carrid and remove the LOOP you have used, as SELECT ENDSELECT also works as loop.

Rather, better approach would be, you just write one select statement and in that, you insert your records into TABLE.

Regards,

Sandip

Message was edited by:

Sandip Kamdar

Re: problem after selection screen -reg

alex_m — Thu, 28 Jun 2007 12:25:42 GMT

Change the code like this.

*loop at it_sflight into wa_sflight.

select * from sflight into CORRESPONDING FIELDS OF TABLE IT_SFLIGHT where carrid IN so_carid.

*append wa_sflight to it_sflight.

*endselect.

*endloop.

Now u will get the output.

Re: problem after selection screen -reg

former_member491305 — Thu, 28 Jun 2007 12:26:53 GMT

Hi,

Remove taht loop stmt befor the select stmt.Dont use select endselect for the performance issue.use select into table option.

Re: problem after selection screen -reg

Former Member — Thu, 28 Jun 2007 12:33:35 GMT

hi,

try this code

REPORT ZVS_SELECT_FLIGHT .

tables: SFLIGHT.

TYPES: BEGIN OF TY_SFLIGHT,

CARRID LIKE SFLIGHT-CARRID,

CONNID LIKE SFLIGHT-CONNID,

FLDATE LIKE SFLIGHT-FLDATE,

PRICE LIKE SFLIGHT-PRICE,

CURRENCY LIKE SFLIGHT-CURRENCY,

PLANETYPE LIKE SFLIGHT-PLANETYPE,

SEATSMAX LIKE SFLIGHT-SEATSMAX,

SEATSOCC LIKE SFLIGHT-SEATSOCC,

END OF TY_SFLIGHT.

DATA: IT_SFLIGHT TYPE TY_SFLIGHT occurs 1,

WA_SFLIGHT TYPE TY_SFLIGHT.

SELECTION-SCREEN BEGIN OF BLOCK B1 with frame title text-001.

select-options so_carid for sflight-carrid no-extension no intervals

obligatory.

SELECTION-SCREEN END OF BLOCK B1.

select * from sflight into CORRESPONDING FIELDS OF table it_SFLIGHT

where carrid = so_carid.

LOOP AT IT_SFLIGHT into WA_SFLIGHT .

write: / wa_sflight-carrid,

wa_sflight-connid,

wa_sflight-fldate,

wa_sflight-price,

wa_sflight-currency,

wa_sflight-planetype,

wa_sflight-seatsmax,

wa_sflight-seatsocc.

endloop.

Reward with points if helpful.

Re: problem after selection screen -reg

Former Member — Thu, 28 Jun 2007 12:33:59 GMT

Dear before u write select statement ,remove

> loop at it_sflight into wa_sflight.

coz the code is gng into loop befre u start the selection