QTP, QUIZ Files with commas.

Wed, 17 Oct 2001 15:49:38 +0100

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.

------_=_NextPart_001_01C1571A.F2507590
Content-Type: text/plain;
	charset="iso-8859-1"

Perhaps the following work-in-progress command might interest somebody?

  echo
![s+'R;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;']
  echo ![b+' DEL2SUB - Convert delimited file to PowerHouse Portable
Subfile']
  echo
![s+'5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;']
  echo ![b+'']
  echo ![b+' Syntax:']
  echo ![b+'   DEL2SUB ifile[, [ofile][, delim]]']
  echo ![b+'']
  echo ![b+' Parameters:']
  echo ![b+'   ifile   Name of delimited file.']
  echo ![b+'   ofile   Name to use for TEMPORARY Portable Subfile.']
  echo ![b+'   delim   Field delimiter (default: TAB).']
  echo ![b+'']
  echo ![b+' Restrictions:']
  echo ![b+'   Current version only supports TAB (decimal 9) as a
delimiter']
  echo ![b+'']
  echo ![b+' Additional Notes:']
  echo ![b+'   In MS-Excel, make sure all the cells are not activated. The']
  echo ![b+'   best way is to copy the area you want to transfer to a new']
  echo ![b+'   worksheet (exclude column headings), save the worksheet as']
  echo ![b+'   Text (Tab delimited)(.txt).']
  echo ![b+'   Transfer the file to the HP3000 as ASCII. Set host record']
  echo ![b+'   size to 1000 (so the file won't wrap). Make sure to NOT']
  echo ![b+'   convert TABs to SPACEs.']
  echo ![b+'']
  echo
![s+'F;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;']
  #
  # Author: Robert W.Mills
  #

<very large snip to hide very untidy alpha code>

Modification History:

Versn |   Date     | Who | Reason for Change
------+------------+-----+------------------------------------------
01.00 | dd/mm/2001 | RWM | Initial version. Based on DELIM.QZPRGMS
      |            |     | written by Kim A.Williams (11/08/98).
      |            |     | Now handles any size file but is slower
      |            |     | than original (reads input file twice).

#===================================================================
# End of command file.
#===================================================================

*****************************
Robert W.Mills, Systems Development Manager, Windsong Services 
 Electron House, Cray Avenue, St. Mary Cray, Kent BR5 3PN, ENGLAND
Tel: +44 (0)1689.870622 x 3005  Fax: +44 (0)1689 899026
robert.mills@windsong-services.co.uk
********************************
The thoughts, comments, and opinions expressed herein are mine.
They do not reflect those of my employer, nor anyone else.
********************************
***Confidentiality Notice: This e-mail message, including any attachments,
is for the sole use of the intended recipient(s) and may contain
confidential and privileged information. Any unauthorized review, use,
disclosure or distribution is prohibited. If you are not the intended
recipient, please contact the sender by reply e-mail and destroy all copies
of the original message.
-----Original Message-----
From: Seamus BROWNE [mailto:Seamus.Browne@partage.org]
Sent: 17 October 2001 14:50
To: powerh-l@lists.swau.edu
Subject: QTP, QUIZ Files with commas.

Hi, 
I found your posting on the PH list, concerning the commas within records.

On a HP3000, the awk utility 
Someone already suggested in reply to your posting that it would be easier
 to do the REPLACE op outside of PH, from within a job.
HP3000 users have access to the Unix ( PosiX ) utility "awk". AWK.HPBIN.SYS.

Awk seems to be the standard for parsing, replacing data in files or
building new files 
with reformatted data (using the printf function) .

I have not used it, yet. 
The syntax is here <http://vectorsite.tripod.com/tsawk2.html#m2>
http://vectorsite.tripod.com/tsawk2.html#m2

Now if I may widen the debate.
We are having the same kind of comma problem here.  Or soon will be, when
we start receiving big files from Internet cgis. (Common gateway interfaces)
Fields in these files are separated by "|" or commas or semi-colons and the
object of the game is to get them into the (Image) database.

Now I think that that is problem that will be facing hundreds of PH users
the
world over.

Introducing a REPLACE function in QTP and QUIZ would certainly increase
efficiency, but in world where file portability is an absolute necessity, it
would 
only be a very small step.

What I am looking for is a file conversion utility that would take a file
from the Net, 
full of data with separators and transform it into a standard PH subfile. 
Or even a PH "portable subfile" (i.e. a data file and a mini-dictionary
file). When 
I say a file conversion utility, this could be a job or command file that
calls awk 
and/or other stuff but eventually produces a file directly recognisable by
PH 
and without the hassle of declaring a file in the dictionary.

Anyone interested in putting this together ?

Seamus.Browne@partage.org

------_=_NextPart_001_01C1571A.F2507590
Content-Type: text/html;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML xmlns=3D"http://www.w3.org/TR/REC-html40" xmlns:o =3D=20
"urn:schemas-microsoft-com:office:office" xmlns:w =3D=20
"urn:schemas-microsoft-com:office:word"><HEAD>
<META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; =
charset=3Diso-8859-1">

<META content=3DWord.Document name=3DProgId>
<META content=3D"MSHTML 5.00.3315.2870" name=3DGENERATOR>
<META content=3D"Microsoft Word 9" name=3DOriginator><LINK=20
href=3D"cid:filelist.xml@01C15724.F3C38200" rel=3DFile-List><!--[if gte =
mso 9]><xml>
 <o:OfficeDocumentSettings>
  <o:DoNotRelyOnCSS/>
 </o:OfficeDocumentSettings>
</xml><![endif]--><!--[if gte mso 9]><xml>
 <w:WordDocument>
  <w:View>Normal</w:View>
  <w:Zoom>0</w:Zoom>
  <w:DocumentKind>DocumentEmail</w:DocumentKind>
  <w:HyphenationZone>21</w:HyphenationZone>
  <w:EnvelopeVis/>
 </w:WordDocument>
</xml><![endif]-->
<STYLE>@font-face {
	font-family: Verdana;
}
P.MsoNormal {
	FONT-FAMILY: Verdana; FONT-SIZE: 11pt; MARGIN: 0cm 0cm 0pt; =
mso-bidi-font-size: 12.0pt; mso-style-parent: ""; mso-pagination: =
widow-orphan; mso-fareast-font-family: "Times New Roman"; =
mso-bidi-font-family: "Times New Roman"
}
LI.MsoNormal {
	FONT-FAMILY: Verdana; FONT-SIZE: 11pt; MARGIN: 0cm 0cm 0pt; =
mso-bidi-font-size: 12.0pt; mso-style-parent: ""; mso-pagination: =
widow-orphan; mso-fareast-font-family: "Times New Roman"; =
mso-bidi-font-family: "Times New Roman"
}
DIV.MsoNormal {
	FONT-FAMILY: Verdana; FONT-SIZE: 11pt; MARGIN: 0cm 0cm 0pt; =
mso-bidi-font-size: 12.0pt; mso-style-parent: ""; mso-pagination: =
widow-orphan; mso-fareast-font-family: "Times New Roman"; =
mso-bidi-font-family: "Times New Roman"
}
A:link {
	COLOR: blue; TEXT-DECORATION: underline; text-underline: single
}
SPAN.MsoHyperlink {
	COLOR: blue; TEXT-DECORATION: underline; text-underline: single
}
A:visited {
	COLOR: purple; TEXT-DECORATION: underline; text-underline: single
}
SPAN.MsoHyperlinkFollowed {
	COLOR: purple; TEXT-DECORATION: underline; text-underline: single
}
P.MsoAutoSig {
	FONT-FAMILY: Verdana; FONT-SIZE: 11pt; MARGIN: 0cm 0cm 0pt; =
mso-bidi-font-size: 12.0pt; mso-pagination: widow-orphan; =
mso-fareast-font-family: "Times New Roman"; mso-bidi-font-family: =
"Times New Roman"
}
LI.MsoAutoSig {
	FONT-FAMILY: Verdana; FONT-SIZE: 11pt; MARGIN: 0cm 0cm 0pt; =
mso-bidi-font-size: 12.0pt; mso-pagination: widow-orphan; =
mso-fareast-font-family: "Times New Roman"; mso-bidi-font-family: =
"Times New Roman"
}
DIV.MsoAutoSig {
	FONT-FAMILY: Verdana; FONT-SIZE: 11pt; MARGIN: 0cm 0cm 0pt; =
mso-bidi-font-size: 12.0pt; mso-pagination: widow-orphan; =
mso-fareast-font-family: "Times New Roman"; mso-bidi-font-family: =
"Times New Roman"
}
SPAN.StyleCourrierlectronique15 {
	COLOR: black; mso-bidi-font-family: Arial; mso-style-type: =
personal-compose; mso-ansi-font-size: 10.0pt; mso-ascii-font-family: =
Arial; mso-hansi-font-family: Arial
}
DIV.Section1 {
	page: Section1
}
</STYLE>
</HEAD>
<BODY lang=3DFR link=3Dblue style=3D"tab-interval: 35.4pt" =
vLink=3Dpurple>
<DIV><FONT color=3D#0000ff face=3D"Comic Sans MS" size=3D2><SPAN=20
class=3D984024314-17102001>Perhaps the following work-in-progress =
command might=20
interest somebody?</SPAN></FONT></DIV>
<DIV><FONT face=3D"Comic Sans MS"><SPAN =
class=3D984024314-17102001>&nbsp;</DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo=20
![s+'R;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;'=
]<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+' DEL2SUB - Convert =
delimited=20
file to PowerHouse Portable=20
Subfile']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo=20
![s+'5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;'=
]<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo=20
![b+'']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'=20
Syntax:']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>DEL2SUB ifile[, =
[ofile][,=20
delim]]']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo=20
![b+'']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'=20
Parameters:']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>ifile<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>Name of delimited=20
file.']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>ofile<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>Name to use for =
TEMPORARY Portable=20
Subfile.']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>delim<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>Field delimiter =
(default:=20
TAB).']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo=20
![b+'']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'=20
Restrictions:']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>Current version only =
supports TAB=20
(decimal 9) as a =
delimiter']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo=20
![b+'']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+' Additional=20
Notes:']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>In MS-Excel, make sure =
all the=20
cells are not activated. =
The']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>best way is to copy the =
area you=20
want to transfer to a =
new']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>worksheet (exclude =
column=20
headings), save the worksheet =
as']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>Text (Tab=20
delimited)(.txt).']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+' <SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp;</SPAN>Transfer the file to the =
HP3000 as=20
ASCII. Set host record']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>size to 1000 (so the =
file won't=20
wrap). Make sure to NOT']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo ![b+'<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>convert TABs to=20
SPACEs.']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo=20
![b+'']<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp; </SPAN>echo=20
![s+'F;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;'=
]</SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT color=3D#0000ff face=3D"Courier New" =
size=3D2><SPAN=20
style=3D"mso-fareast-font-family: 'MS Mincho'"><SPAN=20
class=3D984024314-17102001>&nbsp; #</SPAN></SPAN></FONT></DIV>
<DIV class=3DMsoPlainText><FONT color=3D#0000ff face=3D"Courier New" =
size=3D2><SPAN=20
style=3D"mso-fareast-font-family: 'MS Mincho'"><SPAN=20
class=3D984024314-17102001>&nbsp; # Author: Robert=20
W.Mills</SPAN></SPAN></FONT></DIV>
<DIV class=3DMsoPlainText><FONT color=3D#0000ff face=3D"Courier New" =
size=3D2><SPAN=20
style=3D"mso-fareast-font-family: 'MS Mincho'"><SPAN=20
class=3D984024314-17102001>&nbsp; #</SPAN></SPAN></FONT></DIV>
<DIV class=3DMsoPlainText><FONT color=3D#0000ff face=3D"Courier New" =
size=3D2><SPAN=20
style=3D"mso-fareast-font-family: 'MS Mincho'"><SPAN=20
class=3D984024314-17102001></SPAN></SPAN></FONT>&nbsp;</DIV>
<DIV class=3DMsoPlainText><FONT color=3D#0000ff face=3D"Courier New" =
size=3D2><SPAN=20
style=3D"mso-fareast-font-family: 'MS Mincho'"><SPAN=20
class=3D984024314-17102001>&lt;very large snip to hide very untidy =
alpha=20
code&gt;</SPAN></SPAN></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp;<FONT face=3D"Comic Sans =
MS"><SPAN=20
class=3D984024314-17102001>&nbsp;</SPAN></FONT></SPAN><o:p></o:p></SPAN>=
</FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN=20
style=3D"mso-fareast-font-family: 'MS Mincho'">Modification=20
History:<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN=20
style=3D"mso-fareast-font-family: 'MS =
Mincho'">&nbsp;<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'">Versn=20
|<SPAN style=3D"mso-spacerun: yes">&nbsp;&nbsp; </SPAN>Date<SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp;&nbsp;&nbsp; </SPAN>| Who | =
Reason for=20
Change<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN=20
style=3D"mso-fareast-font-family: 'MS =
Mincho'">------+------------+-----+-------------------------------------=
-----<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'">01.00 |=20
dd/mm/2001 | RWM | Initial version. Based on=20
DELIM.QZPRGMS<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =
</SPAN>|<SPAN=20
style=3D"mso-spacerun: =
yes">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =

