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

what are the various types of device files?

1582


To Add A File To The 'file Selection' Option Of A Query, The Function Key To Be Pressed Is?

1163


In AS/400 projects in Companies whats the meaning of production support team.what production support involves.also what work does development,maintenance involve what are the other teams or processes that are available for as400 project.

9005


How to Define a Procedure in RPG?

1668


writing an sql statement from selecting records from two files using single statement and nested select statement.

1126


What are the different opcodes used for file operation on a subfile in a rpg pgm?

1736


can a indexed file be accessed in arrival sequence in rpg program?

1516


what are all the contents of subfile?

1605


what is the length of a variable in rpg?

1605


what opcode could be used to test an alphanumeric field for all numeric values?

1696


what is the purpose of dynslt keyword?

1675


Difference Between Call & Sbmjob?

1229


Explain this error: "all record formats for externally-described file abcd ignored or dropped due to error; file ignored."?

1285


what is the syntax for plist?

1073


what is the use of dspatr(mdt) keyword?

2170