🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #6450

Re: iemand die eens een kijkje wil nemen?

#6450
From: TRAX
Date: Mon, 02 Dec 2002 18:52
14 lines
1606 bytes
> Post je eens je working-storage?
> Ik denk dat je een fout hebt in de declaratie van je tabel...

here you go:

working-storage section.
       01 postcode                                      pic x(4).
       01 i                                             pic 9 value 0.
       01 j                                             pic 9 value 0.
       01 tabel.
         04 rij occurs 3.
            06 lijn occurs 3                            pic x(25).
       procedure division.
Technical Details
Message-ID: <mZNG9.31687$Ti2.5464@afrodite.telenet-ops.be>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-01!sn-xit-08!supernews.com!newsfeed.online.be!skynet.be!skynet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail
References: <PSMG9.31508$Ti2.5575@afrodite.telenet-ops.be> <3c9nuu00p4je62sijaoopf40q3j19ug4cp@4ax.com>

Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,92fa664be35792ef
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2002-12-02 10:54:05 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-01!sn-xit-08!supernews.com!newsfeed.online.be!skynet.be!skynet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail
From: "TRAX" <Stijn.Verspeet@pandora[delete.this].be>
Newsgroups: be.comp.programming
References: <PSMG9.31508$Ti2.5575@afrodite.telenet-ops.be> <3c9nuu00p4je62sijaoopf40q3j19ug4cp@4ax.com>
Subject: Re: iemand die eens een kijkje wil nemen?
Lines: 18
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <mZNG9.31687$Ti2.5464@afrodite.telenet-ops.be>
Date: Mon, 02 Dec 2002 18:52:02 GMT
NNTP-Posting-Host: 81.82.131.12
X-Complaints-To: abuse@telenet.be
X-Trace: afrodite.telenet-ops.be 1038855122 81.82.131.12 (Mon, 02 Dec 2002 19:52:02 MET)
NNTP-Posting-Date: Mon, 02 Dec 2002 19:52:02 MET
Organization: Telenet Internet