where the heck was I when that happened ????? =: )) Thanks Mike.....
----- Original Message ----- From: "Michael Young" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Wednesday, January 02, 2002 3:43 PM Subject: Re: Having fun with 6.5++ then ... > Hi Mike, > > You can also press [Ctrl][Shift][F12] just prior to pressing > the EEP button and it will put you into Trace mode. Then you do > not need to add the Debug Trace command or set Debug on. > > Best regards, > Mike Young > > On Wed, 2 Jan 2002 15:26:15 -0500, MikeB wrote: > > >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 > > > ================================================ > 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
