what is the command to continue when no records selected (AREV Specific)
At 16 APR 2003 04:42:59PM Jim A Tassano wrote:
What is the AREV command that allows a select statement to continue on when no records selected?
At 16 APR 2003 04:47PM Matt Sorrell wrote:
Jim,
Are you referring to trying to do a SAVELIST after running a SELECT?
Based on other information on this list, from Victor Engle I believe, I've written a small utility called IF_ANY_THEN that will check for an active select list before doing any other R/List processing.
I believe if you search this list for "IF_ANY_THEN" you can find information regarding it. If not, I can post what I've written.
msorrel@greyhound.com
At 16 APR 2003 04:52PM Matt Sorrell wrote:
Jim,
Here is the link to a post I made a while back about another problem I was having. In this post is the source code to my IF_ANY_THEN routine.
If you will notice, it does parse the command for a (S) option. If the (S) option is passed, it will not display any messages, i.e. run in silent mode. If (S) is not included as an option to the command, it will display a message stating that there were no records selected.
I thought this made a nice touch in regards to batch vs. interactive processing.
msorrel@greyhound.com
At 16 APR 2003 04:54PM Matt Sorrell wrote:
By the way, one thing to mention. There is an include, but all it does is define the False$ and True$ constants. I believe these are equated to 0 and 1 respectively.
Matt
At 17 APR 2003 09:39AM Don Miller - C3 Inc. wrote:
Matt's solution works well in TCL/Voc items (and in R/Basic code too). If you're rolling your own then:
CMD=SELECT SOMEFILE WITH ..'
@RECCOUNT=0
PERFORM CMD
IF @RECCOUNT < 1 THEN
MSG('Select Failed!!!')END ELSE
do your processing / R/LIST, etc.)END
Don M.