Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Dowload/FTP VB format file to PC from Mainframe

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
DS
Warnings : 1

New User


Joined: 09 Jun 2005
Posts: 24
Location: Bangalore

PostPosted: Thu Oct 31, 2013 10:22 pm    Post subject: Dowload/FTP VB format file to PC from Mainframe
Reply with quote

Hello,

Trying to get a comp list off Mainframe to PC. Used both ways with PC FTP using get "DOS command" and through ISPF panel ASCII+CRLF option and just ASCII option through IND$FILE. Used ISPF option 6 for IND$FILE to get a SCLM generated comp list to a PC.
File is compiler listing, does not contain CRLF so it is coming to PC like mixed characters in unreadable format.

How to download line by like like normal files?

Code:

1PP 5655-S71 IBM ENTERPRISE COBOL FOR Z/OS  4.2.0   
0INVOCATION PARAMETERS:                             
  NOC(E),NODYN,LIB,OBJECT,APOST,DATA(31),NONUM,NOSEQ,
0OPTIONS IN EFFECT:                                 
  NOADATA                                           
    ADV                                             
    APOST                                           
    ARITH(COMPAT)                                   
  NOAWO                                             
  NOBLOCK0                                           
    BUFSIZE(32760)                                   
  NOCICS                                             
    CODEPAGE(1140)                                   
  NOCOMPILE(E)                                       
  NOCURRENCY                                         




Datset name:
------------------
<HLQ>.UNIT.SCLM.COMPLIST
Code:

     Name     Size   Created          Changed        ID
__ MEMBER1      0  2011/11/17  2011/11/17 14:26:52  SCLM
__ MEMBER2      0  2011/11/22  2011/11/22 11:16:36  SCLM
__ MEMBER3      0  2011/11/17  2011/11/17 15:49:33  SCLM


Datset organisation:
Code:

Organization  . . . : PO     
Record format . . . : VB     
Record length . . . : 137   
Block size  . . . . : 32760 
1st extent cylinders: 2     
Secondary cylinders : 25     
Data set name type  : LIBRARY


When we look in Mainframe it is showing line by line, but in PC it shows unreadable format.

Any workable way. Thank you.
Back to top
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7223

PostPosted: Thu Oct 31, 2013 10:45 pm    Post subject: Reply to: Dowload/FTP VB format file to PC from Mainframe
Reply with quote

Whose clever idea was a blocksize of 32760 on DASD? Along with VB to "save space"?

Is it a one-off? Did you try 'help' in the ftp?
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7905
Location: Bellevue, IA

PostPosted: Thu Oct 31, 2013 10:55 pm    Post subject:
Reply with quote

If the data is pure text, simply transfer as a text file. A PC file is automatically variable length and thus will transfer normally. You will not see CR/LF in a mainframe file (excpet for Unix files, of course) since the end of line is indicated by the end of record, not by some character or character combination.

If the data contains binary values (non-printing data that is packed-decimal, binary, or control characters), the problem becomes challenging since a binary FTP does not transfer the record lengths and hence you lose valuable information. There are varying ways to resolve this issue, depending upon the software being used for the transfer, but you would need to consult with your site support group for more assistance.
Back to top
View user's profile Send private message
anatol

New User


Joined: 20 May 2010
Posts: 99
Location: canada

PostPosted: Thu Oct 31, 2013 11:33 pm    Post subject:
Reply with quote

Looks like you create listings in SCLM - you need to check, if listing is packed by SCLM... if yes, you should unpack it first ( I think option 7 in SCLM main menu), then you can transfer it to PC
Back to top
View user's profile Send private message
anatol

New User


Joined: 20 May 2010
Posts: 99
Location: canada

PostPosted: Thu Oct 31, 2013 11:39 pm    Post subject:
Reply with quote

ISPF automatically unpack listing, when you browse or view .... one trick to see the actual member - try search one space in 3.14 for any member - it will show how actual member is stored in pds
Back to top
View user's profile Send private message
jerryte

Active User


Joined: 29 Oct 2010
Posts: 183
Location: Toronto, ON, Canada

PostPosted: Thu Oct 31, 2013 11:50 pm    Post subject:
Reply with quote

If you do a view or edit of the dataset and enter the command PROFILE then it will show you if the dataset is packed. Look for the word "PACK"
Back to top
View user's profile Send private message
DS
Warnings : 1

New User


Joined: 09 Jun 2005
Posts: 24
Location: Bangalore

PostPosted: Fri Nov 01, 2013 12:38 am    Post subject: Reply to: Dowload/FTP VB format file to PC from Mainframe
Reply with quote

