how a varible can be passed to a subfile...accnt1 contain
data in a data area..ie Daccnt1 uds,Daccnt2 3
overlay(accnt1:1),
DNo 4 overlay(accnt1:4)..we want to transfer this dataarea
value from acnt0001 to a subfile..that means to enter each
record we have to incriment account no,,
i normal window we can do
move accnt1 account_no
eval account_no=accnt1
eval no=no+1
exfmt usr_account
how it possible with Subfile????????.Please do answer?
(Thank you for all your answers dear friends!!)
Answer / ajay
I didn`t get your question clearly but below my comments
help you....
As you want subfile to show incremented account number
and as stated in ur question you are fetching initial value
for account number from dataarea accnt1
do n ( n :- subfile page size)
move accnt1 account_no
eval account_no=accnt1
eval no=no+1
write sfl_format
eval rrn=rrn+1 ( rrn :- this is associated with SFL)
enddo
exfmt sfl_ctlfmt
| Is This Answer Correct ? | 0 Yes | 0 No |
Can we add or remove the module object from service Program..and how...?
What is compiler directive in as400? Give example of compiler directive.?
how do you turn off indicators 50 through 59 in only one operation
can we retrieve dspf source?
what is a physical file?
not all command typed on command line are cl command? true r false
In which specification Data Structures can be defined?
What is the use of jdftval in as400?
what if my system I runs with system value qccsid 65535?
What is GDA?
Why we are not able to perform insert delete and update operation in Join logical file?
What are the different types of access paths maintained on the file?