G'day,
Using the latest and greatest RBWin on W2K machine.
I have been working over the point of sale module of BizMan
I have created a data entry form that can be used with or
without a barcode scanner.
I am hitting brick walls trying to get R:BASE to do what I want,
specifically to display the sum of the item prices in a variable.
It is a single table form with a tiered region based on TranDetail.
On the first filed of the region there is a field level eep that
clears the variables so the current row does not display the data
for the previous row.
PROBLEM 1.
This eep is being run when I am in the last field of the region
and click on the exit button.!@#$%
The custom action for the exit button is this:
SET VAR vScrnMsgChoice TEXT = 'Y'
CLOSEWINDOW
RETURN
Any idea why the field level eep would be run on exit from the row\form?
(Same happens for a row level eep.)
PROBLEM 2.
On the second last field there is some code that gets the cost price,
qty, charge and tax rates and extends the detail line. When I try to
save this row using SAVEROW after the calcs are done the error msg
R:BASE returns is "No rows exist or satisfy the specified clause."
even though the variable vDetailID is set at the form level and the
row DOES exist if I abort during TRACE at that point and check the
table.
Here is the eep:
IF vProdServID IS NULL THEN
SET VAR vScreenMsg TEXT = 'No or invalid ProdServID.|+
Press [F4] to find product by part of description.'
RUN ScrnMsg2 IN GlobBlok.apx
SKIP -1
RETURN
ENDIF
IF vBarCode IS NULL AND vProdServID > 0 THEN
RUN PSPrice1 IN PntOSale.apx
SET VAR vSellPrice CURRENCY = .vExtCrGross
SELECT ItemName,ItemBrand,ModelNumb,ProdServDesc INTO +
vItemName IND vi1, +
vBrand IND vi2, +
vModel IND vi3, +
vProdServDesc IND vi4 +
FROM ProductsServices +
WHERE ProdServID = .vProdServID
ENDIF
UPDATE TranDetail SET +
UnitCr = .vUnitCr, +
UnitDr = .vUnitDr, +
TaxRate = .vTaxRate, +
TaxAmtTD = .vTaxAmt, +
ExtCrNet = .vExtCrNet, +
ExtCrGross = .vExtCrGross +
WHERE DetailID = .vDetailID
SELECT SUM(ExtCrGross) INTO +
vSalePrice IND vi1 +
FROM TranDetail +
WHERE HeaderID = .vTranID_I
SAVEROW
NEXTROW
RECALC TABLES
RECALC VARIABLES
RETURN
As you can see I've thrown SAVEROWs and RECALC TABLES and RECALC VARIABLES
at it in places they logically should not be needed an attempt to solve the
problem to no avail.
Warmest regards,
Tom Grimshaw
coy: Just For You Software
tel: 612 9552 3311
fax: 612 9566 2164
mobile: 0414 675 903
post: PO Box 470 Glebe NSW 2037 Australia
street: 3/66 Wentworth Park Rd Glebe NSW 2037
email: [EMAIL PROTECTED]
web: www.just4usoftware.com.au
"... the control of impulse -- is the first principle of civilization."--
Will Durant,
Pulitzer Prize winning philosopher, writer and historian
the most needed product in the world can be found at
www.thewaytohappiness.org
This email and any files transmitted with it are confidential to the
intended recipient and may be privileged. If you have received this email
inadvertently or you are not the intended recipient, you may not
disseminate, distribute, copy or in any way rely on it. Further, you should
notify the sender immediately and delete the email from your computer.
Whilst we have taken precautions to alert us to the presence of computer
viruses, we cannot guarantee that this email and any files transmitted with
it are free from such viruses.
================================================
TO SEE MESSAGE POSTING GUIDELINES:
Send a plain text email to [EMAIL PROTECTED]
In the message body, put just two words: INTRO rbase-l
================================================
TO UNSUBSCRIBE: send a plain text email to [EMAIL PROTECTED]
In the message body, put just two words: UNSUBSCRIBE rbase-l
================================================
TO SEARCH ARCHIVES:
http://www.mail-archive.com/rbase-l%40sonetmail.com/
