mirror of
https://github.com/opsxcq/mirror-textfiles.com.git
synced 2025-08-13 17:04:02 +02:00
60 lines
1.6 KiB
Plaintext
60 lines
1.6 KiB
Plaintext
|
||
|
||
|
||
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]
|
||
|
||
|
||
|
||
|