Yes this is When I straight download 'Windows ftp' it looks like:
or
same with Mainframe FTP ISPF option 6 - command line. Unfortunately my emulator is 'OpenConnect' some options are grey-out or disabled.
Code:

  F   dz1PP 5655-S71 IBM ENTERPRISE COBOL FOR Z/OSd4.2.0DATE 04/03/2007TIME 20:07:46cPAGE1o0INVOCATION PARAMETERS:%NOC(E
),NODYN,LIB,OBJECT,APOST,DATA(31),NONUM,NOSEQ,S,X,NOWDk0OPTIONS IN EFFECT:fNOADATA:bADV@dAPOST:ARITH(COMPAT)dNOAWO@gNO


Is there any way to select 1 - 132 columns data after opening dataset in VIEW mode?

how to check listing is packed by SCLM? option 7 SCLM is
Code:

                                SCLM Main Menu         
Option ===>                                           
                                                       
Enter one of the following options:                   
                                                       
   1  View        ISPF View or Browse data             
   2  Edit        Create or change source data in SCLM
   3  Utilities   Perform SCLM database utility/reporti
   4  Build       Construct SCLM-controlled components
   5  Promote     Move components into SCLM hierarchy 
   6  Command     Enter TSO or SCLM commands           
   6A Easy Cmds   Easy SCLM commands via prompts       
   7  Sample      Create or delete sample SCLM project
   A  SCLM Admin  Maintaining SCLM administrators     
   X  Exit        Terminate SCLM                       


I tried Option 3 - Utilities and UNLOCK but no use, showing error
Also tried with 6A - to unlock the member
One thing nice is I can VIEW the member listing
Code:

FLM82002 - MEMBER IS NON-EDITABLE     
           GROUP: UNIT  TYPE: COMPLIST
***


Blksize 32760 defined by system personnel with 'VB' some ages back, may be 25 years old, not my idea. I agree simple LRECL - 133 with RECFM - FB will serve the purpose. I think who ever setup the SCLM Rexx compile scripts or other other sys admin personnel.

Profile:
Code:

Command ===>                                                               
****** ******************************************************* Top of Data *
=PROF> ....COMPLIST (VARIABLE - 133)....RECOVERY ON....NUMBER OFF...........
=PROF> ....CAPS OFF....HEX OFF....NULLS ON STD....TABS OFF....SETUNDO STG...
=PROF> ....AUTOSAVE ON....AUTONUM OFF....AUTOLIST OFF....STATS ON...........
=PROF> ....PROFILE UNLOCK....IMACRO NONE....PACK ON....NOTE ON..............
=PROF> ....HILITE OFF CURSOR FIND...........................................
==MSG> -CAUTION- Data contains invalid (non-display) characters. Use command
==MSG>           ===> FIND P'.' to position cursor to these                 
000001 1PP 5655-S71 IBM ENTERPRISE COBOL FOR Z/OS  4.2.0                   
000002 0INVOCATION PARAMETERS:                                             
000003   NOC(E),NODYN,LIB,OBJECT,APOST,DATA(31),NONUM,NOSEQ,S,X,NOWD       
000004 0OPTIONS IN EFFECT:                                                 


If this doesn't work, rather speding much time, will print this to SYSOUT=* and from there will extract..
Thanks all for your time.[/code]
Back to top
View user's profile Send private message
DS
Warnings : 1

New User


Joined: 09 Jun 2005
Posts: 24
Location: Bangalore

PostPosted: Fri Nov 01, 2013 12:48 am    Post subject: Reply to: Dowload/FTP VB format file to PC from Mainframe
Reply with quote

Yup. It worked with PACK OFF option, pack off did the magic.
Code:

Command ===> PACK OFF                                                           
****** ******************************************************* Top of Data ******
=PROF> ....COMPLIST (FIXED - 133)....RECOVERY ON....NUMBER OFF...................
=PROF> ....CAPS OFF....HEX OFF....NULLS ON STD....TABS OFF....SETUNDO STG........
=PROF> ....AUTOSAVE ON....AUTONUM OFF....AUTOLIST OFF....STATS ON................
=PROF> ....PROFILE UNLOCK....IMACRO NONE....PACK OFF....NOTE ON..................
=PROF> ....HILITE OFF CURSOR FIND................................................
==MSG> -CAUTION- Data contains invalid (non-display) characters. Use command     
==MSG>           ===> FIND P'.' to position cursor to these                     
000001 1PP 5655-S71 IBM ENTERPRISE COBOL FOR Z/OS  4.2.0                         
000002 0INVOCATION PARAMETERS:                                                   


Since SCLM doesn't allow me, copied to local dataset and UNPACKED before download. Thanks evey one for support.
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 -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
This topic is locked: you cannot edit posts or make replies. Urgent Mainframe Requirments (2-10 yr... Shankar779 Mainframe Jobs 0 Sun Nov 27, 2016 1:48 pm
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm
No new posts CICS Roll back partially - Need to re... dwijadas CICS 4 Wed Nov 16, 2016 4:30 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us