</SPAN>|<SPAN style=3D"mso-spacerun: yes">&nbsp; </SPAN><SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp;&nbsp;</SPAN>| written by Kim =
A.Williams=20
(11/08/98).<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =
</SPAN>|<SPAN=20
style=3D"mso-spacerun: =
yes">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =

</SPAN>|<SPAN style=3D"mso-spacerun: yes">&nbsp;&nbsp;&nbsp;&nbsp; =
</SPAN>| Now=20
handles any size file but is =
slower<o:p></o:p></SPAN></FONT></FONT></FONT></DIV>
<DIV class=3DMsoPlainText><FONT size=3D2><FONT color=3D#0000ff><FONT=20
face=3D"Courier New"><SPAN style=3D"mso-fareast-font-family: 'MS =
Mincho'"><SPAN=20
style=3D"mso-spacerun: yes">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =
</SPAN>|<SPAN=20
style=3D"mso-spacerun: =
yes">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =

|&nbsp;&nbsp;&nbsp;&nbsp; =
| than=20
original (reads input file =
twice).<o:p></o:p></DIV>
<DIV class=3DMsoPlainText><FONT=20
face=3D"Courier New"><SPAN=20
style=3D"mso-fareast-font-family: 'MS =
Mincho'">&nbsp;<o:p></o:p></DIV>
<DIV class=3DMsoPlainText><FONT=20
face=3D"Courier New"><SPAN=20
style=3D"mso-fareast-font-family: 'MS =
Mincho'">#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D<o:p><=
/o:p></DIV>
<DIV class=3DMsoPlainText><FONT=20
face=3D"Courier New"># End of=20
command file.<o:p></o:p></DIV>
<DIV class=3DMsoPlainText><FONT=20
face=3D"Courier New"><SPAN=20
style=3D"mso-fareast-font-family: 'MS =
Mincho'">#=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D<o:p><=
/o:p></DIV>
<DIV>&nbsp;</DIV>
<DIV align=3Dcenter>vvvvvvvvvvvvvvvvvvvvvvvvvvvvv</DIV>
<DIV align=3Dcenter>Robert=20
W.Mills, Systems Development Manager, Windsong Services </DIV>
<DIV align=3Dcenter>&nbsp;Electron=20
House, Cray Avenue, St. Mary Cray, Kent BR5 3PN, ENGLAND</DIV>
<DIV align=3Dcenter>Tel: +44=20
(0)1689.870622 x 3005&nbsp; Fax: +44 (0)1689 899026</DIV>
<DIV align=3Dcenter>robert.mills@windsong-services.co.uk</DIV>
<DIV align=3Dcenter>ssssssssssssssssssssssssssssssss</DIV>
<DIV align=3Dcenter>The=20
thoughts, comments, and opinions expressed herein are =
mine.</DIV>
<DIV align=3Dcenter>They do not=20
reflect those of my employer, nor anyone else.</DIV>
<DIV align=3Dcenter>ssssssssssssssssssssssssssssssss</DIV>
<DIV align=3Dcenter>***Confidentiality Notice: This e-mail message, including any=20
attachments, is for the sole use of the intended recipient(s) and may =
contain=20
confidential and privileged information. Any unauthorized review, use,=20
disclosure or distribution is prohibited. If you are not the intended =
recipient,=20
please contact the sender by reply e-mail and destroy all copies of the =
original=20
message.</DIV>
<BLOCKQUOTE style=3D"MARGIN-RIGHT: 0px">
 <DIV align=3Dleft class=3DOutlookMessageHeader dir=3Dltr>-----Original Message----- From: Seamus BROWNE=20
 [mailto:Seamus.Browne@partage.org] Sent: 17 October 2001=20
 14:50 To: powerh-l@lists.swau.edu Subject: QTP, =
