× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  1.  Home
  2. RPG400-L
  3. April 2003

RE: RPG400-L Digest, Vol 2, Issue 174

As others pointed out, removing the "U" from before the "DS"  will stop that
behavior.

D AREA1     UDS             30    DTAARA(AREA1)

becomes

D AREA1      DS             30    DTAARA(AREA1)


Eric DeLong
Sally Beauty Company
MIS-Project Manager (BSG)
940-898-7863 or ext. 1863



-----Original Message-----
From: Malchow, Grizzly [mailto:GMalchow@xxxxxxxxxxxxxxxxxxxxx]
Sent: Tuesday, April 01, 2003 9:40 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: RE: RPG400-L Digest, Vol 2, Issue 174


I noticed when the data area is defined in the D specs like this
D AREA1     UDS             30    DTAARA(AREA1)
There is a lock on the data area object with a lock of *EXCLRD. When the
data are is defined in the C specs I don't see a lock at all. I did some
reading and found out that the data area is automatically read and
locked at program initialization time when defined in the D specs. I
also found that unlocking the data area in *INZSR takes care of the
*EXCLRD lock.

-----Original Message-----
From: rpg400-l-request@xxxxxxxxxxxx
[mailto:rpg400-l-request@xxxxxxxxxxxx] 
Sent: Tuesday, April 01, 2003 9:18 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: RPG400-L Digest, Vol 2, Issue 174

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


Today's Topics:

   1. Re: RPGII conversion (James Rich)
   2. RE: RPGII conversion (Don)
   3. Re: RPGII conversion (alan)
   4. Guidelines for RPG400-L mailing list (MailMan)
   5. Data area question (Malchow, Grizzly)
   6. Re: Data area question (Scott Mildenberger)
   7. RE: Data area question (DeLong, Eric)
   8. Suppress subscription (Pelnet)
   9. CGI File upload (Chris Beck)
  10. Re: Data area question (rob@xxxxxxxxx)
  11. Re: Data area question (cozzi@xxxxxxxxx)


----------------------------------------------------------------------

message: 1
date: Mon, 31 Mar 2003 19:26:13 -0700 (MST)
from: James Rich <james@xxxxxxxxxxx>
subject: Re: RPGII conversion

On Mon, 31 Mar 2003, Nick Leonessa wrote:

> Does anyone out there know the command to convert rpgII to rpg/ile.

First by hand to RPG III (not too hard).  Then use CVTRPGSRC to make it
RPG IV.

James Rich

------------------------------

message: 2
date: Mon, 31 Mar 2003 21:32:28 -0500 (EST)
from: Don <dr2@xxxxxxxxxxxx>
subject: RE: RPGII conversion



you may also want to look at the Linoma toolset for some conversion
utilities as well.   I think it's www.linoma.com

Don in DC

---------------------

On Mon, 31 Mar 2003, Dan Wiesner wrote:

