Smart questions
Smart answers
Smart people
INTELLIGENT WORK FORUMS
FOR COMPUTER PROFESSIONALS

Member Login




Remember Me
Forgot Password?
Join Us!

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips now!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!

Join Tek-Tips
*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Donate Today!

Do you enjoy these
technical forums?
Donate Today! Click Here

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.
Jobs from Indeed

Link To This Forum!

Partner Button
Add Stickiness To Your Site By Linking To This Professionally Managed Technical Forum.
Just copy and paste the
code below into your site.

caosity (TechnicalUser) (OP)
12 Mar 10 11:06
Ok, I know how to create a pushbutton to run a query and return a tableview, or even open a report, and this works when everything is in the working directory. I have, however, run into a problem when trying to open a report not in the working directory, since not everyone uses the same working directory I wanted to make it work for anyone. I have tried using an alias TEMP, but to no avail. I am running WinXP with Paradox 9. The code is below:

method pushButton(var eventInfo Event)
var
myQuery Query
xraydt String
r Report
endVar

xraydt.view("Enter Date of X-Ray")
myQuery = Query
ANSWER: :PRIV:ANSWER.DB

SORT: X-Ray DB.DB->"LAST NAME",
X-Ray DB.DB->"FIRST NAME", X-Ray DB.DB->"MIDDLE"

X-Ray DB.DB | SS # | TITLE | LAST NAME |
| Check | Check _join2 | Check |

X-Ray DB.DB | FIRST NAME | MIDDLE | DOB | DATE OF XRAY |
| Check | Check | Check | Check ~xraydt |

X-Ray DB.DB | PLACE OF X-RAY |
| Check _join1, ..COT.. |

0DOCTORS.DB | PLACE OF X-RAY | DOCTOR | CITY | STATE |
| _join1 | Check | Check | Check |

0GENDER.DB | TITLE | GENDER |
| _join2 | Check |

EndQuery

if myQuery.executeQBE() then
if r.open(":TEMP:XR-LABEL.rsl") then
r.wait()
endIf
endIf

endMethod

What am I missing?

Reply To This Thread

Posting in the Tek-Tips forums is a member-only feature.

Click Here to join Tek-Tips and talk with other members!

Back To Forum

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close