SV: SV: write to file with quick

Jari.Kaljunen@teliasonera.com Jari.Kaljunen@teliasonera.com
Thu, 16 Sep 2004 21:41:55 +0200


This is a multi-part message in MIME format.

------_=_NextPart_001_01C49C25.38F9D8E4
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

You mean file asc600 designer open append ?
=20
Well, it didn't help..
=20
/Jari

=20

=20

-----Ursprungligt meddelande-----
Fr=E5n: Peter Bateman [mailto:ppfb@hotmail.com]
Skickat: den 16 september 2004 21:02
Till: powerh-l@lists.sowder.com
=C4mne: RE: SV: write to file with quick



I would try 'file asc600 designer open append' It may be a machine =
specific option.

But I didn't see it in the manual though.

Regards,

Peter



>From: <Jari.Kaljunen@teliasonera.com>=20
>To: <powerh-l@lists.sowder.com>=20
>Subject: SV: write to file with quick=20
>Date: Thu, 16 Sep 2004 12:22:20 +0200=20
>=20
>Hello again,=20
>=20
>a little test without reading database still very slow (actually no =
difference...). It takes 49 s to run this with 100 records on subfile. =
The result file is 20100 lines.=20
>=20
>I even wrote a test quiz reading the same subfile and having 200 =
defines, each including systime and some more, each defined item written =
on an own line. It takes quiz 3 s to write these 20000 lines.=20
>=20
>=20
>/Jari=20
>=20
>=20
>screen test_writing_file menu stopscreen=20
>=20
>file *ik006002 designer=20
>file asc600 designer=20
>=20
>temp t_count=20
>=20
>procedure internal write=20
>   begin=20
>      for 200=20
>         begin=20
>            let t_count =3D t_count + 1=20
>            let rec600 =3D asc(t_count) &=20
>                 + " " + asc(systime) + " procedure internal write "=20
>            put asc600 reset=20
>         end=20
>   end=20
>=20
>procedure initialize=20
>   begin=20
>    let t_count =3D 0=20
>    while retr ik006002 seq=20
>      begin=20
>        let rec600 =3D asc(t_count) &=20
>                 + " " + asc(systime) + " procedure initialize "=20
>        put asc600 reset=20
>        do internal write=20
>      end=20
>      return=20
>   end=20
>=20
>build=20
>=20
>-----Ursprungligt meddelande-----=20
>Fr=E5n: Johnson, Harold A EDUC:EX=20
>[mailto:Harold.A.Johnson@gems1.gov.bc.ca]=20
>Skickat: den 15 september 2004 17:50=20
>Till: Kaljunen, Jari S. /TSS - Sergel Kredittj=E4nster /+46-8-4526435;=20
>powerh-l@lists.sowder.com=20
>=C4mne: RE: write to file with quick=20
>=20
>=20
>Are you sure the performance problem is with the writing and not with =
the=20
>reading of the original data?   I would suspect a problem there =
instead.=20
>=20
>=20
>-----Original Message-----=20
>From: powerh-l-admin@lists.sowder.com=20
>[mailto:powerh-l-admin@lists.sowder.com]On Behalf Of=20
>Jari.Kaljunen@teliasonera.com=20
>Sent: 2004 September 15 8:41 AM=20
>To: powerh-l@lists.sowder.com=20
>Subject: write to file with quick=20
>=20
>=20
>Hello,=20
>=20
>I am writing to=20
>=20
>File: ASC600=20
>Organization: SEQUENTIAL=20
>Type: RMS=20
>Open: ASC600=20
>Record Format: Variable=20
>Supersede: No=20
>Records & Sizes: ASC600 600 bytes=20
>Item Type Size Occ Offset=20
>REC600 CHARACTER 600=20
>=20
>in quick using let and put as follows=20
>=20
>let rec600 =3D "<HeaderRef2>" + asc(arnr of arenden,8) + =
asc(parmblnr,2) &=20
>+ atgkod of atgkoder + "</HeaderRef2>"=20
>=20
>put asc600 reset=20
>=20
>=20
>The performance is very poor. The administrator believs that quick =
closes=20
>and opens the file all the time.=20
>Can that be true?=20
>What should I do?=20
>=20
>We are creating an xml-file (it will be about 5 GB) with data from =
several=20
>tables and our solution with qtp needed too many subfiles and sortings =
using=20
>lots of space.=20
>=20
>/Jari=20
>=20
>=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=20
>Mailing list: powerh-l@lists.sowder.com=20
>Subscribe: "subscribe" in message body to =
powerh-l-request@lists.sowder.com=20
>Unsubscribe: "unsubscribe <password>" in message body to=20
>powerh-l-request@lists.sowder.com=20
>http://lists.sowder.com/mailman/listinfo/powerh-l=20
>This list is closed, thus to post to the list you must be a subscriber. =

