View previous topic :: View next topic |
Author |
Message |
vijayakumar Beginner
Joined: 28 Jul 2006 Posts: 17 Topics: 9
|
Posted: Sun Aug 03, 2008 3:52 am Post subject: Defining and accessing arrays in easytrive |
|
|
Hi,
I have the following record structure for input file in Easytreive
IN-FEE-CD -Fee code values are SF, CF, RF, PF,AF, etc.,
I need to search the fee code values for SF, RF and PF and
move the corresponding amount IN-FEE-AMT to output file
Code: |
10 IN-FEE-GROUP PIC X(480) VALUE SPACE.
10 IN-FEE-X REDEFINES
IN-FEE-GROUP OCCURS 32 TIMES
15 IN-FEE-CD PIC X(02).
15 IN-FEE-AMT PIC S9(5)V9(2) COMP-3.
15 FILLER PIC X(09).
10 POLICY PIC X(12).
-------------------------------------------------------------------------- |
Output file format:
Code: |
policy ---- SF-amount ---RF-amount ---- PF-amount
A1234 ---- 100.00 ----- 122.50 -------- 500.00
-------------------------------------------------------------------------- |
I have the following doubts,
1) How the above 'occurs' can be defined in easytrieve
2)How to search the feecodes and populate the amount in the
output file..
Could you please help me as i am new to easytrieve...
Thanks
Vijay |
|
Back to top |
|
 |
jsharon1248 Intermediate
Joined: 08 Aug 2007 Posts: 291 Topics: 2 Location: Chicago
|
Posted: Sun Aug 03, 2008 7:20 pm Post subject: |
|
|
Follow the Quick Manuals link at the top of the page. Open the Easytrieve manual. Chapter 9 is all about table handling. |
|
Back to top |
|
 |
vijayakumar Beginner
Joined: 28 Jul 2006 Posts: 17 Topics: 9
|
Posted: Mon Aug 04, 2008 4:28 am Post subject: |
|
|
Hi
I could not find more information about the occurs in the Quick manuals..
Could you please help me..
Vijay |
|
Back to top |
|
 |
jsharon1248 Intermediate
Joined: 08 Aug 2007 Posts: 291 Topics: 2 Location: Chicago
|
Posted: Mon Aug 04, 2008 7:57 am Post subject: |
|
|
OCCURS is a COBOL reserved word. It is meaningless in Easytrieve, so stop looking for it. The chapter on tables is pretty well written. There are even examples. What part are you having trouble with? Show us what you've tried so far. |
|
Back to top |
|
 |
jsharon1248 Intermediate
Joined: 08 Aug 2007 Posts: 291 Topics: 2 Location: Chicago
|
Posted: Thu Aug 07, 2008 7:49 am Post subject: |
|
|
It's time for me to eat some crow. I've been informed that OCCURS is a reserved word in Easytrieve. Check out the DEFINE syntax in Chapter 5 of Easytrieve manual. My apologies. |
|
Back to top |
|
 |
|
|