User`s guide

7: Example BSCTRAN Usage
DC 900-1406E 111
SET 2 /STOP ! Disable to reconfigure link to send
SET 3 /STOP ! transparent data
!
SET 2 /PAR10=0/PAR19=0 ! Turn data translation and message
SET 3 /PAR10=0/PAR19=0 ! blocking off for transparent data
SET 2 /PAR8=514/START ! Change block size to transmit full 512
SET 3 /PAR8=514/START ! bytes (514 = 512 + STX + ETX)
SEND OBJ.TEST 2 /TRANS /BINARY ! /BIN = don’t insert RS chars
RECEIVE TEST_3780.OBJ 3 /BINARY ! /BIN = ignore RS chars
!
DEFAULT /RECORD=2780 ! Set BSCTRAN to send 2780
SEND OBJ.TEST 2 /TRANS ! No /BIN on send since transparent
! 2780 uses count
RECEIVE TEST_2780.OBJ 3 /BINARY ! Always use /BIN to receive transparent
!
SET 2 /STOP ! Disable links
SET 3 /STOP
!
EXIT ! Exit the BSC File Transfer program
$ END:
Figure 7–3: VMS DCL Command Procedure Example (Cont’d)