I want to define a local multiline noun within a verb. If I put the ')'
for the noun in the first position the verb definition terminates. If I
indent the noun definition lines with a tab, the verb seems to define OK
but when I run it J becomes unresponsive. That is I can still interact
with J (access menus & type stuff), but the menu commands and (including
exit) and sentences don't seem to execute.
Is this possible or is there another solution?
GetPrices=: 4 : 0
sqlcmd =. 0 : 0
SELECT cl_lname, cl_title, pp_year, pp_id, pr_mfd, pr_price
FROM (price_profiles INNER JOIN prices ON pp_id = pr_pp) INNER JOIN
(clients INNER JOIN revs ON cl_id = rv_client) ON pp_id = rv_pp
WHERE cl_id=? AND rv_validuntil Is Null
ORDER BY cl_lname, pr_mfd;
)
profiles=. > _3 {."1 }. y query__db sqlcmd NB. get last three columns of
query
'pp mfd prc'=: |: data NB. assign each column to name
profiles=. ((_1}.pp~:1|.pp),1) <;.2 profiles NB. box profiles by client
)
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