>=20
>=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=20
>Mailing list: powerh-l@lists.sowder.com=20
>Subscribe: "subscribe" in message body to =
powerh-l-request@lists.sowder.com=20
>Unsubscribe: "unsubscribe <password>" in message body to =
powerh-l-request@lists.sowder.com=20
>http://lists.sowder.com/mailman/listinfo/powerh-l=20
>This list is closed, thus to post to the list you must be a subscriber. =


  _____ =20

Don't just Search. Find! The new MSN Search:  =
<http://g.msn.com/8HMBENCA/2749??PS=3D47575> Fast. Clear. Easy. =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 Mailing list: powerh-l@lists.sowder.com =
Subscribe: "subscribe" in message body to =
powerh-l-request@lists.sowder.com Unsubscribe: "unsubscribe " in message =
body to powerh-l-request@lists.sowder.com =
http://lists.sowder.com/mailman/listinfo/powerh-l This list is closed, =
thus to post to the list you must be a subscriber.=20


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

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; =
charset=3Diso-8859-1">


<META content=3D"MSHTML 6.00.2800.1458" name=3DGENERATOR></HEAD>
<BODY>
<DIV><FONT face=3DArial><SPAN class=3D417504019-16092004><FONT =
color=3D#0000ff=20
size=3D2>You mean<FONT face=3Dr_ansi> </FONT></FONT><FONT =
color=3D#0000ff><FONT=20
size=3D2><FONT face=3Dr_ansi>file asc600 designer open append<SPAN=20
class=3D417504019-16092004> =
?</SPAN></FONT></FONT></FONT></SPAN></FONT></DIV>
<DIV><FONT face=3DArial><SPAN class=3D417504019-16092004><FONT =
color=3D#0000ff><FONT=20
size=3D2><FONT face=3Dr_ansi><SPAN=20
class=3D417504019-16092004></SPAN></FONT></FONT></FONT></SPAN></FONT>&nbs=
p;</DIV>
<DIV><FONT face=3DArial><SPAN class=3D417504019-16092004><FONT =
color=3D#0000ff><FONT=20
size=3D2><FONT face=3Dr_ansi><SPAN class=3D417504019-16092004>Well, it =
didn't=20
help..</SPAN></FONT></FONT></FONT></SPAN></FONT></DIV>
<DIV><FONT face=3DArial><SPAN class=3D417504019-16092004><FONT =
color=3D#0000ff><FONT=20
size=3D2><FONT face=3Dr_ansi><SPAN=20
class=3D417504019-16092004></SPAN></FONT></FONT></FONT></SPAN></FONT>&nbs=
p;</DIV>
<DIV><FONT face=3DArial><SPAN class=3D417504019-16092004><FONT =
color=3D#0000ff><FONT=20
size=3D2><FONT face=3Dr_ansi><SPAN=20
class=3D417504019-16092004>/Jari</SPAN></FONT></FONT></FONT></DIV>
<P><FONT color=3D#0000ff size=3D2></FONT>&nbsp;</P>
<P><FONT face=3Dr_ansi color=3D#0000ff =
size=3D2></FONT>&nbsp;</P></SPAN></FONT>
<BLOCKQUOTE>
  <DIV class=3DOutlookMessageHeader dir=3Dltr align=3Dleft><FONT =
