Well , I’m stumped and probably need your help on this one.

I have actually done a DELETE-INDEX and a CREATE-INDEX .  My create is really 
simple..    CREATE-INDEX MEMBERS ENV BY 15 .  Att 15 holds my envelope number.

If I add a dummy member to my MEMBERS FILE, with an envelope number 99 , it 
shows up in my “on file” list.
If I add another dummy member with another number, it shows up also.

If I delete the second record again, the envelope shows up on my “envelopes 
available” list as it should
If I delete the record with envelope #99, it does not show up on my “available 
list”

I have researched my files and have deleted a couple of records that I thought 
might be corrupted, but no cigar.


Dave.

From: David Grenfell 
Sent: Sunday, December 28, 2014 3:04 PM
To: [email protected] 
Subject: JB 3.10 ON WINDOWS 7

Gentlemen:

I have a quandary:

Following is some code I am using in a small program to develop a final result 
of displaying/printing a list of Unused membership numbers for a church.

I have an index built so that I can select members either by envelope number as 
well as by ID 

I have initialized EQUATE ENV.NO TO MEMBERS.REC(15) 

113 FOR ENVELOPE.NO = BEG.ENV TO END.ENV  (set as 1 to 300)
114    SELECT ENV.INDEX ATKEY ENVELOPE.NO
115    READNEXT KEY index.key,MEMBER THEN
116       MATREAD MEMBERS.REC FROM MEMBERS.FILE, MEMBER ELSE MAT MEMBERS.REC =
117         ** ENV.NO IS MEMBERS.REC(15)
118       CRT "ENV.NO = " : ENV.NO :" index.key = " : index.key : "  
ENVELOPE.N”  (this just debugging stuff)
119       IF ENV.NO = ENVELOPE.NO THEN
120 *its on file so skip*
121          NULL
122       END ELSE
123 * its not on file so add it to the list
124          ENV.LIST = ENV.LIST : ENVELOPE.NO : VM
125       END
126    END
127 NEXT ENVELOPE.NO

So, the loop should pull every number from 1 to 300 and look it up in the index 
and if it cannot match the number with the the members record, then assume it 
is not there.  It seems to work except 99 is missing in my loop .

Here is a segment of the sample data coming off the above code

ENV.NO = 96 index.key = 96  ENVELOPE.NO = 96  MEMBER ISSCHAEF RIC
ENV.NO = 97 index.key = 97  ENVELOPE.NO = 97  MEMBER ISFROOK HAR
ENV.NO = 98 index.key = 98  ENVELOPE.NO = 98  MEMBER ISGATEMA IRE
ENV.NO = 100 index.key = 100  ENVELOPE.NO = 100  MEMBER ISGEBHAR ELA
ENV.NO = 101 index.key = 101  ENVELOPE.NO = 101  MEMBER ISMOYER KRI
ENV.NO = 102 index.key = 102  ENVELOPE.NO = 102  MEMBER ISSCHUKN MAU

My question is, why is my envelope.no 99 missing from the loop.  I am teary 
eyed looking for this.

Dave Grenfell






-- 
-- 
IMPORTANT: T24/Globus posts are no longer accepted on this forum.
 
To post, send email to [email protected]
To unsubscribe, send email to [email protected]
For more options, visit this group at http://groups.google.com/group/jBASE?hl=en

--- 
You received this message because you are subscribed to the Google Groups 
"jBASE" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
For more options, visit https://groups.google.com/d/optout.

-- 
-- 
IMPORTANT: T24/Globus posts are no longer accepted on this forum.

To post, send email to [email protected]
To unsubscribe, send email to [email protected]
For more options, visit this group at http://groups.google.com/group/jBASE?hl=en

--- 
You received this message because you are subscribed to the Google Groups 
"jBASE" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
For more options, visit https://groups.google.com/d/optout.

Reply via email to