- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I am trying to port this old IBM Mainframe Fortran66/77 program to the PC.
It is reading unformated binary data from a disk file using the following read statement:
read(10,num=lth,err=20,end=9000)jdata
Does anyone know what the NUM=LTH is? (there is no other occurence of LTH in the program. The compiler (Compaq Visual Fortran 6.0) doesn't like it and there is no info in the IBM manuals (for latter versions).
It is reading unformated binary data from a disk file using the following read statement:
read(10,num=lth,err=20,end=9000)jdata
Does anyone know what the NUM=LTH is? (there is no other occurence of LTH in the program. The compiler (Compaq Visual Fortran 6.0) doesn't like it and there is no info in the IBM manuals (for latter versions).
Link Copied
3 Replies
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I looked on google, and found an answer that seems plausible. The num=
sets to the number of bytes
that were actually read. If, for some reason, the record
is shorter than the I/O list, no error occurs.
sets
that were actually read. If, for some reason, the record
is shorter than the I/O list, no error occurs.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
A wild guess is that the NUM=LTH could be a NAMELIST specification. If that were the case, though, there should be a NAMELIST /LTH/ variable, variable, ... statement, or something similar to that, somewhere in your program. Your input data would typically be character and not binary.
I believe that the VF syntax is NML=namelist_group. If you don't use the NML keyword in the READ statement, then it has to be the second item in the list.
Mike
I believe that the VF syntax is NML=namelist_group. If you don't use the NML keyword in the READ statement, then it has to be the second item in the list.
Mike
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I think jparsly has it right - it's not NAMELIST - IBM has had NAMELIST for more than 20 years and the specifier was NML=).
Steve
Steve
![](/skins/images/B7BA37F9CE4B52FF7CAE1FB0388839C8/responsive_peak/images/icon_anonymous_message.png)
Reply
Topic Options
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page