Help with $$90878907.mpx

[Tom Patten]

Hi,

After running the following code for a lookup array, I get a couple of $$1222.mpx files in the directory.

dim global v_PayorID as C
dim inputf as p
dim count as n

inputf = table.Open("Ser_Prov")
query.description = ""
query.order = "PAYOR"
query.filter = "PTE_ID=VAR->V_PTEID"
query.options = "MU"
indx = inputf.query_create()

count = indx.records_get()+1

dim choices(count) as c

i = 1
inputf.fetch_first()
while .not. inputf.fetch_eof()
choices(i) = Trim(inputf.payor)+"-"+trim(inputf.program)+" - "+inputf.payorid
inputf.fetch_next()
i = i + 1
end while
'sort_array("choices")
v_PayorID = ui_get_list_array("Select a Payor Below", 1,"Choices")
v_Payorid = word(v_Payorid,-1)
inputf.query_detach_all()
inputf.close()
-----------------------
I think I am not detaching the query properly.

Thanks

Tom

[Tom Cone Jr]

RE: Help with $$90878907.mpx

tom,

Two things:

1) I don't recognize a query option of MU ?

2) I don't think detaching a query list is the same thing as deleting it from the directory.


Does the presence of the MPX disturb anything?

Have you configured the database to delete query lists on exit?

-- tom

[Tom Patten]

RE: Help with $$90878907.mpx

Hi Tom,

I do have an OnExit script to delete .mpx files, I was just trying to "clean" my code up if I was doing something wrong.

Regarding "MU" I may be using it wrong, but I picked it from the following list I found in Cals Help Files:
-----------------------------------------
Code Description
N Builds a query list even if an index matches the query definition.

D The Descending Order option puts the records in descending alphabetical order or, for a numeric field, from highest to lowest value.

U The Unique option includes only unique records in the query list.

M If this option is specified, Alpha Five will build a new query list even though; a.) an existing query list exists, and b.) an existing Index exists (both of which, Alpha Five could have used rather than running a new query).
X If this option is specified, Alpha Five will use an index even if an existing query exists (which Alpha Five would otherwise have used in preference to the index)
--------------------------------------------

Thanks for taking look

Tom

[Tom Cone Jr]

RE: Help with $$90878907.mpx

Tom,

I'd always assumed that the option was limited to a single character. Have you verified that it actually does both, when you include both M and U ?

-- tom

[Tom Patten]

RE: Help with $$90878907.mpx

I know the "U" works (unique) and assume the "M" works, as it always seems to use the current information.

Tom

[JohnZaleski]

RE: Help with $$90878907.mpx

Ther was a thread a while back where someone had a problem forcing Alpha to always do a new query regardless of what option they chose.By naming the query when creating it the following seemed to work all the time.

on error goto not_there
indx = tb1.index_get("Named-Query")
indx.drop()
not_there: