put Debug Trace in the first line of your eep. At the command prompt: Set debug ON
Run your prog. Press the button or whatever fires the EEP. It should put you in the debugger. Trace your code and see what the offender is. If the debugger doesn't show up, I would suggest a Reload. Mike ----- Original Message ----- From: "marc" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Wednesday, January 02, 2002 2:48 PM Subject: Re: Having fun with 6.5++ then ... > Hi Mike > > Here is another example. > This is part of the EEP on a button > > SET MESSAGES OFF > SET ERROR MESSAGES OFF > > SET VAR vcust TEXT > SET VAR vcust = ' ' > > RUN fcust IN prog.apx > ******* RBase gets tripped up in the fcust command block, it has > ******* return at the end of the command block. > ******* RBase returns me to a field in the region > ******* I can run it 2-3 times and the CHOOSE command below > ******* does not show up Until I exit the form and there is the > ******* Choose box. Then I will do other things go back to this > ******* form and the Choose box displays as it should????? > > ******* I can't figure out why one time it works and the other time > ******* the Choose box gets hidden behind the form?? > ******* I Rstyled the code lots of times and this same code > ******* has been working for over 5 years in 6.1 in lots of offices. > > > IF cust# IS NULL THEN > GOTO aptend > ENDIF > > CHOOSE vxdate FROM #VALUES + > FOR DISTINCT ((CTXT(aptdate)) +' | '+ txtdate) FROM aptdate + > WHERE aptdate >= .vaptdate ORDER BY aptdate ASC + > AT 1,25 CHKBOX TITLE 'Press Space Bar or Click to pick Dates' + > CAPTION .vnamex LINES 28 > ******* sometimes this will not display on top of the form but when you > ******* close the form there is the choose box > > other code in here > > RETURN > > > thanks for any help > marc > > > > > At 10:40 AM 01/02/2002 -0500, you wrote: > >Where is your RETURN in the apx file. RStyle would put a RETURN in it. > > > > > >----- Original Message ----- > >From: "marc" <[EMAIL PROTECTED]> > >To: <[EMAIL PROTECTED]> > >Sent: Tuesday, January 01, 2002 9:04 PM > >Subject: Having fun with 6.5++ then ... > > > > > > > Hi all > > > > > > I upgraded my office to 6.5++ last wk and was > > > having fun with all of the new features but I ran > > > into a problem. > > > > > > Several buttons, EEP's and command blocks will not > > > run. I can click on a button and it will not run. Even > > > after several clicks no luck then all of a sudden it will > > > work. > > > > > > Below is one example of a problem EEP, the code > > > between the xxxxxxxxxxxxxxxx is what is in the > > > APX file. It seems Rbase is getting lost when jumping > > > to the APX file and the return. > > > > > > Any thoughts or things I should look for. So far I have > > > been able to work around each problem I have ran into > > > but an not sure what the problem is. > > > > > > thanks > > > marc > > > > > > > > > RUN ckdupchr IN prog.apx -- this is where Rbase trips up, > >the > > > code between xxxxxxxxxxxxxx's is what is in ckdupchr, it runs OK > > > with the code pasted in the EEP > > > > > > xxxxxxxxxxxxxxxxxxxxxxxx > > > > > > SELECT COUNT(custnum) INTO vzz FROM tran_daily + > > > WHERE tr_type = 1 AND (CTXT(custnum)+CTXT(tr_date)+ch_code) IN + > > > (SELECT (CTXT(custnum)+CTXT(tr_date)+ch_code), COUNT(*) FROM tran_daily > >+ > > > GROUP BY custnum,tr_date,ch_code HAVING COUNT (*) > 1) > > > > > > IF vzz > 0 THEN > > > PAUSE 2 USING 'Check the next screen for duplicate charges. + > > > You may have duplicate charges for a patient. Highlight the + > > > duplicate charge and press F9 to Delete it.'=50 + > > > AT CENTER,CENTER > > > > > > EDIT USING ed_tran + > > > WHERE tr_type = 1 AND (CTXT(custnum)+CTXT(tr_date)+ch_code) IN + > > > (SELECT (CTXT(custnum)+CTXT(tr_date)+ch_code), COUNT(*) FROM tran_daily > >+ > > > GROUP BY custnum,tr_date,ch_code HAVING COUNT (*) > 1) + > > > ORDER BY custnum,tr_date,ch_code CAPTION + > > > '*** Are these charges duplicates? ***' > > > > > > ENDIF > > > > > > xxxxxxxxxxxxxxxxxxxxxxx > > > > > > BROWSE t1.custnum=7 AS patnumber, t2.f_name=12 AS FIRST, t2.l_name=12 + > > > AS LAST,'Charges'=12 AS charges, SUM(t1.ch_price) AS amount + > > > FROM tran_daily t1,ptinfo t2 + > > > WHERE t1.custnum = t2.custnum AND t1.tr_type = 1 + > > > GROUP BY t1.custnum,t2.f_name,t2.l_name,t1.tr_type > > > > > > > > > RETURN > > > > > > > > > > > > > > > _________________________________________________________ > > > Do You Yahoo!? > > > Get your free @yahoo.com address at http://mail.yahoo.com > > > > > > ================================================ > > > TO SEE MESSAGE POSTING GUIDELINES: > > > Send a plain text email to [EMAIL PROTECTED] > > > In the message body, put just two words: INTRO rbase-l > > > ================================================ > > > TO UNSUBSCRIBE: send a plain text email to [EMAIL PROTECTED] > > > In the message body, put just two words: UNSUBSCRIBE rbase-l > > > > > > > > >================================================ > >TO SEE MESSAGE POSTING GUIDELINES: > >Send a plain text email to [EMAIL PROTECTED] > >In the message body, put just two words: INTRO rbase-l > >================================================ > >TO UNSUBSCRIBE: send a plain text email to [EMAIL PROTECTED] > >In the message body, put just two words: UNSUBSCRIBE rbase-l > > > _________________________________________________________ > Do You Yahoo!? > Get your free @yahoo.com address at http://mail.yahoo.com > > ================================================ > TO SEE MESSAGE POSTING GUIDELINES: > Send a plain text email to [EMAIL PROTECTED] > In the message body, put just two words: INTRO rbase-l > ================================================ > TO UNSUBSCRIBE: send a plain text email to [EMAIL PROTECTED] > In the message body, put just two words: UNSUBSCRIBE rbase-l > ================================================ TO SEE MESSAGE POSTING GUIDELINES: Send a plain text email to [EMAIL PROTECTED] In the message body, put just two words: INTRO rbase-l ================================================ TO UNSUBSCRIBE: send a plain text email to [EMAIL PROTECTED] In the message body, put just two words: UNSUBSCRIBE rbase-l
