/* REXX EXEC */ TRACE ALL ADDRESS TSO /* DUMMY = MSG(‘OFF’) */ /* THIS IS A CODING EXAMPLE OF A TSO ALLOCATION USING MANY DATASETS*/ /* FOR THE SAME FILE, EXCEDING 250 CHARACTERS IN TOTAL LENGTH. ASSIGN*/ /* THE "ALLOC" COMMAND AND ITS PARAMETERS TO MULTIPLE VARIABLE NAMES*/ /* AND INCLUDE A BLANK IN THE FRONT OF THE ABUTTING VARIABLE NAMES*/ /* AND THE ALLOCATION WILL TAKE PLACE CORRECTLY. */ A1 = "ALLOC FILE(DUMMY) DA(‘SYS1.PANELS’" A2 = " ‘SYS2.PDS84.INSTALL’ ‘SYS1.VERMER31.ISPPLIB’" A3 = " ‘SYS1.FA.ISPPLIB’ ‘SYS1.ISR.V3R3M0.ISRPENU’" A4 = " ‘SYS1.ISP.V3R3M0.ISPPENU’ ‘SYS1.ISF.V1R4M0.ISFPLIB’" A5 = " ‘SYS1.CA.LIBRARYN.PLIB’ ‘SYS1.$AVRS.ISPPLIB’" A6 = " ‘SYS1.VSF2PLIB’ ‘SYS1.HRFPANL’ ‘SYS1.CA.ISPPLIB’" A7 = " ‘SYS1.CA.CMO20.ISPPLIB’ ‘SYS1.CA.CMO20.HELP.ISPPLIB’" A8 = " ‘SYS1.TMS.PANELS’) REUSE SHR" A1||A2||A3||A4||A5||A6||A7||A8 /* THE 3 LINES BELOW, IF MADE INTO VALID REXX STATMENTS, WOULD GIVE */ /* THE SAME RESULTS. IN OTHER WORDS IT DOESN’T MATTER IF BLANKS ARE */ /* CODED BETWEEN VARIABLES AND THE CONCATENATION CHARACTERS ‘||’. */ A1||A2||A3||A4||A5||A6||A7||A8 A1 || A2 || A3 || A4 || A5 || A6 || A7 || A8 A1|| A2|| A3|| A4|| A5|| A6|| A7|| A8