💾 Archived View for spam.works › mirrors › textfiles › computers › ASTRESEARCH › 0337.tb captured on 2023-06-16 at 21:39:11.
-=-=-=-=-=-=-
AST RESEARCH, INC. TECHNICAL BULLETIN #TB-0337 11/25/87
FTS-C/R-TSO COMMAND SEQUENCE
This Technical Bulletin is provided for general information purposes.
Below you will find a list of the specific commands issued to the
host when performing a TSO file transfer. NOTE that each instruction
is separated by the IBM field mark character and the command is
entered on one complete line unless otherwise stated with the [Enter]
caption.
Commands Issued When Initializing
END
TERMINAL SCRSIZE (24,80)
PROFILE LIST
PROFILE PROMPT NOINTERCOM PAUSE MSGID NOMODE WTPMSG
FREE FILE(SYSIN,SYSPRINT,SYSUT1,SYSUT2)
ALLOC FILE(SYSIN) DUMMY
ALLOC FILE(SYSPRINT) DUMMY [Enter]
Commands Issued When Downloading
LISTDS 'HST5.SYS.CLIST(TEST)' [Enter]
ALLOC FILE(SYSUT1) DSNAME('same as above')SHR
ALLOC FILE(SYSUT2) DSNAME(*) [Enter]
CALL 'SYS1.LINKLIB(IEBGENER)' [Enter]
Commands Issued When Uploading
LISTDS 'AST21.SYS.CLIST(JUNK)'
ATTRIB FTSATTR RECFM(V B) LREDL(255) BLKSIZE(3120)
FREE FILE(SYSIN)
ALLOC FILE(SYSIN) DSNAME(*)
ALLCOATE FILE(SYSUT2) DSNAME(AST21.SYS.CLIST(JUNK)')
NEW SPACE(1,1) BLKSIZE(3120) USING(FTSATR) CATALOG DIR(12)
CALL 'SYS1.LINKLIB(IEBGD)'
DSD OUTPUT=(SYSUT2)
FD NAME=A,LENGTH=1,FORMAT=CO
CREATE QUANTITY=1,FILL='*',NAME=A [Enter]
/*
FREE FILE (SYSIN)
ALLOC FILE(SYSIN) DUMMY
EDIT 'AST21.SYS.CLIST(JUNK)' NONUM TEXT [Enter]
<<<<<<DATA IS TRANSFERED HERE>>>>>
SAVE
END NOSAVE
FREE FILE(SYSUT1,SYSUT2,FTSATTR)
FREE DSNAME('AST21.SYS.CLIST(JUNK)' [Enter]