🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: ibm.software.varpg
Article #33

struct in RPG

#33
From: Sergey
Date: Fri, 02 Jun 2000 00:00
45 lines
2685 bytes
--------------211D0D301EB80AE72CBB31A7
Content-Type: text/plain; charset=koi8-r
Content-Transfer-Encoding: 7bit

Hi dear All!
As correct to describe the structure in RPG?
If through DS, that why it is impossible in different structures to
describe the field with alike names?
Otherwise, as possible do the dynamic list:
                 _____          ______        _____
                | *next  | --> | *next  | --> | *next | --> [end]
[first] <--  | *last   | <---| *last   | <---| *last   |
                |  Data |         | Data  |        | Data   |

Tnx...
Best, beginner at RPG - Sergey.

--------------211D0D301EB80AE72CBB31A7
Content-Type: text/html; charset=koi8-r
Content-Transfer-Encoding: 7bit

<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
Hi dear All!
<br>As correct to describe the structure in RPG?
<br>If through DS, that why it is impossible in different structures to
describe the field with alike names?
<br>Otherwise, as possible do the dynamic list:
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
_____&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ______&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
_____
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
|<u> *next&nbsp; </u>| --> |<u> *next&nbsp; </u>| --> |<u> *next </u>|
--> [end]
<br>[first] &lt;--&nbsp; |<u> *last&nbsp;&nbsp; </u>| &lt;---|<u> *last&nbsp;&nbsp;
</u>| &lt;---|<u> *last&nbsp;&nbsp; </u>|
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
|<u>&nbsp; Data </u>|&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; |<u>
Data&nbsp; </u>|&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; |<u> Data&nbsp;&nbsp;
|</u>
<p>Tnx...
<br>Best, beginner at RPG - Sergey.</html>

--------------211D0D301EB80AE72CBB31A7--
Technical Details
Message-ID: <39375110.7C52F400@land6.nsu.ru>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: fb1c0,746a35bf47139e92,start
X-Google-Attributes: gidfb1c0,public
X-Google-Thread: 10fc2d,746a35bf47139e92,start
X-Google-Attributes: gid10fc2d,public
From: Sergey <sergey@land6.nsu.ru>
Subject: struct in RPG
Date: 2000/06/02
Message-ID: <39375110.7C52F400@land6.nsu.ru>
X-Deja-AN: 630114803
X-Accept-Language: en
Content-Type: multipart/alternative; boundary="------------211D0D301EB80AE72CBB31A7"
X-Complaints-To: usenet@news.software.ibm.com
X-Trace: news.software.ibm.com 959923017 11108 212.164.56.2 (2 Jun 2000 05:16:57 GMT)
Organization: IBM Software Group                 
Mime-Version: 1.0
NNTP-Posting-Date: 2 Jun 2000 05:16:57 GMT
Newsgroups: ibm.software.varpg,ibm.software.code400