topic Re: PROGRAMMING HELP REQUIRED in Application Development and Automation Discussions

PROGRAMMING HELP REQUIRED

Former Member — Wed, 18 Jul 2007 07:21:55 GMT

HI,I WOULD LIKE TO KNOW HOW TO FRAME A PROGRAM IN ABAP FOR PRINTING THE PRIME NUMBERS BETWEEN 1-100 USING THE SIMPLE WHILE LOOP..PLS HELP ME

Re: PROGRAMMING HELP REQUIRED

Former Member — Wed, 18 Jul 2007 07:25:22 GMT

Report YXYZ.

data : j type i value 1.

data : n type i value 100.

data : cnt type i.

data : n1 type i.

data : ans type i.

while j <= n.

n1 = j.

clear cnt.

while n1 <> 0.

ans = j mod n1.

if ans = 0.

cnt = cnt + 1.

endif.

n1 = n1 - 1.

endwhile.

if cnt = 2 or cnt = 1.

write 😕 j.

endif.

j = j + 1.

endwhile.

Re: PROGRAMMING HELP REQUIRED

Former Member — Wed, 18 Jul 2007 07:44:25 GMT

CAN U ALSO PROVIDE ME THE EXPLANATION FOR THE ABOVE MENTIONED PROGRAM?????PLS ...THANK U

Re: PROGRAMMING HELP REQUIRED

Former Member — Wed, 18 Jul 2007 07:54:07 GMT

I NEED MORE ANSWERS TO THE QUESTION

Re: PROGRAMMING HELP REQUIRED

Former Member — Wed, 18 Jul 2007 08:03:38 GMT

HEY PLS SUMIVASU CAN U PROVIDE ME THE EXPLANATION FOR THIS PROGRAM..I WAS GETTING CONFUSED AS TO WHY DID U PROVIDE THE FUNCTION JMODN1..PLS PROVIDE ME THE EXPLANATION..IT IS VERY NECESSARY FOR ME

Re: PROGRAMMING HELP REQUIRED

Former Member — Wed, 18 Jul 2007 10:36:48 GMT

Hi,

Use this code to get prime numbers upto 100 numbers.

&----

*& Report ZPRIME

&----

REPORT ZPRIME.

PARAMETERS: LIMIT TYPE I.

DATA: GET TYPE I,

I TYPE I,

PRIME TYPE I,

COUNT TYPE I VALUE 1,

FLAG TYPE I.

DO LIMIT TIMES.

FLAG = 0.

COUNT = COUNT + 1.

GET = COUNT.

I = 2.

IF GET <> 2.

WHILE GET > I .

PRIME = GET MOD I.

I = I + 1.

IF PRIME = 0.

FLAG = 1.

ENDIF.

ENDWHILE.

IF FLAG = 0.

WRITE:/ GET.

ENDIF.

ENDDO.

IF USEFULL REWARD