We are currently using a AREV program built for Airlines Reservations called E.Q.U.A.L.S. In this program we have a PNR table formed to make our reservations and within this table is a seperate table where it records our Agencies (Customers.) One of these agencies is local to us and we pay deposits to them when they make the reservation. We want to build a Message Pop-Up Window that will only Pop-Up when their Agency Number is entered into the Reservation so the Employees don't forget to deduct the deposit. I am a Novice within R-Basic but am learning quickly. Anyone help?

Daniel,

What you want to do is not complicated at all…but your mileage may vary depending on how unfamiliar you are with R/Basic and AREV in general. I can offer you some general tips for approaching this but you will have to fill in the blanks as far as specific application details.

1. Create a post-prompt process for the Agency field.

2. In this logic, check the value of WC_IS% (you will have to include the WINDOW_COMMON% insert).

3. If WC_IS% is equal to the agency ID that you are looking for then display a message using the Msg() subroutine.

Please note that there are various ways of approaching this and others might be better for your situation. I just offered one that is pretty generic and universal.

Isn't Jim Butler the consultant who supplied you with the system? Have you talked with him about this?

[email protected]

SRP Computer Solutions, Inc.

Don,

   Thanks for the response and general help.  Jim Butler was the inital representitive.  But there was a falling out within the relationship before I came onboard and the developement and maintainance has been dropped in my lap.  Jim is no longer interested in supporting customers with AREV.  If they don't move toward the OpenInsight he isn't interested.  I do have one very helpful gentleman that worked with him to assist me from time to time, but he is very busy helping his other boss with Web based Sales for Grand Canyon Airlines.  And we value his extra efforts when he has time.

   Here is the application of the messege.  During the reservation process, if the Agency is equal to 10108 (their customer/agency number) then we would like a messege window to popup saying "Don't forget Squire Deposits!!!" with an o.k. button to prompt you out of the messege window.

On the Post prompt of the control include a call to a subroutine that examines WC_Is% (include Window Common in your subroutine) and if it is equal to your target value then just Call Msg("My message here").

Subroutine FlashMsg

$Insert SysInclude Window_Common%

If WC_Is%=1018 Then Call Msg("Don't forget…")

Return

[email protected]

The Sprezzatura Group Web Site

World Leaders in all things RevSoft

Well….That would help under a general application. What I have is a situation like this.

BTREE.EXTRACT( SEARCH, "CUSTOMERS", CUST.DICT@, HITS)

 IF HITS EQ "" ELSE

• CALL POP.UP

@DICT     =CUST.DICT@

CUST.DICT =WC_IS%                        I INSERTED THESE LINES

IF WC_IS% =10108 THEN

MESS=|*****ATTENTION*****||"

MESS =:"|DEPOSITS REQUIRED FOR||"

MESS =:"|SQUIRE RESERVATIONS!!||"          ADDITION STOPS HERE

CURSOR.NO =0

CONVERT @VM TO @FM IN HITS

MAKE.LIST( CURSOR.NO, HITS CUST.FILE@, CUST.DICT@)

SORT.LIST =COMPANY"

SCREEN.IMG="

With my code not in, this will search our database, and auto enter customer info in our reservations. The problem I am incountering is that with my code inserted it will catch the 10108 (Squire) but will not proceed with other customer info in the database.

Any suggestions?

IF WC_IS%=10108 THEN

MESS=|*ATTENTION*||"

MESS =:"|DEPOSITS REQUIRED FOR||"

MESS =:"|SQUIRE RESERVATIONS!!||" ADDITION STOPS HERE

*

CURSOR.NO=0

CONVERT @VM TO @FM IN HITS

MAKE.LIST( CURSOR.NO, HITS CUST.FILE@, CUST.DICT@)

*

SORT.LIST=COMPANY"

SCREEN.IMG="

It appears that you are missing an END statement. Shouldn't your testing code look like this:

IF WC_IS%=10108 THEN

MESS=|*ATTENTION*||"

MESS =:"|DEPOSITS REQUIRED FOR||"

MESS =:"|SQUIRE RESERVATIONS!!||"

END ; *ADDITION STOPS HERE

It appears as if your CONVERT statement is accidentally inside your test for WC_IS%.

Is that just an error in posting here, or is that an actual error in your code?

[email protected]

Greyhound Lines, Inc.

Sorry for the formatting mixup. Let's try this again.

IF WC_IS%=10108 THEN
MESS=|*****ATTENTION*****||"
MESS =:"|DEPOSITS REQUIRED FOR||"
MESS =:"|SQUIRE RESERVATIONS!!||" ADDITION STOPS HERE

I think you need an END after this block.

[email protected]

Greyhound Lines, Inc.

View this thread on the forum...