Output no matter what's happening (-RO not Working)
Richard Kreiss
rkreiss at gccconsulting.net
Sun Aug 3 18:00:41 PDT 2014
Top post:
Mike,
You have a number of lookups using -nx, I would suggest that you add a not statement after the lookup just in case either there is no matching record or there is no value in the lookup field.
See line 81 of this processing table.
Richard Kreiss
GCC Consulting
Office: 410-653-2813
> -----Original Message-----
> From: filepro-list-bounces+rkreiss=verizon.net at lists.celestial.com
> [mailto:filepro-list-bounces+rkreiss=verizon.net at lists.celestial.com] On
> Behalf Of Mike Fedkiw
> Sent: Sunday, August 03, 2014 2:34 PM
> To: 0 Filepro List
> Subject: Re: Output no matter what's happening (-RO not Working)
>
> Although it's kind of a long post, this is the exact processing table that stops
> running when I use the -RO flag
>
> Mike
>
>
> 1 ------- - - - - - - - - - - - - - - - -
> start ? If:
> Then: kn="";wa=""
> 2 ------- - - - - - - - - - - - - - - - -
> ? If: 118 eq "y"
> Then: end
> 3 ------- - - - - - - - - - - - - - - - -
> ? If: 77 eq "y"
> Then: end
> 4 ------- - - - - - - - - - - - - - - - -
> ? If: 47 eq ""
> Then: end
> 5 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: oh(6,.0,g)=97
> 6 ------- - - - - - - - - - - - - - - - -
> ? If: oh lt "0"
> Then: oh="0"
> 7 ------- - - - - - - - - - - - - - - - -
> ? If: (6 gt "") and (7 gt "") and (8 gt "") and (9 gt "")
> Then: ua(15,*,g)=6&"-"&7&"-"&8&"-"&9
> 8 ------- - - - - - - - - - - - - - - - -
> ? If: '(6 gt "") and (7 gt "") and (8 gt "") and (9 gt "")
> Then: 'ub(12,*,g)=6&7&8&9
> 9 ------- - - - - - - - - - - - - - - - -
> ? If: '(7 gt "") and (8 gt "")
> Then: 'uc(10,*,g)=7&"-"&8
> 10 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: lookup dept k=22 i=A -nx
> 11 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: dp(15,*,g)=dept(2)
> 12 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: lookup class k=23 i=A -nx
> 13 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: cl(15,*,g)=class(2)
> 14 ------- - - - - - - - - - - - - - - - -
> ? If: sn eq "0"
> Then: sn(9,*,g)=""
> 15 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: sn=18
> 16 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: hl="";qt=chr("34")
> 17 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: im=qt{"Image"{qt
> 18 ------- - - - - - - - - - - - - - - - -
> ? If: 73 eq "u"
> Then: in(30,alldn,g)=4&"/"&4&"_"{8{".jpg"
> 19 ------- - - - - - - - - - - - - - - - -
> ? If: 73 eq "u"
> Then: hl="http://fedko.biz/v500/Images/"{in
> 20 ------- - - - - - - - - - - - - - - - -
> ? If: 73 eq "m"
> Then: in=4&"/"&4&"_"{15{".jpg"
> 21 ------- - - - - - - - - - - - - - - - -
> ? If: 73 eq "m"
> Then: hl="http://fedko.biz/v500/Images/"{in
> 22 ------- - - - - - - - - - - - - - - - -
> ? If: 73 eq "s"
> Then: in=4&"/"&4&"_"{18{".jpg"
> 23 ------- - - - - - - - - - - - - - - - -
> ? If: 73 eq "s"
> Then: hl="http://fedko.biz/v500/Images/"{in
> 24 ------- - - - - - - - - - - - - - - - -
> ? If: 73 eq ""
> Then: hl=""
> 25 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: gosub getvend
> 26 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: export multi invfile=c:\export\invyfile.slk
> 27 ------- - - - - - - - - - - - - - - - -
> ? If: xx eq ""
> Then: gosub once;xx(1,*,g)="y";goto start
> 28 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(1)=3
> 29 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(2)=4
> 30 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(3)=kn
> 31 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(4)=wa
> 32 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(5)=1
> 33 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(6)=16
> 34 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(7)=34
> 35 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(8)=dp
> 36 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(9)=cl
> 37 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(10)=8 'upc 5
> 38 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(11)=7&8 'upc 10
> 39 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(12)=6&7&8&9 'upc 12
> 40 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(13)=ua 'upc edit
> 41 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(14)=15
> 42 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(15)=sn
> 43 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(16)=28
> 44 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(17)=32
> 45 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(18)=47
> 46 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(19)=57
> 47 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(20)=61
> 48 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(21)=65
> 49 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(22)=69
> 50 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(23)=36
> 51 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(24)=oh
> 52 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(25)=hl
> 53 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: end
> 54 ------- - - - - - - - - - - - - - - - -
> once ? If:
> Then: invfile(1)="Vend_Internal"
> 55 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(2)="Vend_Code"
> 56 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(3)="Vend_Key_Name"
> 57 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(4)="Vend_Web_Add"
> 58 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(5)="PN_Internal"
> 59 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(6)="Fedko_No"
> 60 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(7)="U/M"
> 61 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(8)="Dept"
> 62 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(9)="Class"
> 63 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(10)="UPC_5"
> 64 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(11)="UPC_10"
> 65 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(12)="UPC_12"
> 66 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(13)="UPC_Edit"
> 67 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(14)="Mfg_No"
> 68 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(15)="Sap_No"
> 69 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(16)="Description"
> 70 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(17)="Net_Item"
> 71 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(18)="List_Sell"
> 72 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(19)="Price_A"
> 73 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(20)="Price_B"
> 74 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(21)="Price_C"
> 75 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(22)="Price_D"
> 76 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(23)="Sell_Mult"
> 77 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(24)="On_Hand"
> 78 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: invfile(25)="Image_link"
> 79 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: return
> 80 ------- - - - - - - - - - - - - - - - -
> getvend? If:
> Then: lookup vend k=3 i=A -nx
> 81 ------- - - - - - - - - - - - - - - - -
> ? If: not vend
> Then: return
> 82 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: kn=vend(11)
> 83 ------- - - - - - - - - - - - - - - - -
> ? If: vend(37) gt ""
> Then: wa=vend(37)
> 84 ------- - - - - - - - - - - - - - - - -
> ? If:
> Then: return
>
>
> On 8/1/2014 10:23 AM, Kenneth Brody wrote:
> > On 7/31/2014 7:02 PM, FilePro List wrote:
> > [...]
> >> Anyhow, I changed the output line to say this and it took a whole
> >> three seconds to run through every record without any issues.
> >>
> >> \fp\dreport invy -f expIslk -y none -z none -a -u -ro
> >>
> >>
> >> There's not much processing going on here and without the -ro flag it
> >> only takes about 15 seconds to run
> > [...]
> >
> > Well, if it runs in only 3 seconds w/o processing, but runs slower and
> > slower (until it eventually "stops altogether") with processing, then
> > it's obviously something in the processing that's doing it.
> >
> > You say "not much processing", but you don't tell us what it is, so we
> > can't even venture a guess beyond "there's *something* in the
> > processing that's causing it".
> >
> > P.S. Could you please change your e-mail user name from "FilePro List"
> > to something more meaningful for the rest of us?
> >
>
> _______________________________________________
> Filepro-list mailing list
> Filepro-list at lists.celestial.com
> Subscribe/Unsubscribe/Subscription Changes
> http://mailman.celestial.com/mailman/listinfo/filepro-list
More information about the Filepro-list
mailing list