James, It has been 4-5 years since I was into that code. It was a bear. I got it working properly then laid it to rest hoping to not have to deal with it again. I am very rusty on the particulars of getting it to work. I do remember I had to separate the path from the filename for some reason. The other gotcha I found was that you set up the listener the have to issue a finalize command to push the file out to disk. Hope this helps.
Alan On Fri, Sep 9, 2011 at 7:04 AM, James E Harvey <jhar...@hanoverpa.com> wrote: > Thanks Alan. > > I think I'm starting to understand that I'm trying to edit the properties of > the Export method which is called when the user clicks the export button on > the XFRX previewer. > > The doc's mention a method called "Export" with one parameter called "toXFF" > as the handler for the XFF file being previewed. That seems to be where you > could modify the defaults for the file's location and file name, but I'm not > seeing how to do that? > > Jim > > > James E Harvey > Corresponding Officer/M.I.S. > Hanover Shoe Farms, Inc. > www.hanoverpa.com > office: 717-637-8931 > cell: 717-887-2565 > fax: 717-637-6766 > > > -----Original Message----- > From: profox-boun...@leafe.com [mailto:profox-boun...@leafe.com] On Behalf > Of Alan Bain > Sent: Thursday, September 08, 2011 9:05 PM > To: profox@leafe.com > Subject: Re: XFRX default "output" file name > > James, > > Creating the pdf was tricky for me. > > Here is my code. Hope it helps..... > > loObj = XFRX("XFRX#LISTENER") > rptname = Alltrim(Str(dispatch.callnumber))+'_call' > tmpdir = 'c:\dispatch' > lcreportname = 'c:\dispatch\rpts\sht_am_L' > > lnRetVal = loObj.SetParams(Alltrim(rptname),tmpdir,.T.,,,,"PDF") > oapp.exlog('~GET~ lnRetVal from create loObj of xfrx' + > Str(lnRetVal)) > > If lnRetVal = 0 > loObj.setPasswords("ow",Alltrim(Defa.agencyph)) > loObj.setPermissions(.T., .F., .F., .F.) > *do we want to include the radio log? > If printtlog > Select dispatch > Report Form &lcreportname For Recno() = thisrecord > Object loObj Nopageeject > Select runlog > Report Form c:\dispatch\RPTS\runlog.FRX Object loObj > Else > Select dispatch > Report Form &lcreportname For Recno() = thisrecord > Object loObj > Endif > > loObj.finalize() > > lsendgood = .T. > else > *something went wrong here, notify user > Endif > oapp.exlog('~GET~ created pdf file ') > > Thanks, > Alan Bain > > On Thu, Sep 8, 2011 at 2:50 PM, James E Harvey <jhar...@hanoverpa.com> > wrote: > [excessive quoting removed by server] _______________________________________________ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/CAB4ymPBxmrmJoBvyVv5Qjc74Erwge_wyE5DxmUQo_A=yj4z...@mail.gmail.com ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
