Output no matter what's happening (-RO not Working)
Mike Fedkiw
mikefedkiwfp at aol.com
Mon Aug 4 14:06:07 PDT 2014
The -RO just wont work. I just did a simple test as you see below and it
still freezes up. I did try adding a "close disc" after and that seemed
to let it get through all the records but when I added the close to my
other processing it still didn't get through all the records.
I suppose I could do a lookup from another file and fill in a bunch of
variables for the export but it would be so much easier if the -RO would
just freaking work.
I also re-indexed all the files involved and that made no difference at all
this is the command line that I am using
\fp\dreport invy -f expIslk2 -a -u -ro
1 ------- - - - - - - - - -
◄ If:
Then: dn="1"
2 ------- - - - - - - - - -
◄ If:
Then: lookup dept k=dn i=A -nxp >>>> tried this with and
without the "P" and made no difference
3 ------- - - - - - - - - -
◄ If:
Then: end
Mike Fedkiw
On 8/4/2014 10:00 AM, Richard D. Williams wrote:
> Mike,
>
> I do not use the -RO very much.
>
> Try using the -nxp to your lookups.
> Perhaps FP is think you are about to update data in another file.
>
> You are going directly at the file that about this inventory quan..
> Trying using a dummy file, add a single record, do a lookup to the
> target file , and then write the export.
> You can do this using dclerk instead of dreport.
>
> Look at the @menu command.
>
> Richard
>
> On 8/3/2014 7:47 PM, Mike Fedkiw wrote:
>> There's only ten records in each of the files. I number them 0-9 for
>> the dept or class assignment. I'll add a default if it somehow fails
>> the dept or class lookup but there's checks before saving an
>> inventory record and you couldn't save unless the dept and class are
>> currently assigned.
>>
>> I just don't get is why it works without the -ro flag and not with it
>> but somethings definitely going on when I see the processing slowing
>> down and then ultimately stopping when I try to use it.
>>
>> Mike
>>
>> On Aug 3, 2014, "Richard D. Williams" <richard at appgrp.net> wrote:
>>
>> Mike,
>>
>> I do not know your data situations, but the first thing I see is you do
>> not have any option if
>> your "dept" or "class" lookups fail.
>>
>> If for some reason you have data that is not a match in one of these
>> instants, your program has not where to go.
>>
>> Try this approach:
>>
>> 10 ------- - - - - - - - - - - - - - - - -
>> ? If:
>> Then: lookup dept k=22 i=A -nx
>> 11 ------- - - - - - - - - - - - - - - - -
>> ? If: dept
>> Then: dp(15,*,g)=dept(2)
>> 12 ------- - - - - - - - - - - - - - - - -
>> ? If:
>> Then: lookup class k=23 i=A -nx
>> 13 ------- - - - - -
>> - -
>> - - - - - - - - -
>> ? If: class
>> Then: cl(15,*,g)=class(2)
>> 14 ------- - - - - - - - - - - - - - - - -
>>
>>
>> Then simply review to see if you are missing the expected values for
>> "dp" and/or "cl".
>>
>> Richard
>>
>> On 8/3/2014 1:33 PM, Mike Fedkiw wrote:
>>
>> 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 ------- - - - - - - - - - - - - - - - -
>> ? I f:
>> 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
>>
>>
>>
>>
>>
>>
>> -- Sent with *K-@ Mail
>> <https://play.google.com/store/apps/details?id=com.onegravity.k10.pro2>*
>> - the evolution of emailing.
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mailman.celestial.com/pipermail/filepro-list/attachments/20140804/2865a293/attachment.html
More information about the Filepro-list
mailing list