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...

  1. Categories >> Software >> MainFrame >> IBM MainFrame >> COBOL
  2. Suggest New Category

I have a table with 3 dimensions like this :
01 ws-table
04 ws-page occurs 3
08 ws-column occurs 2.
12 ws-record occurs 20 pic x(40).
How to code with PERFORM varying with 3 dimension...I
forgot..

Question Posted / luchautruc2000

Answers were Sorted based on User's Feedback



I have a table with 3 dimensions like this : 01 ws-table 04 ws-page occurs 3 08 ws-..

Answer / lu

you have coding like this :
Working Storage Section.
77 I-page pic 99 value zero.
77 J-col pic 99 value zeroes.
77 K-record pic 99 value zeroes.
Procedure Division.
Perform 1000-move varying I-page from 1 by 1 until
I-page > 3
after J-col from 1 by 1 until
J-col > 2
after K-record from 1 by 1 until
K-record > 20.

1000-move.
move a-field to ws-record (I-page, J-col, K-record).

Is This Answer Correct ?    12 Yes 0 No

I have a table with 3 dimensions like this : 01 ws-table 04 ws-page occurs 3 08 ws-..

Answer / garry

@Lu

Excellent Posts, I Really appreciate your time for giving wonderful and sure-shot results.

Pls keep it up.

gmt360@gmail.com

Is This Answer Correct ?    0 Yes 1 No

Post New Answer

More COBOL Interview Questions

I encountered an error when I move spaces to a numeric field?What should I do to move spaces on that field?help please.

9 Answers  

What is the purpose of Identification Division?

1 Answers  

What is the difference between SEARCH and SEARCH ALL?

6 Answers   Cognizant,

Write some characteristics of cobol as means of business language.

0 Answers  

wht is load module and object module ?

2 Answers   DELL, TCS,

how you read control card into array?

3 Answers   HCL,

how we rectify soc4 and soc7 error in project(need real time answer)? please reply

3 Answers   HCL, Wipro,

What is the difference between next sentence and continue in cobol programing language?

0 Answers  

how to convert vsam table into DB2 table?

1 Answers   IBM, Wipro,

How do we get current date from system with century?

2 Answers  

Which of the following characters is NOT valid in column 7? a. - b. \ c. * d. # e. $

4 Answers  

How do u know what version of cobol u are using?

3 Answers  

For more COBOL Interview Questions Click Here
Categories