face=3DTahoma=20
  size=3D2>-----Ursprungligt meddelande-----<BR><B>Fr=E5n:</B> Peter =
Bateman=20
  [mailto:ppfb@hotmail.com]<BR><B>Skickat:</B> den 16 september 2004=20
  21:02<BR><B>Till:</B> powerh-l@lists.sowder.com<BR><B>=C4mne:</B> RE: =
SV: write=20
  to file with quick<BR><BR></FONT></DIV>
  <DIV>
  <DIV class=3DRTE>
  <P>I would try 'file asc600 designer open append' It may be a machine =
specific=20
  option.</P>
  <P>But I didn't see it in the manual though.</P>
  <P>Regards,</P>
  <P>Peter<BR><BR></P></DIV>
  <DIV></DIV>&gt;From: &lt;Jari.Kaljunen@teliasonera.com&gt;=20
  <DIV></DIV>&gt;To: &lt;powerh-l@lists.sowder.com&gt;=20
  <DIV></DIV>&gt;Subject: SV: write to file with quick=20
  <DIV></DIV>&gt;Date: Thu, 16 Sep 2004 12:22:20 +0200=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;Hello again,=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;a little test without reading database still very slow=20
  (actually no difference...). It takes 49 s to run this with 100 =
records on=20
  subfile. The result file is 20100 lines.=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;I even wrote a test quiz reading the same subfile and =
having=20
  200 defines, each including systime and some more, each defined item =
written=20
  on an own line. It takes quiz 3 s to write these 20000 lines.=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;/Jari=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;screen test_writing_file menu stopscreen=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;file *ik006002 designer=20
  <DIV></DIV>&gt;file asc600 designer=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;temp t_count=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;procedure internal write=20
  <DIV></DIV>&gt;&nbsp;&nbsp; begin=20
  <DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;for 200=20
  <DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; begin=20
  =
<DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;let=20
  t_count =3D t_count + 1=20
  =
<DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;let=20
  rec600 =3D asc(t_count) &amp;=20
  =
<DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
  + " " + asc(systime) + " procedure internal write "=20
  =
<DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;put=20
  asc600 reset=20
  <DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; end=20
  <DIV></DIV>&gt;&nbsp;&nbsp; end=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;procedure initialize=20
  <DIV></DIV>&gt;&nbsp;&nbsp; begin=20
  <DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;let t_count =3D 0=20
  <DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;while retr ik006002 seq=20
  <DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;begin=20
  <DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;let =
rec600 =3D=20
  asc(t_count) &amp;=20
  =
<DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
  + " " + asc(systime) + " procedure initialize "=20
  <DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;put =
asc600=20
  reset=20
  <DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;do =
internal=20
  write=20
  <DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;end=20
  <DIV></DIV>&gt;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;return=20
  <DIV></DIV>&gt;&nbsp;&nbsp; end=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;build=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;-----Ursprungligt meddelande-----=20
  <DIV></DIV>&gt;Fr=E5n: Johnson, Harold A EDUC:EX=20
  <DIV></DIV>&gt;[mailto:Harold.A.Johnson@gems1.gov.bc.ca]=20
  <DIV></DIV>&gt;Skickat: den 15 september 2004 17:50=20
  <DIV></DIV>&gt;Till: Kaljunen, Jari S. /TSS - Sergel Kredittj=E4nster=20
  /+46-8-4526435;=20
  <DIV></DIV>&gt;powerh-l@lists.sowder.com=20
  <DIV></DIV>&gt;=C4mne: RE: write to file with quick=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;Are you sure the performance problem is with the =
writing and=20
  not with the=20
  <DIV></DIV>&gt;reading of the original data?&nbsp;&nbsp; I would =
