Focal Point Banner


As of December 1, 2020, Focal Point is retired and repurposed as a reference repository. We value the wealth of knowledge that's been shared here over the years. You'll continue to have access to this treasure trove of knowledge, for search purposes only.

Join the TIBCO Community
TIBCO Community is a collaborative space for users to share knowledge and support one another in making the best use of TIBCO products and services. There are several TIBCO WebFOCUS resources in the community.

  • From the Home page, select Predict: WebFOCUS to view articles, questions, and trending articles.
  • Select Products from the top navigation bar, scroll, and then select the TIBCO WebFOCUS product page to view product overview, articles, and discussions.
  • Request access to the private WebFOCUS User Group (login required) to network with fellow members.

Former myibi community members should have received an email on 8/3/22 to activate their user accounts to join the community. Check your Spam folder for the email. Please get in touch with us at community@tibco.com for further assistance. Reference the community FAQ to learn more about the community.


Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [CLOSED] WSrite JCL in a fex to FTP data to a shared location

Read-Only Read-Only Topic
Go
Search
Notify
Tools
[CLOSED] WSrite JCL in a fex to FTP data to a shared location
 Login/Join
 
Silver Member
posted
Hi All,

I have a landing page where users keyin inputs and click on submit the report has to FTP to some shared location.I tried below steps but it seems not working.Any help would highly appreciate.
Here is my code.
-DEFAULT &COUNTRY = 'JAPAN';
-SET &HTMLNAME= '''' | 'USERID.' | &COUNTRY | '.HTMLFILE' | '''';
-SET &FILENAME='CAR_' | &COUNTRY | '.XLS';
-SET &FTPBAT='TREX998.' | &COUNTRY | '.JCL';

TABLE FILE CAR
PRINT
CAR
SALES
BY COUNTRY
WHERE COUNTRY EQ '&COUNTRY'
ON TABLE HOLD AS FINALRPT FORMAT EXCEL
END

-TYPE &HTMLNAME
-TYPE &FILENAME



DYNAM ALLOC F JCL NEW SPACE 1 3 TRACKS LRECL 80 BLKSIZE 80 RECFM FB

-WRITE BATCHJCL //USERIDG JOB (YTTT,84091010),'TEST', +
-WRITE BATCHJCL // MSGCLASS=7,CLASS=F,NOTIFY=USERID
-WRITE BATCHJCL /*JOBPARM CARDS=999999,L=9999
-WRITE BATCHJCL //**************************************************
-WRITE BATCHJCL //**************************************************
-WRITE BATCHJCL //*
-WRITE BATCHJCL //**************************************************
-WRITE BATCHJCL //************************************************
-WRITE BATCHJCL //STEP00 EXEC PGM=IDCAMS
-WRITE BATCHJCL //SYSPRINT DD SYSOUT=*
-WRITE BATCHJCL //SYSIN DD *
-WRITE BATCHJCL DELETE &FILENAME
-WRITE BATCHJCL //*
-WRITE BATCHJCL //STEP01 EXEC PGM=FTP,PARM='(TCP IBMTCPIP)'
-WRITE BATCHJCL //SYSPRINT DD SYSOUT=*
-WRITE BATCHJCL //INPUT DD *
-WRITE BATCHJCL ttcftp01
-WRITE BATCHJCL dhc\ftp-euc
-WRITE BATCHJCL cd \ftp-tnceuc
-WRITE BATCHJCL ascii
-WRITE BATCHJCL dhcommon-0
-WRITE BATCHJCL put &HTMLNAME &FILENAME
-WRITE BATCHJCL CLOSE
-WRITE BATCHJCL quit
-WRITE BATCHJCL end
DYNAM SUBMIT BATCHJCL
-RUN

Thank you

This message has been edited. Last edited by: <Kathryn Henning>,


WebFocus 7.1.4 xp html,excel,pdf
 
Posts: 44 | Registered: February 27, 2008Report This Post
Member
posted Hide Post
Hi Souji,

The first thing I would try is to change the output name to match the ddname you are writing to. e.g.
DYNAM ALLOC F BATCHJCL NEW SPACE 1 3 TRACKS LRECL 80 BLKSIZE 80 RECFM FB

If that does not work, try writing the code to an actual file and upload it to this post.

Regards,


WebFOCUS 7.6
Windows, All Outputs
 
Posts: 24 | Registered: July 01, 2014Report This Post
  Powered by Social Strata  

Read-Only Read-Only Topic

Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [CLOSED] WSrite JCL in a fex to FTP data to a shared location

Copyright © 1996-2020 Information Builders