What will be the value of STRING after line 0106 is
executed in the code below?
0101 E* Fromfiletofile..tabnameprnentlenpdatabnamlenpda
0102 E ARR 8 1
0103 ISTRING DS
0104 I 1 8 ARR
0105 C MOVE *BLANK STRING
0106 C MOVEA'ABC' ARR
A) 'AAAAAAAA'
B) 'BBBBBBBB'
C) 'CCCCCCCC'
D) 'ABC '
E) ' ABC'
One of the job in subsystem is in Running status,expected
time to complete this job is 2 minutes.
But from last 5 -10 minutes this job is still in running
status....What are the possible reasons...and What are the
actions i need to perform to check this...?
I have some doubts on subfile-----------
-----I wrote a prog on subfile to display the records.
Every thing is clear but i defined a field
called "opt" as
input field in subfile record format
from that input field i wish to enter into new
screen called "EDIT"
which i created it as a separate RCD in display
file. i gave opt as 2 for edit just like in WRKMBRPDM screen
please telll me the code and
how can i code for it in RPG.
Please tell me how to read the records from a file with
load an array of size with error conditions(The logic
answer for this question is ARR is array of 99 elements
Z-ADD 0 IDX
*LOVAL SETLL FILE
READ FILE 99
*IN99 DOWEQ *OFF
IDX ANDLT 99
ADD 1 IDX
MOVE FIELD ARR,IDX
READ FILE 99
ENDDO).So,Please give me the complete of this code.
Please tell me how to read the records from a file with
load an array of size with error conditions(The logic
answer for this question is ARR is array of 99 elements
Z-ADD 0 IDX
*LOVAL SETLL FILE
READ FILE 99
*IN99 DOWEQ *OFF
IDX ANDLT 99
ADD 1 IDX
MOVE FIELD ARR,IDX
READ FILE 99
ENDDO).So,Please give me the complete of this code.
100
Hi,Please give me complete code with this logic.
The question is how to read the records from a file with
load an array of size with error condition?
(The logic is
Z-Add 0 IDX
*LOVAL SETLL FILE
READ FILE 99
*IN9 DOWEQ *OFF
IDX ANDLT 99
ADD 1 IDX
MOVE FIELD ARR,IDX
READ FILE 99
ENDDO)please give me complete code with
explanation?