Xref: alice comp.databases.oracle.tools:11942
Path: alice!news-feed.fnsi.net!news.idt.net!news-peer.gip.net!news.gsl.net!gip.net!cpk-news-hub1.bbnplanet.com!news.bbnplanet.com!nyd.news.ans.net!news-w.ans.net!newsfeeds.ans.net!asbe05.phx1.aro.allied.com!tmpsp002.tmpprv.allied.com!bob.mansolillo@alliedsignal.com
From: "Michael Cupp, Jr." <Mike.Cupp@alliedsignal.com>
Newsgroups: comp.databases.oracle.tools
Subject: Re: Loops in SQL*Forms
Date: 22 Apr 1998 16:21:26 GMT
Organization: AlliedSignal
Lines: 36
Message-ID: <01bd6e0a$bebb82d0$a46b1389@cuppm>
References: <01bd6e08$e6e5b750$a46b1389@cuppm>
X-Newsreader: Microsoft Internet News 4.70.1161

More info here:

This is a KEY-COMMIT trigger in my forms 4.5 form:

:ONE.MSG := :SYSTEM.MESSAGE_LEVEL;
:SYSTEM.MESSAGE_LEVEL := 5;
:ONE.TEMP := :ONE.ADJ_QTY - :ONE.F_ONHAND;
IF :ONE.ADJ_QTY <> :ONE.F_ONHAND THEN
   Insert into fsp_inv_adj 
   values(:ONE.BATCH_NO, :ONE.BATCH_DATE, :ONE.PART_NO, :ONE.CONTRACT,
:ONE.LOCATION_NO, :ONE.TEMP, :ONE.REMARKS, :ONE.USER_NAME, SYSDATE);
   commit;
Else
   Show_erroralert('No changes to commit.');
End If;
:SYSTEM.MESSAGE_LEVEL := :ONE.MSG;


My situation is, my base table is PART_LOC and I want to take the ADJ_QTY
value and insert into fsp_inv_adj the record as above.  My detail block
(Block ONE) has multiple records, and I'm only inserting the record the
cursor is on.  Please help, this is an urgent matter.


Michael Cupp, Jr. <Mike.Cupp@alliedsignal.com> wrote in article
<01bd6e08$e6e5b750$a46b1389@cuppm>...
> I am attempting to create a loop in SQL*Forms 4.5.
> 
> I have never done a loop, and am looking for 'Loop' in all of the
> documentation that I have available, and cannot find any.  Can anyone
help
> me with the 'Loop' function?
> 
> Thanks already.
> Michael
> 
