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 |
PGM QSH CMD('/QOpenSys/bin/sftp -b/home/test/myfile.txt serverUserID@server') ENDPGM Can u plz tell me what the above code do exactly?
why we use binding directory and service pgm
Can you use multi format LF in CL program?
What is Sub-System?
Specify different indicators used in RPG?
what is term cua , saa?
How to change file attributes such as size, file wait time, record wait time etc., permanently?
is it possible, in the same cgi, to run more than one gethtml or gethtmlifs?
What is the use of L specs in RPG?
How do you combine two record formats in RLU ?
What is the maximum length of a variable name in CL?
records can be read/update/deleted with which file?