Character replace in Quiz
Joe Boyle
atla38@dsl.pipex.com
Wed, 5 Jan 2005 19:57:58 -0000
This is a multi-part message in MIME format.
------=_NextPart_000_000A_01C4F360.DBEEB240
Content-Type: text/plain;
charset="us-ascii"
Content-Transfer-Encoding: 7bit
Just out of interest, does anyone know how the decision to kill off mpe was
arrived at ? I reckon MS should buy it up and replace DOS with it :-)
Regards, Joe.
This e-mail and all information contained in it is confidential and may be
legally privileged. If you are not the intended recipient, your access to
this e-mail is unauthorized. Any use, dissemination, distribution,
publication or copying by you of this e-mail or any of the information
contained within it is prohibited and may be unlawful. Do not open any
attachments, delete it immediately from your system and notify the sender
promptly by e-mail that you have done so. The content of this e-mail and any
attachments sent with it may have been altered without the consent or
knowledge of the author.
_____
From: powerh-l-admin@lists.sowder.com
[mailto:powerh-l-admin@lists.sowder.com] On Behalf Of Knox, Dave (Dallas,
CSC)
Sent: 05 January 2005 18:46
To: 'Robert Mills'; PowerHouse Mail List (E-mail)
Subject: RE: Character replace in Quiz
Robert
Use MPE system functions to do it for you...
In your quiz...
define D-REPLACE char*50 = '![repl("' + NAME + '",";"," ")]'
define D-NAME char*30 = getsystemval("D_REPL") if
setsystemval("D_REPL",D-REPLACE)
Where NAME is your source field and D-NAME is the result.
Regards
Dave Knox
-----Original Message-----
From: powerh-l-admin@lists.sowder.com
[mailto:powerh-l-admin@lists.sowder.com] On Behalf Of Robert Mills
Sent: Wednesday, January 05, 2005 12:06 PM
To: PowerHouse Mail List (E-mail)
Subject: Character replace in Quiz
Greetings to the -L,
Environment: Quiz 8.39.C running on MPE/iX 6.5
I have a char*30 source field that may contain any number of semi-colons
which I need to replace with spaces. Any advice on the most efficient way of
doing this?
regards,
Robert W.Mills
Systems Development Manager
Windsong Services
(020) 8309 3604
------=_NextPart_000_000A_01C4F360.DBEEB240
Content-Type: text/html;
charset="us-ascii"
Content-Transfer-Encoding: quoted-printable
<html xmlns:v=3D"urn:schemas-microsoft-com:vml" =
xmlns:o=3D"urn:schemas-microsoft-com:office:office" =
xmlns:w=3D"urn:schemas-microsoft-com:office:word" =
xmlns=3D"http://www.w3.org/TR/REC-html40">
<head>
<META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; =
charset=3Dus-ascii">
<meta name=3DGenerator content=3D"Microsoft Word 11 (filtered medium)">
<!--[if !mso]>
<style>
v\:* {behavior:url(#default#VML);}
o\:* {behavior:url(#default#VML);}
w\:* {behavior:url(#default#VML);}
.shape {behavior:url(#default#VML);}
</style>
<![endif]-->
<title>Message</title>
<style>
<!--
/* Font Definitions */
@font-face
{font-family:Wingdings;
panose-1:5 0 0 0 0 0 0 0 0 0;}
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
@font-face
{font-family:r_ansi;
panose-1:0 0 0 0 0 0 0 0 0 0;}
@font-face
{font-family:"Comic Sans MS";
panose-1:3 15 7 2 3 3 2 2 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0cm;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:"Times New Roman";}
a:link, span.MsoHyperlink
{color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{color:purple;
text-decoration:underline;}
p
{mso-margin-top-alt:auto;
margin-right:0cm;
mso-margin-bottom-alt:auto;
margin-left:0cm;
font-size:12.0pt;
font-family:"Times New Roman";}
span.EmailStyle18
{mso-style-type:personal-reply;
font-family:Arial;
color:navy;}
@page Section1
{size:612.0pt 792.0pt;
margin:72.0pt 90.0pt 72.0pt 90.0pt;}
div.Section1
{page:Section1;}
-->
</style>
</head>
<body lang=3DEN-US link=3Dblue vlink=3Dpurple>
<div class=3DSection1>
<p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span =
style=3D'font-size:
10.0pt;font-family:Arial;color:navy'>Just out of interest, does anyone =
know how
the decision to kill off mpe was arrived at ? I reckon MS should buy it =
up and
replace DOS with it </span></font><font size=3D2 color=3Dnavy =
face=3DWingdings><span
style=3D'font-size:10.0pt;font-family:Wingdings;color:navy'>J</span></fon=
t><font
size=3D2 color=3Dnavy face=3DArial><span =
style=3D'font-size:10.0pt;font-family:Arial;
color:navy'><o:p></o:p></span></font></p>
<p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span =
style=3D'font-size:
10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p>
<div>
<p><font size=3D2 color=3Dnavy face=3DArial><span =
style=3D'font-size:10.0pt;font-family:
Arial;color:navy'>Regards, Joe.</span></font><font color=3Dnavy><span
style=3D'color:navy'> <o:p></o:p></span></font></p>
<p><font size=3D2 color=3Dnavy face=3DArial><span =
style=3D'font-size:10.0pt;font-family:
Arial;color:navy'>This e-mail and all information contained in it is
confidential and may be legally privileged. If you are not the intended
recipient, your access to this e-mail is unauthorized. Any use, =
dissemination,
distribution, publication or copying by you of this e-mail or any of the
information contained within it is prohibited and may be unlawful. Do =
not open
any attachments, delete it immediately from your system and notify the =
sender
promptly by e-mail that you have done so. The content of this e-mail and =
any attachments
sent with it may have been altered without the consent or knowledge of =
the
author.</span></font><o:p></o:p></p>
</div>
<div>
<div class=3DMsoNormal align=3Dcenter style=3D'text-align:center'><font =
size=3D3
face=3D"Times New Roman"><span style=3D'font-size:12.0pt'>
<hr size=3D3 width=3D"100%" align=3Dcenter tabindex=3D-1>
</span></font></div>
<p class=3DMsoNormal><b><font size=3D2 face=3DTahoma><span =
style=3D'font-size:10.0pt;
font-family:Tahoma;font-weight:bold'>From:</span></font></b><font =
size=3D2
face=3DTahoma><span style=3D'font-size:10.0pt;font-family:Tahoma'>
powerh-l-admin@lists.sowder.com [mailto:powerh-l-admin@lists.sowder.com] =
<b><span
style=3D'font-weight:bold'>On Behalf Of </span></b>Knox, Dave (Dallas, =
CSC)<br>
<b><span style=3D'font-weight:bold'>Sent:</span></b> 05 January 2005 =
18:46<br>
<b><span style=3D'font-weight:bold'>To:</span></b> 'Robert Mills'; =
PowerHouse
Mail List (E-mail)<br>
<b><span style=3D'font-weight:bold'>Subject:</span></b> RE: Character =
replace in
Quiz</span></font><o:p></o:p></p>
</div>
<p class=3DMsoNormal><font size=3D3 face=3D"Times New Roman"><span =
style=3D'font-size:
12.0pt'><o:p> </o:p></span></font></p>
<div>
<p class=3DMsoNormal><font size=3D2 color=3Dblue face=3DArial><span =
style=3D'font-size:
10.0pt;font-family:Arial;color:blue'>Robert</span></font><o:p></o:p></p>
</div>
<div>
<p class=3DMsoNormal><font size=3D3 face=3D"Times New Roman"><span =
style=3D'font-size:
12.0pt'> <o:p></o:p></span></font></p>
</div>
<div>
<p class=3DMsoNormal><font size=3D2 color=3Dblue face=3DArial><span =
style=3D'font-size:
10.0pt;font-family:Arial;color:blue'>Use MPE system functions to do it =
for
you...</span></font><o:p></o:p></p>
</div>
<div>
<p class=3DMsoNormal><font size=3D3 face=3D"Times New Roman"><span =
style=3D'font-size:
12.0pt'> <o:p></o:p></span></font></p>
</div>
<div>
<p class=3DMsoNormal><font size=3D2 color=3Dblue face=3DArial><span =
style=3D'font-size:
10.0pt;font-family:Arial;color:blue'>In your =
quiz...</span></font><o:p></o:p></p>
</div>
<div>
<p class=3DMsoNormal><font size=3D3 face=3D"Times New Roman"><span =
style=3D'font-size:
12.0pt'> <o:p></o:p></span></font></p>
</div>
<div>
<p class=3DMsoNormal><font size=3D2 color=3Dblue face=3D"r_ansi"><span
style=3D'font-size:10.0pt;font-family:r_ansi;color:blue'>define =
D-REPLACE char*50
=3D '![repl("' + NAME + '",";"," ")]'<br>
define D-NAME char*30 =3D getsystemval("D_REPL") if
setsystemval("D_REPL",D-REPLACE)<o:p></o:p></span></font></p>
</div>
<div>
<p class=3DMsoNormal><font size=3D2 color=3Dblue face=3DArial><span =
style=3D'font-size:
10.0pt;font-family:Arial;color:blue'>Where NAME is your source field and =
D-NAME
is the result.</span></font><o:p></o:p></p>
</div>
<div>
<p class=3DMsoNormal><font size=3D3 face=3D"Times New Roman"><span =
style=3D'font-size:
12.0pt'> <o:p></o:p></span></font></p>
</div>
<div>
<p class=3DMsoNormal><font size=3D2 color=3Dblue face=3DArial><span =
style=3D'font-size:
10.0pt;font-family:Arial;color:blue'>Regards</span></font><o:p></o:p></p>=
</div>
<div>
<p class=3DMsoNormal><font size=3D2 color=3Dblue face=3DArial><span =
style=3D'font-size:
10.0pt;font-family:Arial;color:blue'>Dave =
Knox</span></font><o:p></o:p></p>
</div>
<div>
<p class=3DMsoNormal><font size=3D3 face=3D"Times New Roman"><span =
style=3D'font-size:
12.0pt'> <o:p></o:p></span></font></p>
</div>
<blockquote =
style=3D'margin-top:5.0pt;margin-right:0cm;margin-bottom:5.0pt'>
<p class=3DMsoNormal style=3D'margin-bottom:12.0pt'><font size=3D2 =
face=3DTahoma><span
style=3D'font-size:10.0pt;font-family:Tahoma'>-----Original =
Message-----<br>
<b><span style=3D'font-weight:bold'>From:</span></b> =
powerh-l-admin@lists.sowder.com
[mailto:powerh-l-admin@lists.sowder.com] <b><span =
style=3D'font-weight:bold'>On
Behalf Of </span></b>Robert Mills<br>
<b><span style=3D'font-weight:bold'>Sent:</span></b> Wednesday, January =
05, 2005
12:06 PM<br>
<b><span style=3D'font-weight:bold'>To:</span></b> PowerHouse Mail List =
(E-mail)<br>
<b><span style=3D'font-weight:bold'>Subject:</span></b> Character =
replace in Quiz</span></font><o:p></o:p></p>
<p><font size=3D2 face=3D"Comic Sans MS"><span =
style=3D'font-size:10.0pt;font-family:
"Comic Sans MS"'><!-- Converted from text/rtf format -->Greetings to the =
-L,</span></font>
<o:p></o:p></p>
<p><font size=3D2 face=3D"Comic Sans MS"><span =
style=3D'font-size:10.0pt;font-family:
"Comic Sans MS"'>Environment: Quiz 8.39.C running on MPE/iX =
6.5</span></font> <o:p></o:p></p>
<p><font size=3D2 face=3D"Comic Sans MS"><span =
style=3D'font-size:10.0pt;font-family:
"Comic Sans MS"'>I have a char*30 source field that may contain any =
number of
semi-colons which I need to replace with spaces. Any advice on the most
efficient way of doing this?</span></font><o:p></o:p></p>
<p><font size=3D2 face=3D"Comic Sans MS"><span =
style=3D'font-size:10.0pt;font-family:
"Comic Sans MS"'>regards,</span></font> <br>
<font face=3DArial><span =
style=3D'font-family:Arial'> </span></font> <br>
<font size=3D2 face=3D"Comic Sans MS"><span =
style=3D'font-size:10.0pt;font-family:
"Comic Sans MS"'>Robert W.Mills</span></font> <br>
<font size=3D2 face=3D"Comic Sans MS"><span =
style=3D'font-size:10.0pt;font-family:
"Comic Sans MS"'>Systems Development Manager</span></font> <br>
<font size=3D2 face=3D"Comic Sans MS"><span =
style=3D'font-size:10.0pt;font-family:
"Comic Sans MS"'>Windsong Services</span></font> <br>
<font size=3D2 face=3D"Comic Sans MS"><span =
style=3D'font-size:10.0pt;font-family:
"Comic Sans MS"'>(0</span></font><font size=3D2 face=3D"Comic Sans =
MS"><span
lang=3DEN-GB style=3D'font-size:10.0pt;font-family:"Comic Sans =
MS"'>20</span></font><font
size=3D2 face=3D"Comic Sans MS"><span =
style=3D'font-size:10.0pt;font-family:"Comic Sans MS"'>)</span></font>
<font size=3D2 face=3D"Comic Sans MS"><span lang=3DEN-GB =
style=3D'font-size:10.0pt;
font-family:"Comic Sans MS"'>8309 3604</span></font><span lang=3DEN-GB> =
</span><o:p></o:p></p>
</blockquote>
</div>
</body>
</html>
------=_NextPart_000_000A_01C4F360.DBEEB240--