🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.interbase.sql
Article #623

Update

#623
From: Serra
Date: Sun, 02 Sep 2007 13:34
15 lines
1111 bytes
IB 6,02

How can i change below delphi code to IBSql ?

While not dm.OrdDetail.Eof do
begin
dm.Parts.FindKey([dm.OrdDetailPARTNO.Value]);
dm.Parts.Edit;
dm.Parts.FieldByName('LastDate').Value:=dm.OrderODate.Value;
dm.Parts.FieldByName('LastPrice').asString:=dm.OrdDetailUPrice.asString;
dm.Parts.Post;
dm.OrdDetail.Next;
end;

Thank you.
Technical Details
Message-ID: <46dabc0a@newsgroups.borland.com>
Path: arc1-ca.pugleaf.net!g2news2.google.com!news1.google.com!news.glorb.com!newsfeeds.ihug.co.nz!ihug.co.nz!newsgroups.borland.com!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Thread: 114a0e,f4e71297a0b445d2,start
X-Google-Attributes: gid114a0e,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
From: "Serra" <no@no.com>
Newsgroups: borland.public.interbase.sql
Subject: Update
Date: Sun, 2 Sep 2007 16:34:50 +0300
Lines: 17
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.3138
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.3138
X-RFC2646: Format=Flowed; Original
NNTP-Posting-Host: 85.108.202.178
Message-ID: <46dabc0a@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1188740106 85.108.202.178 (2 Sep 2007 06:35:06 -0700)
Path: arc1-ca.pugleaf.net!g2news2.google.com!news1.google.com!news.glorb.com!newsfeeds.ihug.co.nz!ihug.co.nz!newsgroups.borland.com!not-for-mail