Sign up on the Revelation Software website to have access to the most current content, and to be able to ask questions and get answers from the Revelation community

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

Greyhound Lines, Inc.


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.

Clicky, clicky

msorrel@greyhound.com

Greyhound Lines, Inc.


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.

View this thread on the forum...

  • third_party_content/community/commentary/forums_nonworks/8741225e6e8060ea85256d0a0071ccc1.txt
  • Last modified: 2023/12/28 07:40
  • by 127.0.0.1