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 |
how can i convert hexadecimal value to packed value?
define a output queue?
What is class of service ?
What is the purpose of OVRATA keyword ?
what does vldcmdkey means?
What Is The Object Type Of Pf, Lf, Printer File & Display File?
What is keyword PFILE specifies ?
What is the use of jdftval in as400?
how to see the error messages for each command in cl?
How are the objects stored on AS/400?
why is the declare cursor statement is used for?
What is the purpose of USROPN keyword?