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


  • Subject: RE: Quote Question
  • From: "Bale, Dan" <DBale@xxxxxxxxxxxxxxxx>
  • Date: Fri, 25 Feb 2000 18:04:39 -0500

chandran,

(BTW, the name is Dan.)

>>U've chosen me today to spend ur pull R U :-),<<
Please translate into english.

If you prefer to make this discussion private, why did you bother posting
this to the list?  It certainly is a technical issue, unless you believe I
was taking a cheap shot at you.  I was not, and I explicitly stated that my
comments were "firmly in cheek".  Can I presume that you understand the
meaning of that phrase?  I apologize if you misunderstood my intent.

The RPG400-L list is supposed to be a forum for the open exchange of ideas
pertaining to the RPG language.  You offered a solution to the original
poster.  Hans Boldt has already responded that your example would not work
outside the AS/400 EBCDIC environment.  We can no longer, IMHO, reasonably
expect that our code will never see the light of day in a non-EBCDIC
environment.  Therefore, I believe that using binary codes to elicit special
characters would be asking for trouble down the road.  I believe we all
learned that lesson with Y2K.

I think it is a bit (no pun intended) much to expect most programmers to
know the binary equivalent of EBCDIC characters.  I used the BITON & BITOF
opcodes early in my career, so I understand binary.  

If you truly want my "fellings" about your code, please reply either
privately or through the list, and I will respond in kind.

Regards,
Dan Bale

-----Original Message-----
From: chandran balaji [mailto:cbalajivk@hotmail.com]
Sent: Friday, February 25, 2000 4:03 PM
To: RPG400-L@midrange.com
Subject: RE: Quote Question


This is a reply to Ben and has no technical discussion. So please apologise 
for the trouble. I plan to continue this discussion private, with Ben with 
his acknowledgement.

Ben,
U've chosen me today to spend ur pull R U :-), well what do u fell about 
this code. Is it understandable and maintainable?.

If u ask my opinion, for a decent RPG programmer this code should be both 
and more over it is explicit. Today u may want to have an Aphostrophe but in

future there might be a need for something else. If u happen to know just 
the binary equivalent of the code U R looking for, U have to jsut change the

number.

These R my personal opinion if u, have other suggestions please feel free to

send an email to cbalajivk@hotmail.com,

Cheers

From: "Bale, Dan" <DBale@TFSA.Textron.com>
Reply-To: RPG400-L@midrange.com
To: "'RPG400-L@midrange.com'" <RPG400-L@midrange.com>
Subject: RE: Quote Question
Date: Fri, 25 Feb 2000 15:10:00 -0500

Um, "it works" and "it's easily maintainable and understandable" are two
completely different animals.  ;-)

Just out of curiosity, why wouldn't you just use the double single quote?
Not just you, chandran, but the rest who use a constant or assigned variable
like SingleQuote.  Surely you can figure out:  Eval  HeSaid = 'I don''t care
what it looks like.'

In the end, I'm sure, this is a case of "whatever works for you".  I will
never begrudge anyone of that.

Anybody remember the old DataNetwork (? precursor to Midrange Computing ?)
magazine and their "shortest possible code" contests to complete a given
task?  Those worked, too, and some of the solutions were good teaching
lessons on the "advanced" state of RPG.  They ended the contests when it was
decided that a technical magazine like that should be promoting good
programming style and not "I can write that code in 'n' lines".

- Dan Bale

-----Original Message-----
From: chandran balaji [mailto:cbalajivk@hotmail.com]
Sent: Friday, February 25, 2000 2:34 PM
To: RPG400-L@midrange.com
Subject: RE: Quote Question


hey it works in all my programs and has in the past years, so i dont see a
problem.

Cheers


From: "Bale, Dan" <DBale@TFSA.Textron.com>
Reply-To: RPG400-L@midrange.com
To: "'RPG400-L@midrange.com'" <RPG400-L@midrange.com>
Subject: RE: Quote Question
Date: Fri, 25 Feb 2000 13:31:02 -0500

chandran,

With tongue FIRMLY in cheek, please assure me that I will never have to
maintain your code!

(You had no emoticons in your post, so I'm presuming you were serious.)

- Dan Bale

-----Original Message-----
From: chandran balaji [mailto:cbalajivk@hotmail.com]
Sent: Friday, February 25, 2000 12:36 PM
To: RPG400-L@midrange.com
Subject: Re: Quote Question


Here is the data struct required

* Create Aphostrophe Char
D BINARYCVT        DS
D BINNBR                  1      2B 0
D BINCHR                  2      2A

Here is the C spec

EVAL      BINNBR = 125
EVAL      WKPOST = BINCHR

WKPOST will have the Aphostrphy (') then u can use a loop to add it to the
begginig of the string and to the wnd of the string


Good luck

From: "Brian Stapleton" <Brian.Stapleton@diverseylever.com>
Reply-To: RPG400-L@midrange.com
To: "rpg400-l@midrange.com" <rpg400-l@midrange.com>
Subject: Quote Question
Date: Fri, 25 Feb 2000 11:10:00 -0500

Greetings All;

I need to create a text sting that includes a single quote.  Any Idea on how

to
do this?

I tried using specifying this on the INZ of a D-Spec and no luck.  I tried
doing this also with an EVAL and still no luck.  Any help would be
appreciated.



Brian Stapleton
Information Services
DiverseyLever Institutional
A Div of DiverseyLever
Brian.Stapleton@diverseylever.com
(248) 304-3553
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

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.