Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
Interested to Buy Any Domain ? << Click Here >> for more details...

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

Apart from opening of a file do we have any other use of USROPN?

1390


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

1558


if we tried to move year part of *iso date into a field of length 3, what will happen ?

1297


what is service program?

1041


a multiple format logical file is also known as?

1088


What is binder language ?

1901


how to define global parameter in ile ?

1191


what is a non-join logical file?

1829


how many maximum spaces could be given in o specs?

1089


define the rcvf command?

1728


http default port 80 is used by some other production http service. How can I create an http instance on another port to run cgidev2 and my future cgi developments?

1110


when would you use or not use this approach?

1550


How to Define a Procedure in RPG?

1734


how can you execute a command from within an rpg program without calling a clp program?

2014


What is a query can be displayed without saving it?

1096