Just wondering if any has run across this file. If I run this command
file(Gecount.REP) the file XDEBUG.TXT appears. Does not appear to hurt
anything if I delete it but it reappears after running the code and does not
delete on its own. If I don't delete it just keeps getting bigger and
bigger.
Buddy
**********Getcount.REP***********
CONN BTURECOG
SCONN CurrentOSA IDENTI AS Anyone
--The studata table is already sattached
SET VAR VAssn TEXT, VHowMany INTEGER
RUN TmpStuRe.TBL
--Medical Alumni Assoc Recog Award
PAUSE 3 USI 'Getting MAARA Nominees' AT 10
INSERT INTO TmpRecognition (ASSN) +
SELECT MAARA FROM FellowStuRecog
DEL DUP FROM TmpRecognition
PAUSE 3 USI 'Updating Names' AT 10
UPD TmpRecognition SET GLName = GLName, GFName = GFName, +
GMName = GMName FROM Studata T1, TmpRecognition T2 WHE +
T2.ASSN = T1.ASSN
DROP CURSOR C#1
DECL C#1 CURSOR FOR SEL ASSN FROM TmpRecognition
OPE C#1
FETCH C#1 INTO VAssn INDIC IVAssn
WHILE SQLCODE <> 100 THEN
SET VAR VHowMany = 0
SEL COUNT(*) INTO VHowMany INDIC IVHowMany FROM FellowStuRecog WHE +
MAARA = .VAssn
UPD TmpRecognition SET NumOfVotes = .VHowMany WHE Assn = .VAssn
FETCH C#1 INTO VAssn INDIC IVAssn
ENDWHILE
DROP CURSOR C#1
SET VAR VH1 = ('Medical ALumni Association Recognition Award')
PRI FellowRecogAward WHE ASSN <> '000000000' +
ORDER BY NumOfVotes =DESC, GLName,GFName
**********End of Getcount.REP***********************
***********Contents of the XDEBUG.TXT file*************************
old type= 3�new type= 1� old type= 3Xnew type= 1X old type= 3Xnew
type= 1X old type= 3Xnew type= 1X old type= 3�new type= 1� old
type= 3Xnew type= 1X old type= 3Xnew type= 1X old type= 3Xnew
type= 1X old type= 3�new type= 1� old type= 3Xnew type= 1X old
type= 3Xnew type= 1X old type= 3Xnew type= 1X old type= 3�new
type= 1� old type= 3Xnew type= 1X old type= 3Xnew type= 1X old
type= 3Xnew type= 1X old type= 3�new type= 1� old type= 3Xnew
type= 1X old type= 3Xnew type= 1X old type= 3Xnew type= 1X old
type= 3�new type= 1� old type= 3Xnew type= 1X old type= 3Xnew
type= 1X old type= 3Xnew type= 1X old type= 3�new type= 1� old
type= 3Xnew type= 1X old type= 3Xnew type= 1X old type= 3Xnew
type= 1X old type= 3�new type= 1� old type= 3Xnew type= 1X old
type= 3Xnew type= 1X old type= 3Xnew type= 1X old type= 3�new
type= 1� old type= 3Xnew type= 1X old type= 3Xnew type= 1X old
type= 3Xnew type= 1X old type= 3�new type= 1� old type= 3Xnew
type= 1X old type= 3Xnew type= 1X old type= 3Xnew type= 1X old
type= 3�new type= 1� old type= 3Xnew type= 1X old type= 3Xnew
type= 1X old type= 3Xnew type= 1X old type= 3�new type= 1� old
type= 3Xnew type= 1X old type= 3Xnew type= 1X
***************End of file*****************************
================================================
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 SEARCH ARCHIVES:
http://www.mail-archive.com/rbase-l%40sonetmail.com/