Since we deleted the lockfile it hasn't repeated the problem, so can't give the exact error message yet.<br><br>On Tue, Feb 2, 2010 at 6:37 AM, John Esak <span dir="ltr"><<a href="mailto:john@valar.com">john@valar.com</a>></span> wrote:<br>
<blockquote style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;" class="gmail_quote">
That's why I was looking for the exact way you launch this stuff. Maybe you<br>
put it in the last note... I'm not sure. <br></blockquote>
<br>I did, but here is a slightly expanded version.<br><br>It is almost always called via a script entry like this:<br>ARGPM="file=none;processing=none;qualifier=hh;script=importship;user=$LOGNAME;note=none;status=COMPLETED"<br>
/appl/fp/rreport log_operations -fp log_it -sr 1 -r $ARGPM -h "Logging"<br><br>or from a SYSTEM call in processing that looks pretty much the same<br>m="file=invhead2;processing=postFedex;"<br>m=m{"qualifier="{@QU{";script=none;user="{@ID{";"<br>
m=m{"note=none;status=STARTED"<br>system "/appl/fp/rreport log_operations -fp log_it -sr 1 -r '"{m{"'"<br><br>FYI, there is no automatic processing at all.<br><br><div class="gmail_quote">
<br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Incidentally, how do you do a lookup to a "random" record to keep it from<br>
"hogging" the file. Is it possible you are getting the record you are<br>
standing on... Which actually is possible to get in "write" mode because<br>
filePro knows you are the user doing the lookup. This might be causing the<br>
hassle. I'm curious if you actually use RAND or what? The way I normally<br>
do what I think you're doing is do a lookup free, write that record... Grab<br>
the record number, then do a lookup - to that record number. When the<br>
process is done, delete that record. It has always been the cleanest way<br>
for me.<br></blockquote><div><br>I shouldn't ever get the record I'm standing in (#1). Like I said, this has run perfecting for years so it's surprising it bombs out now; I believe the problem is environmental. Given that deleting the lockfile appears to have alleviated the problem, I'm in fact sure of it. Regardless, here's the code. It's one of my first filePro programs, actually.<br>
<br>:'##############################################################:'log_it, output only processing for log_operations.:<br>:'Tyler Style:'10/05/05:<br>:'Generic utility for creating a log file for an operation.:':<br>
:'##############################################################::<br>:':':<br>:'##############################################################:'VARIABLES - START:<br>:'@PM contents; current field name; current field value:ba="" ; bb(32,*) ; bc(75,*):<br>
::'---temp-------------------------------------------------------:<br>::i(6,.0); j(6,.0); bd(32,*); d(8,mdy/); t(8,time):<br>:'VARIABLES - END:'##############################################################:<br>
:':':<br>:'##############################################################:'REPORT - START:<br>::debug on:<br>:@RN eq " 1":i=MOD((RAND("-1")),"179")+"1"; d=@TD-i; t=@TM+i:<br>
:@RN eq " 1" '''move off of 1st record to random record to prevent file locks:lookup - k=(d&t) i=C -ng:<br>:@PM eq "":gosub askit 'get operation details from user:<br>
:@PM ne "":gosub getit 'get operation details from passed string (@PM):<br>rend:::<br>::end 'report:<br>:'REP0RT - END:'##############################################################:<br>:':':<br>
askit:'==============================================================:'Get operations log details from user:<br>:' IN n/a::<br>:'OUT n/a::<br>::system "/appl/fp/rclerk log_operations -lx -m"<@qu<"-n -s1 -xe -xa -r CALLED":<br>
raskit:::<br>::return 'askit:<br>getit:'==============================================================:'Get operations log details from @PM:<br>:' IN n/a::<br>:'OUT n/a::<br>::ba=@PM; i=INSTR(ba,";"):<br>
::lookup log = log_operations r=free -e:<br>::log(5)=@TD; log(6)=@TM:<br>loop01s::'---iterate thru fields & values in string:<br>:i le "0" and ba eq "":goto loop01e:<br>:i le "0":bb=ba; ba="":<br>
:i gt "0" 'seperate out nam/value pair:bb=mid(ba,"1",i-"1"); ba=mid(ba,i+"1",DLEN(ba)):<br>::j=INSTR(bb,"="):<br>:j le "0":goto loop01n:<br>::bc=MID(bb,j+"1",DLEN(bb)); bd=MID(bb,"1",j-"1"); bb=bd:<br>
:@PZ eq "DEBUG":show "@"{bb<bc:<br>:bb eq "" or bc eq "":goto loop01n:<br>:bb eq "file":log(1)=""{bc{"":<br>:bb eq "processing":log(2)=""{bc{"":<br>
:bb eq "qualifier":log(3)=""{bc{"":<br>:bb eq "script":log(4)=""{bc{"":<br>:bb eq "user":log(7)=""{bc{"":<br>:bb eq "note":log(8)=""{bc{"":<br>
:bb eq "status":log(9)=""{bc{"":<br>loop01n::i=INSTR(ba,";"); goto loop01s:<br>loop01e:::<br>rgetit:::<br>::return 'getit:<br><br> </div><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Also, let me re-trace back to the previous paragraph . You mention having<br>
the file open with report on one screen and then clerk locks on another. The<br>
report on the first screen does have the -u on the command line, right?<br>
Otherwise, the clerk should rightfully be locked out.<br></blockquote><div><br>No, there is no -u on the command line. I should be able to at least start up rclerk using the file and I can't, I get the message that output processing is running and kicks me out immediately back to the command line. I can access other files while reports are running (tho obviously not update records), so I should be able to at least run rclerk.<br>
</div>Tyler<br></div>