🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: ibm.software.varpg
Article #79

Re: /COPY *REMOTE

#79
From: Rolf Huegli
Date: Mon, 16 Feb 2009 14:47
66 lines
3453 bytes
Hi

It's me again.
I found out, that i changed the SysVal QCCSID from 500 to 1148 (which should 
be 500 with the euro-sign).
So Code/400 does not work with the CCSID 1148  !!!
I think this is a bug !

For the moment i changed CCSID back to 500 (and everything works fine).

Rolf


"Rolf Huegli" <huegli.bluewin@bluewin.ch> schrieb im Newsbeitrag 
news:gnbog7$1jk70$1@news.boulder.ibm.com...
> Hi
>
> I am using VARPG since several years.
> Now we got a new System i with V5R4.
>
> Since then i have the following problem:
>
> The VaRPG-Compiler gets an error after copying the /COPY member to the 
> source.
> Here ist what the compiler-listing shows:
>
>   266  * DS for Parameters 000256
>   267 D/COPY *REMOTE CTI3000/QRPGSRC,D_DS_DATA 000257
> 
> *--------------------------------------------------------------------------------------------*
>        * RPG-Teildateiname  . . . . :  D_DS_DATA *                     4
>        * Externer Name  . . . . . . :  CTI3000/QRPGSRC(D_DS_DATA) * 
> 4
> 
> *--------------------------------------------------------------------------------------------*
>   268+ /IF NOT DEFINED(D_DS_Data)      /DEFINE D_DS_Data 
> *************************************                     4000001
> 5769CL3 V6R0M0 IBM VISUALAGE RPG                         LABOR 16.02.2009 
> 14:02:16       Seite      8
>
> Zeil.- <----------------------  
>  Quellenspezifikationen ---------------------------><--- Kommentare ---> 
> DO S.    �nd.-  Src-Folge-
> Nummer 
> ....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8....+....9....+...10 
> Num Z.    Datum  ID  nummer
> ======> aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
> *RNV0275 20 a      000001+ Feld, das leer sein mu�, ist nicht leer; 
> standardm��ig wird   CTI3000/QRPGSRC(D_DS_DATA)
>                           ein Leerzeichen angenommen.
> *RNV0705 30    268 000001+ Die Anweisung /ENDIF f�r das 
> Umwandlungsprogramm fehlt f�r    CTI3000/QRPGSRC(D_DS_DATA)
>                           eine /IF-Gruppe.
>   269 000258
>   270 D*--------------------------------------  000259
>
> The Copy-member does exist, but the compiler somehow ignores the 
> end-of-line-character.
> The same varpg and copy-member used to compile fine on the old system 
> (V5R1)
>
> Does anyone has an idea, where the problem could be ?
>
> Greeting Rolf
>
> 
Technical Details
Message-ID: <gnbu9j$2d44i$1@news.boulder.ibm.com>
Path: arc1-ca.pugleaf.net!g2news2.google.com!news4.google.com!proxad.net!feeder1-2.proxad.net!194.25.134.126.MISMATCH!newsfeed01.sul.t-online.de!t-online.de!news.software.ibm.com!not-for-mail
References: <gnbog7$1jk70$1@news.boulder.ibm.com>

Show Full Headers
Complete Article Headers
X-Google-Thread: fb1c0,4d466a679690c00b
X-Google-Attributes: gidfb1c0,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII
Path: arc1-ca.pugleaf.net!g2news2.google.com!news4.google.com!proxad.net!feeder1-2.proxad.net!194.25.134.126.MISMATCH!newsfeed01.sul.t-online.de!t-online.de!news.software.ibm.com!not-for-mail
From: "Rolf Huegli" <huegli.bluewin@bluewin.ch>
Newsgroups: ibm.software.varpg
Subject: Re: /COPY *REMOTE
Date: Mon, 16 Feb 2009 15:47:11 +0100
Organization: IBM Software Newsgroup Server
Lines: 68
Message-ID: <gnbu9j$2d44i$1@news.boulder.ibm.com>
References: <gnbog7$1jk70$1@news.boulder.ibm.com>
NNTP-Posting-Host: gw.link.ch
X-Trace: news.boulder.ibm.com 1234795635 2527378 212.243.83.66 (16 Feb 2009 14:47:15 GMT)
X-Complaints-To: usenet@news.boulder.ibm.com
NNTP-Posting-Date: Mon, 16 Feb 2009 14:47:15 +0000 (UTC)
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.5512
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.5579
X-RFC2646: Format=Flowed; Response