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 two record formats a subfile contain ?
what is the maximum number of subroutines allowed in rpg?
which cl command is used to trap error messages during program execution?
how do you specify the number of records to roll in a subfile ?
what does the opcode free do?
Can we debug the MSGW JOBS?
Why we sometimes use same file name in file and tofile in ovrdbf and sometimes different?
how do you specify page overflow indicator for printer files in rpg?
define subsystem?
how does union file maintains record formats?
how do you know that records are locked?
What Is The Difference Between Goto & Exsr?
what is *inzsr used for?
what is a physical file?
what does the ovrdbf command do?