In general I have found it a lot easier to replace the ocl with rpg and do
overrides/calls etc from the rpg.
If much of what you are converting are old reports, (especially if they
use #gsort and address out sorts), and you really don't want to change
them much but need to get out of the s/36 environment, you can change the
input file to a -special- file feed it with sql.
http://www.itjungle.com/fhg/fhg060607-story01.html
old technology, but allows you to leave the old report programs almost "as
is".
message: 2
date: Fri, 19 Dec 2008 14:42:03 -0500
from: "Jim Franz" <jfranz@xxxxxxxxxxxx>
subject: Re: Panic is setting in... I am seeing RPG36 and OCL36... and
I needto modernize it!
Once you establish some patterns for fixing this, it's not so bad.
Screens will be different than non screen. Things like v-line screens
take a while & redesign may be a great option.
You are not forced to go to external dds, but it makes the pgm
so much more maintainable.
Batch and interactive non screens are not so bad, unless you have
matching record logic with 6 lines of indicators....
I personally think it's better to get all code into a "maintainable"
format
as quick and orderly as possible. You don't want to find yourself
having to do a high profile emergency change on Dec 31 with
code you don't fully understand.
Jim Franz
Jim Horn
This email is intended only for the person or entity
to which it is addressed and may contain information
that is privileged, confidential or otherwise protected
from disclosure. If you are not the named addressee
or an employee or agent responsible for delivering
this message to the named addressee, you are not
authorized to read, print, retain copy, and disseminate
this message or any part of it. If you have received this
message in error please notify us immediately by email,
discard any paper copies and delete all electronic files
of this message.
-----rpg400-l-bounces@xxxxxxxxxxxx wrote: -----
To: rpg400-l@xxxxxxxxxxxx
From: rpg400-l-request@xxxxxxxxxxxx
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
Date: 12/20/2008 12:00PM
Subject: RPG400-L Digest, Vol 7, Issue 1104
Send RPG400-L mailing list submissions to
rpg400-l@xxxxxxxxxxxx
To subscribe or unsubscribe via the World Wide Web, visit
http://lists.midrange.com/mailman/listinfo/rpg400-l
or, via email, send a message with subject or body 'help' to
rpg400-l-request@xxxxxxxxxxxx
You can reach the person managing the list at
rpg400-l-owner@xxxxxxxxxxxx
When replying, please edit your Subject line so it is more specific
than "Re: Contents of RPG400-L digest..."
*** NOTE: When replying to this digest message, PLEASE remove all text
unrelated to your reply and change the subject line so it is meaningful.
Today's Topics:
1. Re: Panic is setting in... I am seeing RPG36 and OCL36... and
I need to modernize it! (Kevin Nunn)
2. Re: Panic is setting in... I am seeing RPG36 and OCL36... and
I needto modernize it! (Jim Franz)
3. RE: SQL equivalent of RPG %Check BIF (Bruce Guetzkow)
4. RE: SQL equivalent of RPG %Check BIF (Walden H. Leverich)
----------------------------------------------------------------------
message: 1
date: Fri, 19 Dec 2008 13:41:56 -0600
from: "Kevin Nunn" <knunn@xxxxxxxxxxxxxxx>
subject: Re: Panic is setting in... I am seeing RPG36 and OCL36... and
I need to modernize it!
On Fri, Dec 19, 2008 at 1:00 PM, Mike <koldark@xxxxxxxxx> wrote:
>
> 0012 F KFMTS CTDS04FM
>
This statement just tells the program what the screen format object name
is,
IIRC
Others have already covered the others.
I have a pretty good knowledge of the S36 and still support RPG36 code
on a
few machines, so if you have any questions, drop me a line and I'll see
if I
can help.
Kev
--
Kevin Nunn
Computer Information Systems
RGV Pizza Hut, LLC
------------------------------
message: 2
date: Fri, 19 Dec 2008 14:42:03 -0500
from: "Jim Franz" <jfranz@xxxxxxxxxxxx>
subject: Re: Panic is setting in... I am seeing RPG36 and OCL36... and
I needto modernize it!
Once you establish some patterns for fixing this, it's not so bad.
Screens will be different than non screen. Things like v-line screens
take a while & redesign may be a great option.
You are not forced to go to external dds, but it makes the pgm
so much more maintainable.
Batch and interactive non screens are not so bad, unless you have
matching record logic with 6 lines of indicators....
I personally think it's better to get all code into a "maintainable"
format
as quick and orderly as possible. You don't want to find yourself
having to do a high profile emergency change on Dec 31 with
code you don't fully understand.
Jim Franz
----- Original Message -----
From: "Mike" <koldark@xxxxxxxxx>
To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
Sent: Friday, December 19, 2008 2:00 PM
Subject: Re: Panic is setting in... I am seeing RPG36 and OCL36... and I
needto modernize it!
> Is there documentation or a good article somewhere on what some of
these
> "strange" things are in the S36 programs and the likely equivalent.
>
> One example is an E-Spec. It appears to be some sort of array or
table.
> Perhaps for a subfile? Also these F-specs:
>
> 0011 FWK CP F 756 WORKSTN
> 0012 F KFMTS CTDS04FM
> 0013 F KINFDS DSINF
> 0014 F KINFSR SUBINF
>
> I would hate to bombard this list with a ton of questions if there is
a
> resource I could go to first.
>
> --
> Mike Wills
> Midrange Programmer/Analyst
>
http://whois.mikewills.name/
>
http://www.linkedin.com/in/mikewills
>
>
> On Fri, Dec 19, 2008 at 9:23 AM, Mike <koldark@xxxxxxxxx> wrote:
>
>> I was told it existed in school but was lead to believe it no longer
>> existed. I am now looking at some old RPG36 and OCL36 code and need
to
>> "modernize it". Is there a tool to help convert it to RPG or RPGLE
code
>> similar to CVTRPGSRC?
>>
>> --
>> Mike Wills
>> Midrange Programmer/Analyst
>>
http://whois.mikewills.name/
>>
http://www.linkedin.com/in/mikewills
>>
> --
> This is the RPG programming on the IBM i / System i (RPG400-L) mailing
> list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at
http://archive.midrange.com/rpg400-l.
>
>
------------------------------
message: 3
date: Fri, 19 Dec 2008 13:50:26 -0600
from: "Bruce Guetzkow" <bruceg@xxxxxxxxxxxxxxxxxxxxxxx>
subject: RE: SQL equivalent of RPG %Check BIF
Walden/Birgitta:
Thanks for the quick responses...and thanks for the help. I'll add this
to my bag of tricks.
--Bruce Guetzkow
------------------------------
message: 4
date: Fri, 19 Dec 2008 15:32:52 -0500
from: "Walden H. Leverich" <WaldenL@xxxxxxxxxxxxxxx>
subject: RE: SQL equivalent of RPG %Check BIF
> SELECT ...
>FROM nnnnn
>WHERE FLD <> UPPER(FLD)
Nope, think about special characters. Name = "BLACK$STONE" for example.
-Walden
--
Walden H Leverich III
Tech Software
(516) 627-3800 x3051
WaldenL@xxxxxxxxxxxxxxx
http://www.TechSoftInc.com
Quiquid latine dictum sit altum viditur.
(Whatever is said in Latin seems profound.)
------------------------------
--
This is the RPG programming on the IBM i / System i (RPG400-L) digest
list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at
http://archive.midrange.com/rpg400-l.
End of RPG400-L Digest, Vol 7, Issue 1104
*****************************************
This email is intended only for the person or entity
to which it is addressed and may contain information
that is privileged, confidential or otherwise protected
from disclosure. If you are not the named addressee
or an employee or agent responsible for delivering
this message to the named addressee, you are not
authorized to read, print, retain copy, and disseminate
this message or any part of it. If you have received this
message in error please notify us immediately by email,
discard any paper copies and delete all electronic files
of this message.
midrange.com
