Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
About the FTP Program

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics
View previous topic :: :: View next topic  
Author Message
smaru

New User


Joined: 22 Oct 2008
Posts: 49
Location: India

PostPosted: Tue Nov 25, 2008 3:19 am    Post subject: About the FTP Program
Reply with quote

Hi,

Can someone help in understanding the program 'FTP' . Is that an assembler program??

If not can this be called as an Subroutine.
Back to top
View user's profile Send private message

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4650
Location: Raleigh, NC, USA

PostPosted: Tue Nov 25, 2008 3:22 am    Post subject: Re: About the FTP Program
Reply with quote

smaru wrote:
Hi,

Can someone help in understanding the program 'FTP' . Is that an assembler program??

If not can this be called as an Subroutine.


I believe that FTP is written in "C". Yes, it can be called via a "CALL" statement.
Back to top
View user's profile Send private message
smaru

New User


Joined: 22 Oct 2008
Posts: 49
Location: India

PostPosted: Wed Nov 26, 2008 6:30 am    Post subject:
Reply with quote

After searching in this forum, I was able to compile program with FTP as subroutine.

When I execute the Jcl using the same, it is getting abended with abend message " CEE3648S POSIX(ON) run-time option in a nested enclave PROGRAM is not supported. where PROGRAM refers to my Cobol program.

Can any one suggest me about enabling POSIX(ON) for cobol program.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Nov 26, 2008 7:54 am    Post subject:
Reply with quote

Hello,

I believe you need to set posix off.

Does your jcl look something like:
Code:
//CALLFTP   EXEC PGM=PROGRAM,PARM='xx.xx.xx.xx ( EXIT'

if so you might try this:
Code:
//CALLFTP   EXEC PGM=PROGRAM,PARM='POSIX(OFF) /xx.xx.xx.xx ( EXIT'


Quote:
A cleaner fix is to leave JCL alone and change the COBOL to prepend the PARM with the required POSIX(OFF) runtime option before invoking FTP:

Add to WORKING-STORAGE SECTION:

01 WS-PARM.
05 WS-LEN PIC 999 COMP.
05 WS-TEXT.
10 FILLER PIC X(12) VALUE 'POSIX(OFF) /'.
10 WS-REST PIC X(88).

Change the following in LINKAGE SECTION:

01 CALLER-PARM.
05 CALLER-LEN PIC 999 COMP.
05 CALLER-TEXT PIC X(100).

Change start of PROCEDURE DIVISION:

PROCEDURE DIVISION USING CALLER-PARM.
MOVE CALLER-TEXT (1:CALLER-LEN) TO WS-REST.
COMPUTE WS-LEN = CALLER-LEN + 12.
CALL FTP USING WS-PARM.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to write Rexx program to size and... sreejeshcs CLIST & REXX 14 Thu Oct 12, 2017 7:26 am
No new posts Accessing CICS tran with map from JCL... navdeepaggarwal CICS 5 Tue Oct 03, 2017 6:15 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm
No new posts pre-compiler for program in an HFS Pedro DB2 0 Fri Jun 23, 2017 11:13 pm
No new posts Compiling program in endeavor for tra... RALAKKAL Compuware & Other Tools 4 Mon Jun 05, 2017 8:27 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us