Selection set question

[GCC Consulting]

> -----Original Message-----
> From: 
> filepro-list-bounces+gccconsulting=comcast.net at lists.celestial
> .com 
> [mailto:filepro-list-bounces+gccconsulting=comcast.net at lists.c
> elestial.com] On Behalf Of Don Coleman
> Sent: Wednesday, November 14, 2007 10:24 AM
> To: 'FilePro Mailing List'
> Subject: Selection set question
> 
> I have a select table which builds a selection set in a file 
> via an ascii export and then runs system to generate a report 
> using the exported selection set.  My problem is one of the 
> selection set's criteria is facility code (field #9).  As 
> this customer adds on new customers they have begun to use 
> facility codes which have the first several characters the same
> (ex: IY, IYCC, IYCS, IYCJ).  The application is making a 
> match on what it can and is selecting more than the one I 
> really want, in this case facility code IY.  I don't have 
> much control over the facility code, as it enters filePro via 
> import and socket connections from two alien applications.  
> The relevant portion of the select table is below.  Is there 
> a way to have the selection set make only exact matches?
> 
> Nov 14, 2007  10:14           File Name: QS1                  
>      Page   1
>                              Processing: Selrecon
> 
>   23 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
> noctl    If: 
>        Then: RF="E:\QS1\TODO\FILEPRO\QS1\DOUBLE.SEL"{""
>   24 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
>          If: 
>        Then: export ascii use=(RF) f=\n
>   25 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
>          If: 
>        Then: use(1)="";use(2)=":9:eq:"{AB;use(3)=":150:eq:"{"Y"
>   26 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
>          If: 
>        Then: use(4)=":66:eq:"{@td
>   27 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
>          If: 9 eq "MTSP" and AC eq "A"
>        Then: use(5)=":4:eq:LRL";goto montana
>   28 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
>          If: 9 eq "MTSP" and AC eq "D"
>        Then: use(5)=":4:ne:LRL";goto montana
>   29 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
>          If: 9 eq "MTWP" and AC eq "A"
>        Then: use(5)=":4:eq:LRL";goto montana
>   30 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
>          If: 9 eq "MTWP" and AC eq "D"
>        Then: use(5)=":4:ne:LRL";goto montana
>   31 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
>          If: 
>        Then: use(5)=""
>   32 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
> montana  If: 
>        Then: use(6)=":::";use(7)=":::";use(8)=":::";use(9)=":::"
>   33 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
>          If: 
>        Then:
> use(10)=":::";use(11)=":::";use(12)=":::";use(13)=":::";use(14)="  
>              ";goto finsel
>   34 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
> finsel   If: 
>        Then: write use;close use
>   35 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
>          If: 
>        Then: RE(70,*)="E:\FP_SETUP_FILES\FP5.0.13\FP\RREPORT 
> QS1 -F DOUBLECK -S 
>              DOUBLE -U"
>   36 -------   -   -   -   -   -   -   -   -   -   -   -   -  
>  -   -   -   -
>          If: 
>        Then: system RE
> 
> 
> Don Coleman
> Donald G. Coleman, Consultant
> 402 Andrew Circle
> Indiana, PA 15701
> dcoleman at dgcreact.com
> (724) 349-6302

Don,

Is field 9 a 4 character field?.  If it is, you may need to pad blank spaces
with "IY  " to not get the other iterations of "IYXX".

Just an aside without seeing the rest of the processing, why not just use a
-v select process with the first operation the import of the data file and
then load the values needed into either dummy fields or long variables?

Richard Kreiss
GCC Consulting