|
midrange.com
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
+---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
