what is clile code get last digit in numarice value
Answer Posted / remya
DCLF FILE(DSP) RCDFMT(RECDSP)
DCL VAR(&X) TYPE(*DEC) LEN(2 0)
DCL VAR(&Y) TYPE(*DEC) LEN(2 0)
L1:SNDRCVF RCDFMT(RECDSP)
CHGVAR VAR(&X) VALUE(95)
CHGVAR VAR(&Y) VALUE((&X/10)*10)
CHGVAR VAR(&Y) VALUE(&X-&Y)
GOTO CMDLBL(L1)
| Is This Answer Correct ? | 2 Yes | 2 No |
Post New Answer View All Answers
what are the different commands used in rlu ?
What is the difference between iter and do? We know both are used to execute set of statements repeatedly, but what is the main difference?
how can a cgi check whether an ifs object is available?
Pose, there are 100 records in the file.i need to retrieve all the records matching/equal to the particular name field. How can we do the above using search criteria other than using the if cond?
what is the difference between packed decimal and zoned decimal?
what the purpose of ovrdta, ovrata keywords?
WHAT is STORED PROCEDURE CONCEPT IN AS400 WITH EXAMPLE?
how do you specify the number of records to roll in a subfile ?
which are control break logic indicators?
define a output queue?
What Is The Object Type Of Pf, Lf, Printer File & Display File?
what is maximum number of arrays allowed in rpg?
Difference Between Skip Before & Space Before?
A join logical file has how many record formats?
what are the two record formats a subfile contain ?