Re: Overlay Keyword

[Rob Berendt <rob@xxxxxxxxx>]

OVERLAY(name{:pos | *NEXT})

Change
D DataStruct      DS
D   PartNumber                  10A
D     Family                     3A   OVERLAY(PartNumber)
D     Sequence                   6A   OVERLAY(PartNumber:4)
D     Language                   1A   OVERLAY(PartNumber:10)
to
D DataStruct      DS
D   PartNumber                  10A
D     Family                     3A   OVERLAY(PartNumber)
D     Sequence                   6A   OVERLAY(PartNumber:*NEXT)
D     Language                   1A   OVERLAY(PartNumber:*NEXT)





dbryant@banpharm.com on 04/04/2000 02:10:52 PM
Please respond to RPG400-L@midrange.com@Internet
To:     RPG400-L@midrange.com@Internet
cc:      
Fax to: 
Subject:        Re: Overlay Keyword



How would you use the OVERLAY(*NEXT) keyword with V4R4??

TIA...




|--------+----------------------->
|        |          Rob Berendt  |
|        |          <rob@dekko.co|
|        |          m>           |
|        |                       |
|        |          04/04/2000   |
|        |          11:06 AM     |
|        |          Please       |
|        |          respond to   |
|        |          RPG400-L     |
|        |                       |
|--------+----------------------->
  >--------------------------------------------------------|
  |                                                        |
  |       To:     RPG400-L@midrange.com                    |
  |       cc:     (bcc: Darlene H Bryant/Banpharm)         |
  |       Subject:     Re: Overlay Keyword                 |
  >--------------------------------------------------------|






Define the bigger one first.  Overlay the little ones.
 | |   D DataStruct      DS
|
 | |   D   PartNumber                  10A
|
 | |   D     Family                     3A   OVERLAY(PartNumber)
|
 | |   D     Sequence                   6A   OVERLAY(PartNumber:4)
|
 | |   D     Language                   1A   OVERLAY(PartNumber:10)
|





bacollins@twitchellcorp.com on 04/04/2000 10:00:30 AM
Please respond to RPG400-L@midrange.com@Internet
To:  RPG400-L@midrange.com@Internet
cc:
Fax to:
Subject:  Overlay Keyword

I have a question using the "overlay" keyword.

If I have two field each 4 alpha i.e. MMDD and YEAR and I want to combine
them to look like YEARMMDD which is 8 alpha.How would I use the overlay
keyword to accomplish this. I know you can use a data structure or the cat
function to do this but I was trying to learn new stuff. TIA

Bruce Collins
Twitchell Corporation
bacollins@twitchellcorp.com

"People who think they know everything really annoy those of us who do!"


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---



+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---