Subject |
" ? " function not working |
From |
Bob McKinney <bmckinney721@comcast.net> |
Date |
Sat, 19 Aug 2017 15:40:14 -0400 |
Newsgroups |
dbase.getting-started |
Hi A: Have been trying to add/edit my code at my shop using db2.8 - w/7 on a peer to peer network.
I wrote the following code on my computer at home (not on a network) and it worked fine, both the " ? " function (displaying in the view section of the command window) and the code itself.
On the shop computer, the " ? " would not display and I could not get the code itself to work. Trying to run the edited code screwed up the network by changing the code at the beginning ( set procedure to Invoicedatamodulel.dmd to invoicekdatamodule.dmo ). As a result, the computer could not find a table.
[begin code sample]
function EQUANTITY_onLostFocus
local rs, mPrc,mQty,mNPrc,mFrt
rs = form.InvoiceDataModule1.Lineitem1.rowset
mQty = 0
mPrc = 0
mNPrc = 0
mFrt = 0
mPrc := rs.fields["price"].value
mQty := rs.fields["Quantity"].value
? mPrc " Price " //Would not load or display
? mQty " Qty " // Same thing
do case
case rs.fields["Quantity"].value <2 and ;
rs.fields["partNumber"].value = "TIP0-17"
if rs.fields["Quantity"].value <2 // one
rs.fields["Price"].value := (mPrc*2)
endif
[ End code sample]
Is the reason for this reaction because of the network? I cannot understand it not working since I have edited code in years gone by w/out these problems. Any help appreciated..........Bob
|
|