Value to a query-push button on a form

Value to a query-push button on a form in QBE & SQL topic (part of our Corel Paradox / ObjectPAL Coding group).

Quick Search: Value query   Value query push   button form  
riskmansea
SEATTLE, WA USA

Attempting to set up a form to query customer information by entering the account number. I copied the code from the guide but it fails. The debug highlights the word enter on the  sACCOUNT =  Enter ACCOUNT.value line. Appreciate any help.

;Button :: pushButton
method pushButton(var eventInfo Event)
 var
  sACCOUNT String
  qryCustomer  Query
  tv TableView
 endVar

 sACCOUNT =  Enter ACCOUNT.value

 qryCustomer = Query

Answer: :WORK:ANSWER.DB

CUSTOMER MASTER.DB|ACCOUNT|NAME|ADDRESS 1|ADDRESS 2|CITY|STATE|ZIP|PHONE|
|..~sACCOUNT|CHECK|CHECK|CHECK|CHECK|CHECK|CHECK|CHECK|CHECK|CHECK|

EndQuery

  qryCustomer.readFromFile("\\\\Sultanmain\\acctg\\PDOX\\CUSTOMER MASTER")
  qryCustomer.executeQBE(":WORK:answer.db") ;// run the query  
  tv.open(":WORK:answer.db")      ;// display the results
 
endMethod

About riskmansea
Visit Profile
Approved member.
Member subscribes to this thread with a verified email.

Post ID #14214, 1 replies
Thread Started 7/7/2010 5:24:05 PM
View Counter=2662
Location=SEATTLE, WA USA 
Joined=4/23/2008   MB Posts=8  
Most Recent Post
Daniel Fought
Prestwood IT
Home office in Fresno, CA.

Try this

if Account is a field on the form then this should work

sACCOUNT =  ACCOUNT.value

if Enter_Account is the field name then

sACCOUNT =  Enter_ACCOUNT.value

otherwise you could use

sACCOUNT.view(" Enter the ACCOUNT value")

Dan Fought
Senior Programmer Analyst
Prestwood IT Solutions
http://www.prestwood.com

About Daniel Fought
Visit Profile
Approved member.
Member subscribes to this thread with a verified email.
About Daniel Fought
Danial Fought is a senior programmer analyst with Prestwood IT where he develops custom Windows software and custom websites. When Dan is not coding for clients, he participates in this online community. Coding specialties include Paradox/ObjectPAL, MS Access, Visual Basic, and VS.Net/VB.Net.

Post ID #14215 (Level 1.1)  Reply to 14214
Thread Started 7/7/2010 6:56:38 PM
Location=Home office in Fresno, CA. 
Joined=10/31/2002   MB Posts=401   KB Posts=12   KB Comments=4  
www.prestwood.com For service: 916-726-5675
or support@prestwood.com
Copyright (C) Prestwood IT Solutions.
All Rights Reserved.
Printed 5/14/2026