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 Posted / 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



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

how you will know whether you are in sfldrop or sflfold mode?

625


What is data structure in as400? What is the use of data structure?

598


is it possible to create a physical file without dds?

1180


maximum number of subfiles that can be active for a single file is?

967


in conjunction with what other keyword must ovrdta and ovrata be used?

904






What are the mandatory keywords of sub file?

739


How Many Specs Are There In Rpg & Which Are They?

673


what if my system I runs with system value qccsid 65535?

613


how you get the relative record in a subfile in which cursor is located?

609


define the purpose of the *bcat function?

902


what is the use of jdftval in join logical file?

1103


define what a data area is along with a brief example of what it may be used for?

953


describe the difference between the dowxx and douxx operations?

1146


in which specification the report layout can be defined?

967


what is the function of rlu ?

972