Portal | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Issue while reading a file in browse mode

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

New User


Joined: 29 Sep 2007
Posts: 93
Location: chenna/i-

PostPosted: Sun Mar 01, 2020 12:20 pm    Post subject: Issue while reading a file in browse mode
Reply with quote

When I open the file in browse mode I can see first line full of dotted lines , how to remove through Cobol program, I initialized output file
Back to top
View user's profile Send private message

Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1348
Location: Israel

PostPosted: Sun Mar 01, 2020 1:20 pm    Post subject: Reply to: Issue while reading a file in browse mode
Reply with quote

1. Use HEX ON and HEX OFF to see the hexadecimal value hidden behind the dots.
2. Use F11/F10 to scroll right and left.
3. Is there only one dotted line or are there also other text lines ?
4. What do you expect to find ?
5. What do you mean by "I initialized output file"
Back to top
View user's profile Send private message
steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 859
Location: The Universe

PostPosted: Sun Mar 01, 2020 5:50 pm    Post subject: Re: Issue while reading a file in browse mode
Reply with quote

sivasaras wrote:
When I open the file in browse mode I can see first line full of dotted lines , how to remove through Cobol program, I initialized output file

If I understand what you said, you see something like this -
Code:
   File  Edit  Edit_Settings  Menu  Utilities  Compilers  Test  Help           
 -------------------------------------------------------------------------------
 VIEW       XXXXXX.XXX.ASM                                  Columns 00001 00072
 Command ===>                                                  Scroll ===> HALF
 ****** ***************************** Top of Data ******************************
 ''''''
 ''''''
  1. This is NOT a Cobol issue. It is an ISPF issue. I hope a moderator will move this topic to the appropriate forum.
  2. You are not opening the data set (NOT "file") in browse mode. You are opening the data set in "view" mode.
  3. The data set is empty. There is no data in the data set.
  4. In browse mode, you see
    Code:
       Menu  RefList  RefMode  Utilities  Workstation  Help
     ------------------------------------------------------------------------------
                                    View Entry Panel       Empty data set or member
     Command ===>

     ISPF Library:                                                                 
        Project . . . X
        Group . . . . X        . . .          . . .          . . .
        Type  . . . . X
        Member  . . .                 (Blank or pattern for member selection list)

     Other Partitioned, Sequential or VSAM Data Set:
        Data Set Name . . . XXX.ASM
        Volume Serial . . .           (If not cataloged)

     Workstation File:                                                             
        File Name . . . . .
                                             Options
     Initial Macro  . . . .                     Confirm Cancel/Move/Replace
     Profile Name . . . . .                  /  Browse Mode
     Format Name  . . . . .                     View on Workstation
     Data Set Password  . .                  /  Warn on First Data Change
                                                Mixed Mode
    Notice the Empty data set or member on the third line. You do not see Browse mode selected on this screen to open the data set in "view" mode.
Back to top
View user's profile Send private message
steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 859
Location: The Universe

PostPosted: Sun Mar 01, 2020 6:39 pm    Post subject:
Reply with quote

Now, on the other hand. if you actually see something like this
Code:
   Menu  Utilities  Compilers  Help
 -------------------------------------------------------------------------------
 BROWSE    XXXXXX.XXX.OBJ                             Line 00000000 Col 001 080
 Command ===>                                                  Scroll ===> PAGE
********************************* Top of Data **********************************
................................................................................
Then, most likely, YOUR program wrote junk to the data set, which was how the data set I am displaying was created. Since you have not shared any details about the program, WE cannot diagnose the problem.
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1220
Location: Vilnius, Lithuania

PostPosted: Mon Mar 02, 2020 12:25 am    Post subject:
Reply with quote

And what does this have to do with Cobol?
Back to top
View user's profile Send private message
sivasaras

New User


Joined: 29 Sep 2007
Posts: 93
Location: chenna/i-

PostPosted: Mon Mar 02, 2020 8:00 pm    Post subject:
Reply with quote

while writing to the file

Code:
INITIALIZE WS-OUTPUT-RECORD                   
 ACCEPT WS-DATE-CURRENT FROM DATE.             
 MOVE   WS-DATE-CURRENT TO WS-DATE-YYMMDD       
 MOVE  WS-HEADER-ID        TO  OUT1-HEADER-ID   
 MOVE  WS-DATE-CURRENT1    TO  OUT1-DATE-HD     
 MOVE  WS-FILE-NAME        TO  OUT1-FILE-NAME   
 MOVE WS-OUTPUT-RECORD     TO OUTPUT-RECORD     
 WRITE OUTPUT-RECORD                           


while writing first line full of dotted lines after header id
1HDROUT1

Coded for you
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8556
Location: Dubuque, Iowa, USA

PostPosted: Mon Mar 02, 2020 9:55 pm    Post subject:
Reply with quote

So far, you have not posted a single thing that we can use to help you.
Quote:
while writing first line full of dotted lines after header id
1HDROUT1
Don't tell us -- show us. Post an ISPF browse of the first few lines of the data set so we can see what the computer is telling us (as opposed to what you are interpreting the computer to be telling you).
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2406
Location: Hampshire, UK

PostPosted: Tue Mar 03, 2020 12:40 am    Post subject: Reply to: Issue while reading a file in browse mode
Reply with quote

And post it with 'hex on' and using the code tags (I coded your previous code) so that the data is properly presented.
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 COBOL reading from SYSIN jzhardy COBOL Programming 1 Mon Sep 21, 2020 2:37 pm
No new posts TWS - ETT File triggering does not wo... me00266 IBM Tools 4 Mon Sep 07, 2020 11:58 pm
No new posts How to process dependent file based o... HithaSri JCL & VSAM 8 Sun Sep 06, 2020 12:42 pm
No new posts EIBRESP =16 & EIBRESP2 = 01 while... Farheen CICS 4 Mon Aug 24, 2020 2:05 pm
No new posts Dynamic file read via JCL abdulrafi JCL & VSAM 4 Fri Aug 14, 2020 11:51 am

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