Interested to Buy Any Domain ? << Click Here >> for more details...
Hi.can any body give me the code for this quesiton
please.Because i dont have to try to enter the code in to
the AS/400 server.Please can anybody give the answer for
this question with complete code?
A smple RPLE pgm which accepts the starting number and
ending number as parameter.It then has to count all the odd
numbers b/w the accepted range of numbers and display the
results/
Ex:if the input parameters are 11 and 30 the result should
be 10(11,13,15,17,19,21,23,25,27,29)
Please explain and give me the complete code?
- 2 Answers
- 6337 Views
- Bally Technologies, I also Faced
- E-Mail Answers
Answer Posted / arijit
Please try the below code:
D @StartNum S 3S 0
D @EndNum S 3S 0
D #Counter S 3S 0
D #LoopCnt S 3S 0
D #Result S 50A
*
C *Entry Plist
C Parm @StartNum
C Parm @EndNum
*
C Eval #Result = '('
C Eval #LoopCnt = @StartNum
C Eval #Counter = 0
*
C DoW #LoopCnt < @EndNum
C If %REM(#loopCnt:2) =
1
C Eval #Result = %TRIM(#Result)
+
C %TRIM(%CHAR
(#LoopCnt)) + ','
C Eval #Counter = #Counter +
1
C
ENDIF
*
C Eval #LoopCnt = #LoopCnt +
1
C
EndDo
*
C Eval %SUBST(#Result:%Len(%Trim
(#Result)):1) = ' '
C Eval #Result = %CHAR(#Counter)+%
TRIM(#Result)+')'
*
C #Result
Dsply
C EVAL *InLr =
*On
| Is This Answer Correct ? | 2 Yes | 0 No |
Post New Answer View All Answers
What is access path in as400?
when do you explicitly open files and close files in an rpg program?
how many specifications are there in rpg/400? What are they?
what is the syntax for plist?
in conjunction with what other keyword must ovrdta and ovrata be used?
What Is The Object Type Of Pf, Lf, Printer File & Display File?
how do you use exceptional write in c specs?
what does check opcode do ?
define the purpose of the %sst function?
Difference Between Source Physical File & Physical File?
Difference Between Skip Before & Space Before?
why is the declare cursor statement is used for?
what is the purpose of ovrdta and ovrata keywords ?
what is the length of a variable in rpg?
how many printer files maximum can be used in single rpg program?
