The folder ReportCaster_Target on the GBWF1 machine is a shared folder, where Everyone has Write privilege. It works, I can perform a TABLE FILE command and save a hold file in that location and get the master and the data file.
So my real challenge is to get this to happen across a Windows Domain barrier. The routine will be running in Domain MVSRC and the location I want to drop the files to is MVDST. I don't have access to do this from MVSRC yet, but I'm experimenting within MVDST and tried the following:
0 NUMBER OF RECORDS IN TABLE= 42 LINES= 25 (FOC418) THE DISK CONTAINING THE FOCUS FILE IS NOT WRITABLE 0 ERROR AT OR NEAR LINE 30 IN PROCEDURE ADHOCRQ FOCEXEC * (FOC348) ERROR WRITING HOLD FILE DESCRIPTION TO HOLD MASTER
My guess is this is more about getting the syntax just right, not a fundamental barrier in WF in a Windows architecture.
Here's the question -- has anybody walked this path? Is there a particular way to address machines in a different domain with the APP MAP command?
The only thing I haven't tried is a "-DOS net use" command, and I don't know if my intended server allows DOS commands.This message has been edited. Last edited by: <Emily McAllister>,
August 02, 2016, 04:34 PM
Dan Satchell
If you can't get APP MAP to work, have you considered using ! COPY to copy the files to the destination folder?
WebFOCUS 7.7.05
August 02, 2016, 04:37 PM
John_Edwards
I'm listening . . .
August 02, 2016, 05:29 PM
Dan Satchell
Maybe something like this:
-SET &APP_FOLDER = IF (&FOCFOCEXEC EQ 'RCASTER')
- THEN (GETTOK(&DSTJOBNAME,&DSTJOBNAME.LENGTH,1,'/',&DSTJOBNAME.LENGTH,'A&DSTJOBNAME.LENGTH'))
- ELSE &IBIAPP_app ;
APP HOLDMETA &APP_FOLDER
APP HOLDDATA &APP_FOLDER
TABLE FILE xxxx
.
.
ON TABLE HOLD AS HOLDFILE
END
-RUN
-IF (&LINES EQ 0) GOTO NO_DATA ;
-REPEAT ENDREPEAT1 FOR &I FROM 1 TO 2
-SET &SUFFIX = IF (&I EQ 1) THEN 'ftm' ELSE 'mas';
-SET &INFILE = 'C:\ibi\apps\' || &APP_FOLDER || '\HOLDFILE.' || &SUFFIX ;
-SET &OUTFILE = '\\MVDST\GBWF1\ReportCaster_Target\HOLDFILE.' || &SUFFIX ;
! COPY "&INFILE" "&OUTFILE"
-RUN
-IF (&RETCODE NE 0) GOTO COPY_FAIL ;
! DEL "&INFILE"
-RUN
-ENDREPEAT1
-GOTO EXIT
-NO_DATA
.
.
-EXIT
-COPY_FAIL
.
.
-EXIT
WebFOCUS 7.7.05
August 03, 2016, 08:11 AM
John_Edwards
My concern is that FOCUS will have as much trouble understanding the domain name in your ! COPY command as it did in the APP MAP command. But I can give it a try.
I have to do all of this through Report Caster, so I don't have easy access or understanding of the app structure I'm working with. My wingmen are being a bit parochial with their data access.