Selection set question
Don Coleman
dcoleman at dgcreact.com
Wed Nov 14 07:24:13 PST 2007
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
More information about the Filepro-list
mailing list