* %GOTO CMD1PLS; /* BILINGUAL HEADER 00400000 MACRO 00800000 TCMD1D 01200000 .*A000000-999999 @Y17XAXF 01600000 * 02000000 * DFC FID1 COMMANDS 02400000 * 02800000 CD1PREPS EQU X'02' . PREPARE SWITCH 03200000 CD1SWCOM EQU X'03' . SWITCH COMPLETE 03600000 CD1LSTAT EQU X'04' . LUSTAT 04000000 CD1RTR EQU X'05' . READY TO RECEIVE 04400000 CD1ANS EQU X'06' . AUTO NETWORK SHUTDOWN 04800000 CD1ANSC EQU X'07' . ANS COMPLETE 05200000 CD1ACTLU EQU X'0D' . ACTIVATE LU 05600000 CD1DATLU EQU X'0E' . DEACTIVATE LU 06000000 CD1ACTPU EQU X'11' . ACTIVATE PU 06400000 CD1DATPU EQU X'12' . DEACTIVATE PU 06800000 CD1BIND EQU X'31' . BIND 07200000 CD1UBIND EQU X'32' . UNBIND 07600000 CD1INITC EQU X'50' . INIT COMPLETE 08000000 CD1QEC EQU X'80' . QUIESCE AT END OF CHAIN 08400000 CD1QC EQU X'81' . QUIESCE COMPLETE 08800000 CD1REL1 EQU X'82' . RELEASE QUIESCE 09200000 CD1CANCL EQU X'83' . CANCEL 09600000 CD1CHASE EQU X'84' . CHASE 10000000 CD1SDT EQU X'A0' . START DATA TRAFFIC 10400000 CD1CLEAR EQU X'A1' . CLEAR 10800000 CD1STSN EQU X'A2' . SET AND TEST SEQ NUMBERS 11200000 CD1RQR EQU X'A3' . REQUEST RECEIVED 11600000 CD1SHUTD EQU X'C0' . SHUTDOWN 12000000 CD1SHUTC EQU X'C1' . SHUTDOWN COMPLETE 12400000 CD1RSHUT EQU X'C2' . REQUEST SHUTDOWN 12800000 CD1BID EQU X'C8' . BID 13200000 CD1SIG EQU X'C9' . SIGNAL 13600000 EJECT 14000000 * 14400000 * 14800000 * NETWORK SERVICES FID1 COMMANDS 15200000 * 15600000 * 16000000 CD1NETS EQU X'01' . NETWORK SERVICES IND 16400000 SPACE 16800000 * 17200000 * CONFIGURATION SERVICES FID1 COMMANDS 17600000 * 18000000 CD1CONFS EQU X'02' . CONFIGURATION SERV IND 18400000 SPACE 18800000 CD1CONT EQU X'01' . CONTACT 19200000 CD1DCONT EQU X'02' . DISCONTACT 19600000 CD1IPLI EQU X'03' . IPL INITIAL 20000000 CD1IPLT EQU X'04' . IPL TEXT 20400000 CD1IPLF EQU X'05' . IPL FINAL 20800000 CD1DMPI EQU X'06' . DUMP INITIAL 21200000 CD1DMPT EQU X'07' . DUMP TEXT 21600000 CD1DMPF EQU X'08' . DUMP FINAL 22000000 CD1RPO EQU X'09' . REMOTE POWER OFF 22400000 CD1ACTLK EQU X'0A' . ACTIVATE LINK 22800000 CD1DATLK EQU X'0B' . DEACTIVATE LINK 23200000 CD1CESLW EQU X'0C' . CONTROL ENTER SLOWDOWN 23600000 CD1CXSLW EQU X'0D' . CONTROL EXIT SLOWDOWN 24000000 CD1CONNO EQU X'0E' . CONNECT OUT 24400000 CD1ABC EQU X'0F' . ABANDON CONNECTION 24800000 CD1SETV EQU X'11' . SET CONTROL VECTOR 25200000 CD1SENV EQU X'12' . SENSE CONTROL VECTOR 25600000 CD1ESLOW EQU X'14' . ENTERING SLOWDOWN 26000000 CD1EXSLW EQU X'15' . EXITING SLOWDOWN 26400000 CD1ACI EQU X'16' . ACTIVATE CONNECT IN 26800000 CD1DCI EQU X'17' . DEACTIVATE CONNECT IN 27200000 CD1ACO EQU X'18' . ABANDON CONNECT OUT 27600000 CD1ANA EQU X'19' . ASSIGN NETWORK ADDR 28000000 CD1FNA EQU X'1A' . FREE NETWORK ADDR 28400000 CD1REQD EQU X'1B' . REQUEST DISCONTACT 28800000 CD1CONCT EQU X'80' . CONTACTED 29200000 CD1INOP EQU X'81' . INOPERATIVE 29600000 CD1REQC EQU X'84' . REQUEST CONTACT 30000000 SPACE 30400000 * 30800000 * MAINTENANCE SERVICES FID1 COMMANDS 31200000 * 31600000 CD1MAINT EQU X'03' . MAINTENANCE SERV IND 32000000 SPACE 32400000 CD1EX EQU X'01' . EXECUTE TEST 32800000 CD1ACTTR EQU X'02' . ACTIVATE TRACE 33200000 CD1DACTR EQU X'03' . DEACTIVATE TRACE 33600000 CD1RTP EQU X'08' . REQUEST TEST PROCEDURE 34000000 CD1RMS EQU C'81' . RECORD MAINTENANCE STATISTICS 34400000 CD1RTTD EQU X'82' . RECORD TEST DATA 34800000 CD1RTRD EQU X'83' . RECORD TRACE DATA 35200000 SPACE 35600000 * 36000000 * MEASUREMENT SERVICES FID1 COMMANDS 36400000 * 36800000 CD1MEAS EQU X'04' . MEASUREMENT SERVICES IND 37200000 SPACE 37600000 CD1STM EQU X'01' . START MEASUREMENT 38000000 CD1SPM EQU X'02' . STOP MEASUREMENT 38400000 CD1RMD EQU X'80' . RECORD MEASUREMENT DATA 38800000 SPACE 39200000 * 39600000 * SESSION SERVICES FID1 COMMANDS 40000000 * 40400000 CD1SESS EQU X'06' . SESSION SERVICES IND 40800000 SPACE 41200000 CD1CINIT EQU X'01' . CONTROL INITIATE 41600000 CD1CTERM EQU X'02' . CONTROL TERMINATE 42000000 CD1NSPRO EQU X'04' . NS PROC ERROR 42400000 CD1INITS EQU X'81' . INITIATE SELF 42800000 CD1INITO EQU X'81' . INITIATE OTHER 43200000 CD1TERMO EQU X'82' . TERMINATE OTHER 43600000 CD1TERMS EQU X'83' . TERMINATE SELF 44000000 CD1BINDF EQU X'85' . BIND FAILURE 44400000 CD1SESST EQU X'86' . SESSION STARTED 44800000 CD1UBNDF EQU X'87' . UNBIND FAILURE 45200000 CD1SESEN EQU X'88' . SESSION ENDED 45600000 MEND 46000000 * */ 46400000 *%CMD1PLS:; 46800000 */* */ 47200000 */* DFC FID1 COMMANDS */ 47600000 */* */ 48000000 * DCL CD1PREPS BIT(8) CONSTANT('02'X); /* PREPARE SWITCH */ 48400000 * DCL CD1SWCOM BIT(8) CONSTANT('03'X); /* SWITCH COMPLETE */ 48800000 * DCL CD1LSTAT BIT(8) CONSTANT('04'X); /* LUSTAT */ 49200000 * DCL CD1RTR BIT(8) CONSTANT('05'X); /* READY TO RECEIVE */ 49600000 * DCL CD1ANS BIT(8) CONSTANT('06'X); /* AUTO NETWORK SHUTDOWN */ 50000000 * DCL CD1ANSC BIT(8) CONSTANT('07'X); /* ANS COMPLETE */ 50400000 * DCL CD1ACTLU BIT(8) CONSTANT('0D'X); /* ACTIVATE LU */ 50800000 * DCL CD1DATLU BIT(8) CONSTANT('0E'X); /* DEACTIVATE LU */ 51200000 * DCL CD1ACTPU BIT(8) CONSTANT('11'X); /* ACTIVATE PU */ 51600000 * DCL CD1DATPU BIT(8) CONSTANT('12'X); /* DEACTIVATE PU */ 52000000 * DCL CD1BIND BIT(8) CONSTANT('31'X); /* BIND */ 52400000 * DCL CD1UBIND BIT(8) CONSTANT('32'X); /* UNBIND */ 52800000 * DCL CD1INITC BIT(8) CONSTANT('50'X); /* INIT COMPLETE */ 53200000 * DCL CD1QEC BIT(8) CONSTANT('80'X); /* QUIESCE AT END OF CHAIN */ 53600000 * DCL CD1QC BIT(8) CONSTANT('81'X); /* QUIESCE COMPLETE */ 54000000 * DCL CD1RELQ BIT(8) CONSTANT('82'X); /* RELEASE QUIESCE */ 54400000 * DCL CD1CANCL BIT(8) CONSTANT('83'X); /* CANCEL */ 54800000 * DCL CD1CHASE BIT(8) CONSTANT('84'X); /* CHASE */ 55200000 * DCL CD1SDT BIT(8) CONSTANT('A0'X); /* START DATA TRAFFIC */ 55600000 * DCL CD1CLEAR BIT(8) CONSTANT('A1'X); /* CLEAR */ 56000000 * DCL CD1STSN BIT(8) CONSTANT('A2'X); /* SET AND TEST SEQ NUMBERS */ 56400000 * DCL CD1RQR BIT(8) CONSTANT('A3'X); /* REQUEST RECEIVED */ 56800000 * DCL CD1SHUTD BIT(8) CONSTANT('C0'X); /* SHUTDOWN */ 57200000 * DCL CD1SHUTC BIT(8) CONSTANT('C1'X); /* SHUTDOWN COMPLETE */ 57600000 * DCL CD1RSHUT BIT(8) CONSTANT('C2'X); /* REQUEST SHUTDOWN */ 58000000 * DCL CD1BID BIT(8) CONSTANT('C8'X); /* BID */ 58400000 * DCL CD1SIG BIT(8) CONSTANT('C9'X); /* SIGNAL */ 58800000 @EJECT; 59200000 */* */ 59600000 */* */ 60000000 */* NETWORK SERVICES FID1 COMMANDS */ 60400000 */* */ 60800000 */* */ 61200000 * DCL CD1NETS BIT(8) CONSTANT('01'X); /* NETWORK SERV IND */ 61600000 @SPACE; 62000000 */* */ 62400000 */* CONFIGURATION SERVICES FID1 COMMANDS */ 62800000 */* */ 63200000 * DCL CD1CONFS BIT(8) CONSTANT('02'X); /* CONFIGURATION SERV IND */ 63600000 @SPACE; 64000000 * DCL CD1CONT BIT(8) CONSTANT('01'X); /* CONTACT */ 64400000 * DCL CD1DCONT BIT(8) CONSTANT('02'X); /* DISCONTACT */ 64800000 * DCL CD1IPLI BIT(8) CONSTANT('03'X); /* IPL INITIAL */ 65200000 * DCL CD1IPLT BIT(8) CONSTANT('04'X); /* IPL TEXT */ 65600000 * DCL CD1IPLF BIT(8) CONSTANT('05'X); /* IPL FINAL */ 66000000 * DCL CD1DMPI BIT(8) CONSTANT('06'X); /* DUMP INITIAL */ 66400000 * DCL CD1DMPT BIT(8) CONSTANT('07'X); /* DUMP TEXT */ 66800000 * DCL CD1DMPF BIT(8) CONSTANT('08'X); /* DUMP FINAL */ 67200000 * DCL CD1RPO BIT(8) CONSTANT('09'X); /* REMOTE POWER OFF */ 67600000 * DCL CD1ACTLK BIT(8) CONSTANT('0A'X); /* ACTIVATE LINK */ 68000000 * DCL CD1DACLK BIT(8) CONSTANT('0B'X); /* DEACTIVATE LINK */ 68400000 * DCL CD1CESLW BIT(8) CONSTANT('0C'X); /* CONTROL ENTER SLOWDOWN */ 68800000 * DCL CD1CXSLW BIT(8) CONSTANT('0D'X); /* CONTROL EXIT SLOWDOWN */ 69200000 * DCL CD1CONNO BIT(8) CONSTANT('0E'X); /* CONNECT OUT */ 69600000 * DCL CD1ABC BIT(8) CONSTANT('0F'X); /* ABANDON CONNECTION */ 70000000 * DCL CD1SETV BIT(8) CONSTANT('11'X); /* SET CONTROL VECTOR */ 70400000 * DCL CD1SENV BIT(8) CONSTANT('12'X); /* SENSE CONTROL VECTOR */ 70800000 * DCL CD1ESLOW BIT(8) CONSTANT('14'X); /* ENTERING SLOWDOWN */ 71200000 * DCL CD1EXSLW BIT(8) CONSTANT('15'X); /* EXITING SLOWDOWN */ 71600000 * DCL CD1ACI BIT(8) CONSTANT('16'X); /* ACTIVATE CONNECT IN */ 72000000 * DCL CD1DCI BIT(8) CONSTANT('17'X); /* DEACTIVATE CONNECT IN */ 72400000 * DCL CD1ACO BIT(8) CONSTANT('18'X); /* ABANDON CONNECT OUT */ 72800000 * DCL CD1ANA BIT(8) CONSTANT('19'X); /* ASSIGN NETWORK ADDR */ 73200000 * DCL CD1FNA BIT(8) CONSTANT('1A'X); /* FREE NETWORK ADDR */ 73600000 * DCL CD1REQD BIT(8) CONSTANT('1B'X); /* REQUEST DISCONTACT */ 74000000 * DCL CD1CONCT BIT(8) CONSTANT('80'X); /* CONTACTED */ 74400000 * DCL CD1INOP BIT(8) CONSTANT('81'X); /* INOPERATIVE */ 74800000 * DCL CD1REQC BIT(8) CONSTANT('84'X); /* REQUEST CONTACT */ 75200000 @SPACE; 75600000 */* */ 76000000 */* MAINTENANCE SERVICES FID1 COMMANDS */ 76400000 */* */ 76800000 * DCL CD1MAINT BIT(8) CONSTANT('03'X); /* MAINTENANCE SERV IND */ 77200000 @SPACE; 77600000 * DCL CD1EX BIT(8) CONSTANT('01'X); /* EXECUTE TEST */ 78000000 * DCL CD1ACTTR BIT(8) CONSTANT('02'X); /* ACTIVATE TRACE */ 78400000 * DCL CD1DACTR BIT(8) CONSTANT('03'X); /* DEACTIVATE TRACE */ 78800000 * DCL CD1RTP BIT(8) CONSTANT('80'X); /* REQUEST TEST PROCEDURE */ 79200000 * DCL CD1RMS BIT(8) CONSTANT('81'X); /* RECORD MAINT STATISTICS */ 79600000 * DCL CD1RTTD BIT(8) CONSTANT('82'X); /* RECORD TEST DATA */ 80000000 * DCL CD1RTRD BIT(8) CONSTANT('83'X); /* RECORD TRACE DATA */ 80400000 @SPACE; 80800000 */* */ 81200000 */* MEASUREMENT SERVICES FID1 COMMANDS */ 81600000 */* */ 82000000 * DCL CD1MEAS BIT(8) CONSTANT('04'X); /* MEASUREMENT SERV IND */ 82400000 @SPACE; 82800000 * DCL CD1STM BIT(8) CONSTANT('01'X); /* START MEASUREMENT */ 83200000 * DCL CD1STP BIT(8) CONSTANT('02'X); /* STOP MEASUREMENT */ 83600000 * DCL CD1RMD BIT(8) CONSTANT('80'X); /* RECORD MEASUREMENT DATA */ 84000000 @SPACE; 84400000 */* */ 84800000 */* SESSION SERVICES FID1 COMMANDS */ 85200000 * DCL CD1SESS BIT(8) CONSTANT('06'X); /* SESSION SERV IND */ 85600000 @SPACE; 86000000 * DCL CD1CINIT BIT(8) CONSTANT('01'X); /* CONTROL INITIATE */ 86400000 * DCL CD1CTERM BIT(8) CONSTANT('02'X); /* CONTROL TERMINATE */ 86800000 * DCL CD1NSPRO BIT(8) CONSTANT('04'X); /* NS PROC ERROR */ 87200000 * DCL CD1INITS BIT(8) CONSTANT('81'X); /* INITIATE SELF */ 87600000 * DCL CD1INITO BIT(8) CONSTANT('81'X); /* INITIATE OTHER */ 88000000 * DCL CD1TERMO BIT(8) CONSTANT('82'X); /* TERMINATE OTHER */ 88400000 * DCL CD1TERMS BIT(8) CONSTANT('83'X); /* TERMINATE SELF */ 88800000 * DCL CD1BINDF BIT(8) CONSTANT('85'X); /* BIND FAILURE */ 89200000 * DCL CD1SESST BIT(8) CONSTANT('86'X); /* SESSION STARTED */ 89600000 * DCL CD1UBNDF BIT(8) CONSTANT('87'X); /* UNBIND FAILURE */ 90000000 * DCL CD1SESEN BIT(8) CONSTANT('88'X); /* SESSION ENDED */ 90400000