> I don't have a command line on me right now but try cvtrpgsrc.
>
> Dan W.
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Nick Leonessa
> Sent: Monday, March 31, 2003 8:14 PM
> To: RPG400-L@xxxxxxxxxxxx
> Subject: RPGII conversion
>
>
> Does anyone out there know the command to convert rpgII to rpg/ile.
>
> Yes there actually is RPGII code still around.
>
> Thanks.
>
> Nick L.
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (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.
>
> ---
> Incoming mail is certified Virus Free.
> Checked by AVG anti-virus system (http://www.grisoft.com).
> Version: 6.0.462 / Virus Database: 261 - Release Date: 3/13/2003
>
> ---
> Outgoing mail is certified Virus Free.
> Checked by AVG anti-virus system (http://www.grisoft.com).
> Version: 6.0.462 / Virus Database: 261 - Release Date: 3/13/2003
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (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: Mon, 31 Mar 2003 22:36:07 -0500
from: "alan" <steelville@xxxxxxxxx>
subject: Re: RPGII conversion

Depending on how much you're converting, definitely a tool.
I converted a bunch of programs a long time ago, and there
was a tool that helped immensely. (Don't even remember the
name though, imagine that..) Shee, without the tool, these
files and record formats and record level indicators and
multiple-format files are a phenomenon to convert. Such a
joy afterward!

If it's one program, manually.

If it's a hundred plus, definitely a tool, but I would
definitely take advantage of the conversion process to
convert the files they're based on to external, DDS.

-- Alan


----- Original Message -----
From: "Don" <dr2@xxxxxxxxxxxx>
To: "RPG programming on the AS400 / iSeries"
<rpg400-l@xxxxxxxxxxxx>
Sent: Monday, March 31, 2003 9:32 PM
Subject: RE: RPGII conversion


|
|
| you may also want to look at the Linoma toolset for some
conversion
| utilities as well.   I think it's www.linoma.com
|
| Don in DC
|
| ---------------------
|
| On Mon, 31 Mar 2003, Dan Wiesner wrote:
|
| > I don't have a command line on me right now but try
cvtrpgsrc.
| >
| > Dan W.
| >
| > -----Original Message-----
| > From: rpg400-l-bounces@xxxxxxxxxxxx
| > [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Nick
Leonessa
| > Sent: Monday, March 31, 2003 8:14 PM
| > To: RPG400-L@xxxxxxxxxxxx
| > Subject: RPGII conversion
| >
| >
| > Does anyone out there know the command to convert rpgII
to rpg/ile.
| >
| > Yes there actually is RPGII code still around.
| >
| > Thanks.
| >
| > Nick L.
| > _______________________________________________
| > This is the RPG programming on the AS400 / iSeries
(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.
| >
| > ---
| > Incoming mail is certified Virus Free.
| > Checked by AVG anti-virus system
(http://www.grisoft.com).
| > Version: 6.0.462 / Virus Database: 261 - Release Date:
3/13/2003
| >
| > ---
| > Outgoing mail is certified Virus Free.
| > Checked by AVG anti-virus system
(http://www.grisoft.com).
| > Version: 6.0.462 / Virus Database: 261 - Release Date:
3/13/2003
| >
| > _______________________________________________
| > This is the RPG programming on the AS400 / iSeries
(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.
| >
|
| _______________________________________________
| This is the RPG programming on the AS400 / iSeries
(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: 4
date: Tue, 1 Apr 2003 06:30:05 -0600
from: MailMan <mailman@xxxxxxxxxxxxxxxxxx>
subject: Guidelines for RPG400-L mailing list

Monthly posting of the guidelines for participation in the RPG/400
Language Mailing List.

Keep to the subject.  The topic of the list is RPG/400 Programming.
This
includes, but is not limited to, all aspects of RPG programming (ILE and

OPM), activation groups, indicators (fie!), extensions, enhancements, 
debugging, etc.

When quoting messages, do not quote the entire message.  Just quote the
parts that are needed to make the appropriate references.

Flames are absolutely prohibited.  If you disagree with someone, feel
free to argue the facts, but no personal attacks will be tolerated.

The official language of the RPG/400 Programming Mailing List is
English.

Do not post personal messages.  Please use direct E-Mail.  This list is
international in scope and personal messages just end up costing money.

Please do not use HTML to format messages ... not everyone has a HTML
enabled message reader and the extra text can (and does) cause some
mail readers to truncate messages.

Advertising products or services (including press releases) are strictly
prohibited.  Also, if you have a solution that will specificly help
another participant, feel free to tell that person.  And finally, if you
are a vendor, please identify yourself as such... do not try to pass
yourself off as a user of your own products (even if you are).

Employment related discussions are off-topic in this technical
discussion
forum.  Please restrict abstract employment discussion to MIDRANGE-L and
specific employment discussion to MIDRANGE-JOBS.

By posting to this mailing list, you are granting MIDRANGE dot COM and
David Gibbs (david@xxxxxxxxxxxx) non-exclusive, unlimited, rights to 
republish its contents.

This list IS copyrighted as a compilation.  Republication of this
mailing 
list, for anything other than personal use, without the explicit
permission 
of the list owner is a violation of U.S.  Copyright Law and will be
dealt 
with as such.

Collecting or "Mining" of email address from this forum, or any related
web archive, is strictly and explicitly prohibited (not to mention that
it is extraordinarily unprofessional).

Violation of the above guidelines will be determined by the moderator
and will result either a) The offending party will be forced to make
major modifications to a 10 year old, matching records, RPG II program
that uses every available indicator or b) permanent disconnection from
the conference (you decide which is worse).

To subscribe, unsubscribe, or change mailing list options, please vist
http://lists.midrange.com/cgi-bin/listinfo/RPG400-L

If you have questions or comments about these guidelines, please feel
free to contact the moderator, David Gibbs via internet e-mail at
david@xxxxxxxxxxxxx

MIDRANGE dot COM is a non-commercial organization and is not connected
with any corporation, periodical, or commercial enterprise.  For more
information, send Internet E-Mail to INFO@xxxxxxxxxxxxx



------------------------------

message: 5
date: Tue, 1 Apr 2003 08:07:00 -0600
from: "Malchow, Grizzly" <GMalchow@xxxxxxxxxxxxxxxxxxxxx>
subject: Data area question

Is it better to define a data area with the *DTAARA    DEFINE, or is
better do it in the D specs? Or is it just a matter of preference? I've
noticed that when it is done in the D specs, the program accesses it
with out the IN op code. We're getting errors because a data area is
locked when other programs go to access the data area. 


------------------------------

message: 6
date: Tue, 1 Apr 2003 06:39:49 -0800 (PST)
from: Scott Mildenberger <scottmildenberger@xxxxxxxxx>
subject: Re: Data area question

I prefer used the D spec's because it keeps the
definition grouped together.  I believe you have
specified the definition as a UDS on the D spec based
on your description.  Remove the U, it causes the data
area to be automatically read/updated when your
programs begins/ends.  If the U is not their then the
data area won't be accessed until you use IN.

Scott Mildenberger

--- "Malchow, Grizzly"
<GMalchow@xxxxxxxxxxxxxxxxxxxxx> wrote:
> Is it better to define a data area with the *DTAARA 
>   DEFINE, or is
> better do it in the D specs? Or is it just a matter
> of preference? I've
> noticed that when it is done in the D specs, the
> program accesses it
> with out the IN op code. We're getting errors
> because a data area is
> locked when other programs go to access the data
> area. 


__________________________________________________
Do you Yahoo!?
Yahoo! Tax Center - File online, calculators, forms, and more
http://platinum.yahoo.com

------------------------------

message: 7
date: Tue, 1 Apr 2003 08:43:18 -0600
from: "DeLong, Eric" <EDeLong@xxxxxxxxxxxxxxx>
subject: RE: Data area question

Are you saying it automatically reads (IN opcode), applying a lock? That
doesn't sound right.....  D spec and C spec should produce the same
results.
Aside from the definition, the use remains the same, via the IN, OUT,
and
UNLOCK opcodes.  Perhaps an unlock after your code that reads (and
updates)
the dataarea, though if it was working before, it should be working now.
Are you sure something else wasn't lost when you removed the DEFINE
statement?

Eric DeLong
Sally Beauty Company
MIS-Project Manager (BSG)
940-898-7863 or ext. 1863



-----Original Message-----
From: Malchow, Grizzly [mailto:GMalchow@xxxxxxxxxxxxxxxxxxxxx]
Sent: Tuesday, April 01, 2003 8:07 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Data area question


Is it better to define a data area with the *DTAARA    DEFINE, or is
better do it in the D specs? Or is it just a matter of preference? I've
noticed that when it is done in the D specs, the program accesses it
with out the IN op code. We're getting errors because a data area is
locked when other programs go to access the data area. 

_______________________________________________
This is the RPG programming on the AS400 / iSeries (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: 8
date: Tue, 1 Apr 2003 16:47:26 +0200
from: "Pelnet" <medianet@xxxxxxxxxx>
subject: Suppress subscription

Thank you to really want to suppress my subscription to your news

medianet@xxxxxxxxxx


------------------------------

message: 9
date: Tue, 01 Apr 2003 08:51:38 -0600
from: "Chris Beck" <CBeck@xxxxxxxxxxxx>
subject: CGI File upload

I am looking for a sample RPG CGI program that will allow you to upload
files.  Or if someone could just point me in the right direction.

Chris




------------------------------

message: 10
date: Tue, 1 Apr 2003 09:55:35 -0500
from: rob@xxxxxxxxx
subject: Re: Data area question

>From the manual:
A data structure defined with a U in position 23 of the definition 
specifications indicates that the data structure is a data area. You may

specify the DTAARA keyword for a data area data structure, if specified 
you can use the IN, OUT and UNLOCK operation codes to specify further 
operations for the data area. The data area is automatically read and 
locked at program initialization time, and the contents of the data 
structure are written to the data area when the program ends with LR on.

Only slightly confusing, but if you drop the U and use the DTAARA
keyword 
instead do all your problems disappear?

Rob Berendt
-- 
"They that can give up essential liberty to obtain a little temporary 
safety deserve neither liberty nor safety." 
Benjamin Franklin 




"Malchow, Grizzly" <GMalchow@xxxxxxxxxxxxxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
04/01/2003 09:07 AM
Please respond to RPG programming on the AS400 / iSeries
 
        To:     <rpg400-l@xxxxxxxxxxxx>
        cc: 
        Fax to: 
        Subject:        Data area question


Is it better to define a data area with the *DTAARA    DEFINE, or is
better do it in the D specs? Or is it just a matter of preference? I've
noticed that when it is done in the D specs, the program accesses it
with out the IN op code. We're getting errors because a data area is
locked when other programs go to access the data area. 

_______________________________________________
This is the RPG programming on the AS400 / iSeries (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: 11
date: Tue, 01 Apr 2003 07:17:36 -0800 (PST)
from: cozzi@xxxxxxxxx
subject: Re: Data area question

"Better?"
That's a subjective question.
But to avoid the lock you might want to use the API that retrieves
the data area by name.

Bob

> Is it better to define a data area with the *DTAARA    DEFINE, or
is
> better do it in the D specs? Or is it just a matter of preference?
> I've
> noticed that when it is done in the D specs, the program accesses
it
> with out the IN op code. We're getting errors because a data area
is
> locked when other programs go to access the data area. 
> 
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: <a
href="http://mail.rpgiv.com/jump/http://lists.midrange.com/mailman/listi
nfo/rpg400-l">http://lists.midrange.com/mailman/listinfo/rpg400-l</a>
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at <a
href="http://mail.rpgiv.com/jump/http://archive.midrange.com/rpg400-l";>h
ttp://archive.midrange.com/rpg400-l</a>.

------------------------------

_______________________________________________
This is the RPG programming on the AS400 / iSeries (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 2, Issue 174
****************************************

_______________________________________________
This is the RPG programming on the AS400 / iSeries (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.

As an Amazon Associate we earn from qualifying purchases.

This thread ...
Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.