×
INTELLIGENT WORK FORUMS
FOR COMPUTER PROFESSIONALS

Log In

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!
  • Students Click Here

*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Students Click Here

Jobs

File Transfer to/from TSO with ancient Attachmate Extra! version

File Transfer to/from TSO with ancient Attachmate Extra! version

File Transfer to/from TSO with ancient Attachmate Extra! version

(OP)
All,

I am working with (please don't laugh) Attachmate Extra! for Windows 98/Windows NT, version 6.5. This is a project that is part of a system being phased out over the next couple of years, so I need to keep the maintenance effort minimal.

I am modifying an Attachmate macro that logs onto a mainframe session and uploads/downloads some files (to TSO) using IND$FILE (via SendFile and ReceiveFile). The current transfer process (to CMS) relies heavily on pre-defined file transfer schemes (mainly for LRECL).

I was able to find the FileTransferHostOS setting to indicate TSO (versus CMS) on this site. Thank you!!!

Two questions:
1) Is there a way to specify LRECL/etc. in SendFile without relying on there being a pre-defined file transfer scheme?
2) Is there any documentation available on this ancient version of the macro encoding language?

Thanks in advance for any help you all can provide.

--Liz
(paradux)

RE: File Transfer to/from TSO with ancient Attachmate Extra! version

hi,

What a blast from the past! And I mean 15 years!

Check out Extra HELP

Quote (Extra_HELP)


Applies To Objects

Session

Description

Returns or sets the host operating system used by file transfers executed through OLE Automation. Read-write.

Syntax

object.FileTransferHostOS

Element Description
object The Session object.
Comments

This property should be set prior to executing a file transfer. Valid values are as follows:
0 - CMS
1 - TSO
2 - CICS
Use this property in conjunction with the FileTransferScheme property.

Copyright 1996 - 1999, Attachmate Corporation. All rights reserved.

Quote (Example)


FileTransferHostOS Property Example

CODE

Sub Main
	Dim Sys As Object, Sess As Object
	Set Sys = CreateObject("EXTRA.System")
' Assumes an open session
	Set Sess = Sys.ActiveSession
	Select Case Sess.FileTransferHostOS
		Case 0
		MsgBox "The current file transfer HostOS is CMS"
		Case 1
		MsgBox "The current file transfer HostOS is TSO"
		Case 2
		MsgBox "The current file transfer HostOS is CICS"
	End Select
End Sub 
Copyright 1996 - 1999, Attachmate Corporation. All rights reserved.

Skip,

glassesJust traded in my OLD subtlety...
for a NUance!tongue

RE: File Transfer to/from TSO with ancient Attachmate Extra! version

(OP)
Skip,

Thanks for the response.

Re the FileTransferHostOS - found that previously, thank you.

Re the LRECL - I think I'm going to just create the specific Data Transfer Schemes for TSO as was done for CMS.

Re the Extra Help - that's where I'm having a problem. While editing a macro on this relic of a laptop, I was able to View the Functions and Objects dialog box, which gives me very limited information. Should I be able to find any more extensive help? The Excel VB editor is not an option on this laptop, as there is no MS Office installed. sad

Any suggestions/direction would be appreciated.

Thanks again,

--Liz

RE: File Transfer to/from TSO with ancient Attachmate Extra! version

The Extra HELP file on my PC, Windows 7 Professional...

"C:\Program Files (x86)\E!PC\epc_ole.hlp"

Skip,

glassesJust traded in my OLD subtlety...
for a NUance!tongue

RE: File Transfer to/from TSO with ancient Attachmate Extra! version

(OP)
Skip,

Sweet! Found it, thank you!!

Mine is "C:\Program Files\E!98\epc_ole.hlp" - but at least it works!

Thanks again for your help.

--Liz

RE: File Transfer to/from TSO with ancient Attachmate Extra! version

smile

Thx! Post back anytime you need some help.

Skip,

glassesJust traded in my OLD subtlety...
for a NUance!tongue

Red Flag This Post

Please let us know here why this post is inappropriate. Reasons such as off-topic, duplicates, flames, illegal, vulgar, or students posting their homework.

Red Flag Submitted

Thank you for helping keep Tek-Tips Forums free from inappropriate posts.
The Tek-Tips staff will check this out and take appropriate action.

Reply To This Thread

Posting in the Tek-Tips forums is a member-only feature.

Click Here to join Tek-Tips and talk with other members!

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close