Search results

Absolutely no problem selecting an index in a dynamic query. Taking one of your examples: DEFINE VARIABLE hQuery AS HANDLE NO-UNDO. DEFINE VARIABLE cWhere AS CHARACTER NO-UNDO. cWhere = "FOR EACH sltran NO-LOCK WHERE sltran.co-code = " + QUOTER(ledger.co-code)...

The thing to understand here is that your &GLOBAL and &IF statements are preprocessors, and are evaluated/expanded out at compile-time. So, in your first example: ---------------------- &GLOBAL-DEFINE last-value vdepo yvar = {&last-value}. zvar = {&last-value}. message vdepo yvar zvar...

If you want to use a where clause in a variable (and hence, configure a query at run-time) then it's compile-on-the-fly or dynamic queries only. No way around it - preprocessors are evaluated at compile-time and that's that! Dynamic queries are great! If you need any help with the code, just...

You can't! Preprocessors are evaluated at compile-time, end of story. If you're building a query clause based on user input, dynamic is the way to go. Why wouldn't you want to use dynamic queries? This is what they're there for. The only way you can use preprocessors at run-time is if you...

Use the metaschema to get the list of all sequences. Then use DYNAMIC-CURRENT-VALUE to get the current value of each sequence (this depends on your version). FOR EACH _sequence: DISPLAY DYNAMIC-CURRENT-VALUE(_sequence._seq-name,"_dictdb"). END.

Blimey - you'll have to bear with me on this one. We may need to bounce things back and forth until it all makes sense. I'm assuming that the customer window runs the order window. Don't really care what runs the customer window! And apologies if this is teaching you how to suck eggs - not...

Well, that sort of works. I now have no startup proc, and I call a .p with the REPEAT remotely. Then I stop via Progress Explorer. The client is disconnected immediately. The appserver process carries on for approx 90 seconds, and then receives the stop request, resulting in the shutdown...

Ah, interesting. At the moment, the startup procedure connects to the Sonic broker, and listens via the REPEAT block. Instead, we could have no startup procedure at all, and then call a simple .p which does the broker connect and the listen REPEAT via a script on the server. That way, we...

You're going to have to pass some handles around. Assuming that he Customer window runs the Order window, here's one easy way. 1. Customer window uses RUN wOrder.w PERSISTENT SET hOrderWindow. 2. Create a few procedure in wOrder.w called ipGetOrderSDOHandle (or whatever you want). One...

Yeah, tried that. Doesn't seem to help!

Hi Sunil, The appserver is running in state-free mode, so there is no disconnect procedure. I did look at using the shutdown procedure (setting a global shared variable, which is checked in the loop), but the shutdown procedure doesn't actually fire (got a logging message in there). I guess...

Ah, I see. Are you running one window from the other? Well, regardless, here is some code to establish the foreign fields, the data link, and open the child query. I'm assuming that you can get to the stage of having handles to both SDOs in one place. SDO1 is the Customer SDO, SDO2 is the...

Hi there! Although you can do this programatically, the standard method of mapping two SDOs together is to modify the data link between them. Right click on either SDO, choose "Smartlinks..." option, find the data link that joins the SDOs together (or create one if it's not there). Click...

Hi there! We have an appserver process, which basically starts, and performs a tight loop (REPEAT block), which checks a Sonic queue for messages. If I then use asbman -stop (or use Progress Exploder), the process doesn't stop - it carries on looping. A -kill command will do the trick, but...

YoChan, If your code is using well-scoped buffers, your FOR EACH...EXCLUSIVE will lock one record at a time. If your code allows the record scope of the buffer in the FOR EACH to expand, then you have a problem because the transaction will be active before the FOR EACH begins, resulting in...

I'm also interested in people's opinions on this subject. In addition, does anyone do any SmartObject (ADM2) development via the eclipse ADE? Ta, Andy.

Well, you ARE using a lock in the example given. It's a SHARE-LOCK, which is the default if you don't specify one. Regardless, if you want to check on locking you need to use NO-WAIT, which means you need a FIND. So, I would change the code to something like: DEFINE BUFFER b-customer FOR...

Hi Chris, If you used QUERY-PREPARE to set the where clause, you can use the PREPARE-STRING attribute: MESSAGE BROWSE brMyBrowse:QUERY:PREPARE-STRING VIEW-AS ALERT-BOX INFO BUTTONS OK. However, if you just used "OPEN QUERY" on a static query, this will return ?. I don't know a way...

Hi there! Two possible methods - find the before-image copy in the rowObjUpd table and compare to the updated copy, or use the ADM2's changedFields list. Both approaches work fine in postTransactionValidate (checked using v10.1A02). Here's some code demonstrating both approaches: DEFINE...

If you have a development licence installed (ie, one which supports running of procedure editor), and you run a session from an icon, the procedure editor will appear when your startup procedure (as defined in your icon/pf file with -p) closes. It's always been this way. The way to avoid this...