suspect a=20
  problem there instead.=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;-----Original Message-----=20
  <DIV></DIV>&gt;From: powerh-l-admin@lists.sowder.com=20
  <DIV></DIV>&gt;[mailto:powerh-l-admin@lists.sowder.com]On Behalf Of=20
  <DIV></DIV>&gt;Jari.Kaljunen@teliasonera.com=20
  <DIV></DIV>&gt;Sent: 2004 September 15 8:41 AM=20
  <DIV></DIV>&gt;To: powerh-l@lists.sowder.com=20
  <DIV></DIV>&gt;Subject: write to file with quick=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;Hello,=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;I am writing to=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;File: ASC600=20
  <DIV></DIV>&gt;Organization: SEQUENTIAL=20
  <DIV></DIV>&gt;Type: RMS=20
  <DIV></DIV>&gt;Open: ASC600=20
  <DIV></DIV>&gt;Record Format: Variable=20
  <DIV></DIV>&gt;Supersede: No=20
  <DIV></DIV>&gt;Records &amp; Sizes: ASC600 600 bytes=20
  <DIV></DIV>&gt;Item Type Size Occ Offset=20
  <DIV></DIV>&gt;REC600 CHARACTER 600=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;in quick using let and put as follows=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;let rec600 =3D "&lt;HeaderRef2&gt;" + asc(arnr of =
arenden,8) +=20
  asc(parmblnr,2) &amp;=20
  <DIV></DIV>&gt;+ atgkod of atgkoder + "&lt;/HeaderRef2&gt;"=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;put asc600 reset=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;The performance is very poor. The administrator believs =
that=20
  quick closes=20
  <DIV></DIV>&gt;and opens the file all the time.=20
  <DIV></DIV>&gt;Can that be true?=20
  <DIV></DIV>&gt;What should I do?=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;We are creating an xml-file (it will be about 5 GB) =
with data=20
  from several=20
  <DIV></DIV>&gt;tables and our solution with qtp needed too many =
subfiles and=20
  sortings using=20
  <DIV></DIV>&gt;lots of space.=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;/Jari=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;=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=20
  <DIV></DIV>&gt;Mailing list: powerh-l@lists.sowder.com=20
  <DIV></DIV>&gt;Subscribe: "subscribe" in message body to=20
  powerh-l-request@lists.sowder.com=20
  <DIV></DIV>&gt;Unsubscribe: "unsubscribe &lt;password&gt;" in message =
body to=20
  <DIV></DIV>&gt;powerh-l-request@lists.sowder.com=20
  <DIV></DIV>&gt;http://lists.sowder.com/mailman/listinfo/powerh-l=20
  <DIV></DIV>&gt;This list is closed, thus to post to the list you must =
be a=20
  subscriber.=20
  <DIV></DIV>&gt;=20
  <DIV></DIV>&gt;=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=20
  <DIV></DIV>&gt;Mailing list: powerh-l@lists.sowder.com=20
  <DIV></DIV>&gt;Subscribe: "subscribe" in message body to=20
  powerh-l-request@lists.sowder.com=20
  <DIV></DIV>&gt;Unsubscribe: "unsubscribe &lt;password&gt;" in message =
body to=20
  powerh-l-request@lists.sowder.com=20
  <DIV></DIV>&gt;http://lists.sowder.com/mailman/listinfo/powerh-l=20
  <DIV></DIV>&gt;This list is closed, thus to post to the list you must =
be a=20
  subscriber.=20
  <DIV></DIV></DIV><BR clear=3Dall>
  <HR>
  Don't just Search. Find! <A=20
  href=3D"http://g.msn.com/8HMBENCA/2749??PS=3D47575">The new MSN =
Search: </A>Fast.=20
  Clear. Easy. =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 Mailing=20
  list: powerh-l@lists.sowder.com Subscribe: "subscribe" in message body =
to=20
  powerh-l-request@lists.sowder.com Unsubscribe: "unsubscribe =
<PASSWORD>" in=20
  message body to powerh-l-request@lists.sowder.com=20
  http://lists.sowder.com/mailman/listinfo/powerh-l This list is closed, =
thus to=20
  post to the list you must be a subscriber. </BLOCKQUOTE></BODY></HTML>

------_=_NextPart_001_01C49C25.38F9D8E4--