QUIZ Files=20
 with commas. </DIV>
 <DIV class=3DSection1>
 Hi,=20
 <o:p></o:p>
 I=20
 found your posting on the PH list, concerning the commas within=20
 records.<o:p></o:p>
 <![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p>=

  <P class=3DMsoNormal><SPAN =
class=3DStyleCourrierlectronique15><B><FONT=20
  color=3D#333399 face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333399; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
FONT-WEIGHT: bold; mso-bidi-font-size: 12.0pt; mso-ansi-language: =
EN-GB">On=20
  a HP3000, the awk utility <o:p></o:p></SPAN></FONT></B></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB">Someone=20
  already suggested in reply to your posting that it would be=20
  easier<o:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB"><SPAN=20
  style=3D"mso-spacerun: yes">&nbsp;</SPAN>to do the REPLACE op outside =
of PH,=20
  from within a job.<o:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB">HP3000=20
  users have access to the Unix ( PosiX ) utility "awk".=20
  AWK.HPBIN.SYS.<o:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB"><![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></SPAN></FONT></SPAN></P>=

  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB">Awk=20
  seems to be the standard for parsing, replacing data in files or =
building new=20
  files <o:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB">with=20
  reformatted data (using the printf function)=20
  .<o:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB"><![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></SPAN></FONT></SPAN></P>=

  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB">I=20
  have not used it, yet. <o:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB">The=20
  syntax is here <A =
href=3D"http://vectorsite.tripod.com/tsawk2.html#m2"><FONT=20
  color=3D#333333><SPAN=20
  style=3D"COLOR: =
#333333">http://vectorsite.tripod.com/tsawk2.html#m2</SPAN></FONT></A><o=
:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB"><![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></SPAN></FONT></SPAN></P>=

<FONT=20
 color=3D#333399 face=3DArial size=3D2>Now=20
 if I may widen the debate.<o:p></o:p>
 We=20
 are having the same kind of comma problem here. <SPAN=20
 style=3D"mso-spacerun: yes">&nbsp;Or soon will be,=20
 when<o:p></o:p>
 we=20
 start receiving big files from Internet cgis. (Common gateway=20
 interfaces)<o:p></o:p>
 Fields=20
 in these files are separated by "|" or commas or semi-colons and=20
 the<o:p></o:p>
 object=20
 of the game is to get them into the (Image)=20
 database.<o:p></o:p>
 <![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p>=

  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB">Now=20
  I think that that is problem that will be facing hundreds of PH users =

  the<o:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB">world=20
  over.<o:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB"><![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></SPAN></FONT></SPAN></P>=

  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB">Introducing=20
  a REPLACE function in QTP and QUIZ would certainly=20
  increase<o:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB">efficiency,=20
  but in world where file portability is an absolute necessity, it =
would=20
  <o:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB">only=20
  be a very small step.<o:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB"><![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></SPAN></FONT></SPAN></P>=

What=20
 I am looking for is a file conversion utility that would take a file =
from the=20
 Net, <o:p></o:p>
 full=20
 of data with separators and transform it into a standard PH subfile.=20
 <o:p></o:p>
 Or=20
 even a PH "portable subfile" (i.e. a data file and a mini-dictionary =
file).=20
 When <o:p></o:p>
 I=20
 say a file conversion utility, this could be a job or command file =
that calls=20
 awk <o:p></o:p>
 and/or=20
 other stuff but eventually produces a file directly recognisable by =
PH=20
 <o:p></o:p>
 and=20
 without the hassle of declaring a file in the=20
 dictionary.<o:p></o:p>
 <![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p>=

  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB">Anyone=20
  interested in putting this together =
?<o:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB"><![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></SPAN></FONT></SPAN></P>=

  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: =
EN-GB">Seamus.Browne@partage.org<o:p></o:p></SPAN></FONT></SPAN></P>
  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB"><![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></SPAN></FONT></SPAN></P>=

  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB"><![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></SPAN></FONT></SPAN></P>=

  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB"><![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></SPAN></FONT></SPAN></P>=

  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB"><![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></SPAN></FONT></SPAN></P>=

  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB"><![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></SPAN></FONT></SPAN></P>=

  <P class=3DMsoNormal><SPAN class=3DStyleCourrierlectronique15><FONT =
color=3D#333333=20
  face=3DArial size=3D2><SPAN lang=3DEN-GB=20
  style=3D"COLOR: #333333; FONT-FAMILY: Arial; FONT-SIZE: 10pt; =
mso-bidi-font-size: 12.0pt; mso-ansi-language: EN-GB"><![if =
!supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></SPAN></FONT></SPAN></P>=
</DIV></BLOCKQUOTE></BODY></HTML>

------_=_NextPart_001_01C1571A.F2507590--