Home

masc-ato: User's Guide

1. PROCEDURES 3 LOGON PROC MOVE DATA TRUE TO RETC PROCEND ERRO8 PROC PROCEND EPILOG END CL Figure 33 Example of DCL masc ato Automated Transaction Operator User s Guide Compatibility Mode 45 Syntax o Command Parameter END Description END concludes a dialog and must follow the EPILOG command immediately See also chapter EPILOG on page 38 An example of the END command is shown in figure 11 Example PROLOG EPILOG END Figure 34 Example END 46 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 6 EPILOG Syntax o Command Parameter EPILOG Description EPILOG does some housekeeping tasks and is used to conclude a ATO dialog After EPILOG an END command has to be defined See also chapter END on page 46 An example of the EPILOG command is given in figure 12 Example PROLOG EPILOG END Figure 35 Example EPILOG masc ato Automated Transaction Operator User s Guide Compatibility Mode 47 6 7 FILL Syntax EE Command Parameter label FILL DATA data
2. NEW APPLID SESSION AP KEY CLEAR APEND AP DATA CESN APEND AP FILL LIN COL DATA VAR1 USERID FILL LIN COL DATA VAR2 PASSWORD APEND Figure 52 Example MAP LASTMAP PASSExample 68 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 18 MAPEND Syntax o Command Parameter MAPEND Description The MAP instruction is concluded with the MAPEND command and an answer of the TP monitor is awaited The content of the display screen received can be processed e g with a SCAN or MOVE command Example MAP DATA MENU MAPEND SCAN FROM SCREEN MOVE FROM SCREEN Figure 53 Example MAPEND masc ato Automated Transaction Operator User s Guide Compatibility Mode 69 6 19 MAPFLD Syntax Command Parameter abel MAPFLD DATA data label Valid values max 7 characters label can be referenced with a TO parameter Default None data Valid values max 80 characters This parameter defines the value that should be assigned to a field CICS The TCT parameter UCTRAN YES causes the conversion into capital letters TSO Wi
3. EXIT1 AP KEY PF3 APEND AP KEY CLEAR APEND EXIT2 AP LASTMAP YES RC 8 DATA CESF LOGOFF APEND KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK SIGN ON OK YES SIGNOK ko ko ko k ok Sk k ck ck SIGNOK MARK LOGOFF MARK AP KEY CLEAR APEND masc ato Automated Transaction Operator User s Guide Appendix A Example Dialogs 119 MAP99 MAP LASTMAP YES DATA CESF LOGOFF MAPEND EPILOG END Figure 82 ATO Dialog Example 1 Note This example of a masc ato dialog signs on to DBDCCICS succedded by a CESF LOGOFF If the sign on is no successful a return code of 8 is set The values DATA ATOUSRI and DATA ATO could also be filled with DATA VARI or DATA VAR2 respectively using the ATO User Exit ATOEXI 120 Appendix A Example Dialogs masc ato Automated Transaction Operator User s Guide 8 2 CICS Command CEMT INQ TAS 8 2 1 Call from REXX JR RRR KKK a ko kk RK ck ck ck ck ck ck KK KKK KK SAMPLE 2 CICS TRANSACTION CEMT I TA EJ gt k xkkkkkkkkkkkxkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkxkxkkkxkxkxkkx ARG ARG1 ARG2 CALL INITIALIZE CALL PROLOG CALL LOGON START CEMT TRA
4. SCAN DATA WHICH MESSAGE Figure 63 Example 3 PENDING CICS masc ato Automated Transaction Operator User s Guide collide with CMSG Compatibility Mode 83 6 25 PERFORM Syntax o Command Parameter PERFORM PROC procname procname Valid values Max 7 alphanumeric characters This parameter designates the name of the procedure to be executed Default none Description The command PERFORM is used for the execution of procedures Command sequences that are coded in the procedure procname can be executed with PERFORM The called procedure must be defined with the command PROC For more information see command PROC PROCEND on pages 86 and 87 84 Compatibility Mode masc ato Automated Transaction Operator User s Guide Example PROLOG DIALOG SAMPLE1 NETNAME NETATO1 APPLID DBDCCICS MAP DATA TRA1 MAPEND PERFORM PROC READ PERFORM PROC CHECK SCAN DATA ERROR FROM WORK2 NFOUND CONT20 PUTPRT DATA LINE NOT INSERTED PERFORM PROC ERRO8 CONT20 MARK MAP LASTMAP YES MAPEND KKK KKK KKK KKK KKK KKK KKK KKK KKK ckckckckckckok PROCEDURE READ ko ko ko kokok ck READ PROC READ10 MARK GETRDR TO LINE EOF EOF99 MAP10 MAP LI
5. 11 Figure 12 Figure 13 Figure 7 Additional Commands from REXX es 14 Figure 8 ATO Command Overview 16 Figure 9 Example ATO CONNECT 17 Figure 10 Figure 11 Figure 12 Figure 13 Figure 14 Figure 15 Figure 16 Figure 17 Figure 18 Figure 19 Figure 20 Figure 21 Figure 22 Figure 23 Figure 24 Figure 25 Figure 26 Figure 27 Figure 28 Figure 29 Figure 30 Figure 31 Figure 32 Figure 33 Figure 34 Figure 35 Figure 36 Figure 37 Figure 38 Figure 39 Figure 40 Figure 41 Figure 42 Figure 43 Figure 44 Figure 45 Figure 46 Figure 47 Figure 48 Figure 49 Figure 50 Figure 51 Figure 52 Figure 53 Example ATO COPY 0101010101010101012021 1 se cbe ssb os tsss o ss age 18 Example ATO COPY PS TO STRING 19 Example ATO COPY STRING TO 20 Example ATO DISCONNECT 0 21 Example ATO DISCONNE CT 000 22 Example ATO scsiscsscscscssacs conssucccsesssnessassedscossedbeshonseesassdeonesheasedesessbocseeetoesasss 23 Example ATO 1 0101010101010101010100 or 00000 rstss ctsrsc 24 Example ATO PAUSE ccce 0 0202 25 Example ATO PENDING 0 00101010101 1 bosar tss essre 26 Example ATO 0 0 27 Example ATO PUTWTO wn 28 Example ATO QUERY CURSOR 7
6. KK KK a RR KK kk kkk kkk kkk kkk kkk kk kk kkk k k ASSEMBLE AND LINK ATOEXI ASMATO EXEC PGM IEV90 PARM DECK NOLOAD NOXREF NOESD NORLD SYSIN DD DSN prefix orig410 asm ATOEXI DISP SHR SYSPRINT DD SYSOUT SYSLIB DSN prefix orig410 asm DISP SHR DSN prefix orig410 maclib DISP SHR DSN SYS1 MACLIB DISP SHR 5 DSN SYS1 SISTMAC1 DISP SHR ATOM MACROS DSN SYS1 MODGEN DISP SHR SYSUT1 UNIT VIO SPACE CYL 5 5 SYSUT2 UNIT VIO SPACE CYL 5 5 SYSUT3 UNIT VIO SPACE CYL 5 5 SYSPUNCH DSN amp amp ATO DISP PASS UNIT VIO veh DCB RECFM FB LRECL 80 BLKSIZE 400 SPACE 400 50 50 LNKATO EXEC PGM IEWL COND 0 NE SYSPRINT DD SYSOUT SYSUT1 DD UNIT VIO SPACE 1024 20 20 SYSLIN DD DSN amp amp ATO DISP OLD DELETE SYSLMOD DD DSN prefix orig410 1oad ATOEXI DISP SHR Figure 88 ATOEXI Generation for MVS masc ato Automated Transaction Operator User s Guide APPENDIX C User Exit ATOEXI 127 10 2 User Exit Variables VARn The user variables VAR1 VAR9 may be filled from REXX using ATO EXI or in the compatibility mode in the FILL DATA parameter
7. 116 117 5 1 CICS Signon and Signet ess ie ee ae Ra 117 921 T TOn 4 ee re de ee 117 8 12 Compatibility Mode err IER eere eere dete 119 8 2 CICS Command CEMT INQ TAS item e i et Eee 121 8 2 Call from REXX eet eec e er EURO e UR Be OR i ne ens 121 9 2 25 Compatbhty MOde 121 8 3 Common CICS commands et 122 8 32 Call from REXX 10101 122 5 32 Compatiblity 1 1006 go RR eR E a eaaa 122 9 APPENDIX B Migration to Version 4 1 1 1 1 1 1 1 1 1 2 2 2 2 12 2 2 2 12 2 2 2 1 sette 125 10 APPENDIX C User Exit ATOEXTL 0000000000 127 11111000000 127 10 2 User Exit En 128 10 3 Code 1n the Exit 4 ape eret ede e e pet ett ete 128 10 4 User EXit em ne a reete ett tec reve etre esie into 129 11 ILI 131 VI Table of Contents masc ato Automated Transaction Operator User s Guide TABLE OF FIGURES Figure 1 3 Figure 2 Example Notation 0010101001010 3 Fig re 3 masc ato Dial g s r tea ee sheet oov onte eo Pe sona SE Ra sumo tones eres poke eue 8 Figure 4 Dialog and Session Control ette ette staat
8. 29 Example ATO SEND AID 000 30 Example ATO SEND 0 31 Example ATO_SET_ 5 0 001010101010 eo osten ue ose d arenae aane 32 Example ATO SET SESSION PARAMETERS 37 Example ATO SLEBED de 2 tn 2 2 2 2 2 2 2 2 2 2 2 2 38 Example ATO 0 00 aeos rh sone eoo Fo on iUa soa e oe psss sis 39 Example L WORK 41 41 Example ABORT 1 1 1 12 2 osso irass 42 ABORT Alf rn tiv 1 12 1 1 12 2 2 1 121 12121212 2 ea co ep ee Do PE svssstesesossestessecscsesecvesesvs 42 Example COPY deo 001101010008 43 Example of DOL me 45 Example 0 001020 r osas Ve scese e oa Eese e tsr osas iess 46 Example 7 01010 47 Example 1 FIDE sn CUL 49 IS cud agree 49 Example 1 0 51 Example 2 GETRDR 51 Example GOTO ui AAE EEEE 52 Example THELGCALL ee reete eter ee toon etre Sen vena eos ep ra arose erae aene Cer un oon 54 Example 2 00 54 Example SHEL 0 55 HLL Interface Area Assembler Structure 4 sonst 57 HLL Interface Area COBOL Structure ee eeeeee eee ee eee seen 58 HLL Interface Area PL I Structure 1 1 1 1 1 1 1 1 1 121 eee eee 1 1 1 1 1 1 1 1 2 2 2 58 HEL Calling Technique VSE 1 ro ooo 2 2 2 2 2 2 2 2 2 2 2 2 2 sepe Peau aS 59 60 Example LOGTIME
9. Default YES Valid values 0 60000 90 Compatibility Mode masc ato Automated Transaction Operator User s Guide trace Sessmax support logmode logtmod This parameter defines the max time in seconds while masc ato waits for a reply This parameter sets the default for MAP and PENDING TIMEOUT The default value is sufficient for most applications When using TIMEOUT 1440 the timeout control is disabled TIMEOUT 1440 should only be used for long running dialogs with HLLCALL s Default 120 Valid values NO YES This parameter serves to switch the ATOLOG on or off respectively If TRACE YES is set all screens of the dialog are displayed Default YES Valid values 1 9 This parameter specifies the maximum number of sessions that can be simultaneously active in a dialog Default 1 Valid values NO YES This parameter is used for diagnostic help With the use of SUPPORT YES detailed dialog evaluations are written to ATOLOG When SUPPORT YES is defined you should use LOGTERM YES for better performance Default NO VSE When SUPPORT YES is active the JCL parameter OPTION LOG PARTDUMP has to be defined MVS When SUPPORT YES is active the JCL parameter MSGLEVEL 1 1 in the JOB card as well as a SYSUDUMP DD statement has to be defined Valid values LOGMODE name according to VTAM definitions The logmode parameter specifies which logmode should be applied for the virtual screen All screen mo
10. READ ONE INPUT LINE PULL ATO_BUFF TYPE INPUT LINE AS TRANSACTION ATO_FUNC ATO_SEND_KEY CA ATO CALL AID ENTER CA DISPSCR CALL AID PF3 CALL SIGNOFF SAY NORMAL TERMINATION OF DIALOG MAX RC MAX RC EXIT MAX RC JCL SYSTSIN Daten CEMT SET DAT FI CLOSE Figure 85 ATO Dialog Example 3 from REXX Das Example steht auf der ausgelieferten SAMPLIB unter dem Namen RXAPPA3 8 3 2 Compatiblity Mode PROLOG DIALOG SAMPLE3 NETNAME NETATO1 APPLID DBDCCICS KKK KKK gt KKK KKK KKK KKK EINLESEN EINER STEUERKARTE INS FELD CICSCMD 35 LOGON ARK GETRDR TO CICSCMD EOF NODATA KK KKK KKK KKK KKK KKK KKK ck ck ckckckckckckckckck AUSFUEHREN DES EINGELESENEN BEFEHLES ko ko ko k k k ck ck ck ck AP KEY CLEAR APEND CICSCMD MAP DATA CEMT XXXXXXXXXXX APEND KKK KKK KKK KKK KKK KKK KKK KKK ck ckckckckckckckckck VERLASSEN BILDSCHIRMANZEIGE MIT PF3 UND MELDUNG ko ko ko ko ko kv ck ck AP KEY PF3 APEND PUTPRT DAT
11. ATO BUFF ATO BUFF APPLID DBDCCICS ATO BUFF ATO BUFF LOGMODE D4A32782 ATO BUFF ATO BUFF TIMEOUT 20 ATO BUFF ATO BUFF APPLTRY 4 ATO BUFF ATO BUFF SUPPORT NO ATO BUFF ATO BUFF LOGTERM LOGON ATO BUFF ATO BUFF LOGTIME 1 ATO BUFF ATO BUFF LOGTERMMODE D4B32782 ATO BUFF ATO BUFF LOGTRY 4 CALL ATO IF C2D ATO RC gt 0 THEN DO SAY ATO ERROR NACH ATO SET SESSION PARAMETERS C2D ATO RC EXIT END HERE WE CONNECT SESSION A ATO FUNC ATO CONNECT PS CALL ATO IF C2D ATO RC gt 0 THEN DO SAY ATO ERROR NACH ATO CONNECT PS C2D ATO RC EXIT 8 END RETURN LOGON CLEAR SCREEN CALL AID CLEAR CALL RETTEST START CESN TRANSACTION ATO FUNC ATO SEND KEY ATO BUFF CESN CALL ATO HIT ENTER CALL AID ENTER TYPE USERID AND PASSWORD AT HOME AND HOME amp NEWLINE RESP ATO FUNC ATO SEND KEY ATO BUFF HATOUSR1 H NATO CALL ATO CALL AID ENTER CHECK IF SIGN ON OK ATO FUNC ATO QUERY CURSOR CALL ATO ATO FUNC ATO COPY PS TO STRING ATO BUFF COPIES 19 NEW POSITION C2D ATO POSITION 61 ATO POSITION D2C NEW POSITION 4 CALL ATO IF ATO BUFF SIGN ON IS COMPLETE THEN DO SAY LOGON TO CICS FAILED END CALL AID CLEAR RETURN SIGNOFF SIGN OFF FROM CICS L AID CLEAR FUNC ATO SEND KEY BUFF CESF LOGOFF ATO L AID ENTER HERE WE DISCONNECT SESSION A ATO_FUNC ATO_DISCON
12. 5 ne 63 Example LOOP po 1 12 20 2 2 2 2 2 2 2 2 2 2 2 osE s KEse 64 Examples MAP 11 68 Example MAP LASTMAP2 PASS cccssssssssssssscsssscsssscsssssssssecsssscssscssssssssssessseces 68 Example MAPEND 0 o siresssreosussobssesiap roen ro sr Saoir osos resso kes roo piss Ni kaosa 69 masc ato Automated Transaction Operator User s Guide Table of Figures VII Figure 54 Example 1 MA 00 71 Figure 55 Examiple 2 MAPELD Ge 71 Figure 56 Example MAD i ertet rra ee ena orae sede ena epos esos cp ed e Cen rea Enn 73 Figure 57 75 Fipg re 58 Example MARK 1 1 1 1 1 2 1 12 212 2 2 2 2 2 tonne eode ponte ne ere sire sepe Ceu boue eR Pn pun enun 76 Figure 59 Example 1 MOVE 010101010100000 78 Figure 60 Example 2 MOVE 0100010 79 Figure 61 Example 1 PENDING CICS SAP i 82 Figure 62 Example 2 82 Figure 63 Example 3 PENDING 83 Figure 64 Example PERFORM and PROC 85 Figure 65 Example 010101010 92 Fig re 66 Example PUTLOG ei 94 Figure 67 Example PUTPRT sr Sueno uen Pp aae eo Bee st un sk onore Sen oae eU 96 Figure 97 Figure 69 Example l S CAN 00101 voits ossosa ro Srs aS 100 Figure 70 Example 2 SCAN 0000 100 Figure 71 Example 3 SCAN si 100 Figure 72 Example 101010101000100 103 Figure 73 Example SESSEN
13. 130 APPENDIX C User Exit ATOEXI VAR VAR VARI VAR2 VAR3 VAR VARI VAR2 VAR3 VAR VARI VAR2 VAR3 VAR VARI VAR2 VAR3 VAR VARI VAR2 VAR3 USER USER MUSTER ET TO O 2 1 USER ATOl ATO 1 O 2 1 USER ATO2 1 TO O 2 1 USER ATO9 1 RATO 1 O 2 1 USER ATOA TO O 2 1 Part of table TAB masc ato Automated Transaction Operator User s Guide 11 INDEX A ABORT Command Overview 11 Description 42 Example 42 Syntax 42 Additional Commands 14 Apendix A Example 2 121 Appendix A Example 1 117 119 Example 2 121 Example 3 2 Appendix B 5 Appendix C 127 Assembler Macros 113 ATO Assembly 113 DIALOG EXECUTION 113 Execution Methods 116 Link and Go 113 Loadmodul 113 MVS Dialog Execution 114 MVS Dialog Generation 115 MVS Loadmodul 115 Source 115 VSE Dialog Execution 113 ATO CONNECT PS Description 17 Example 17 Syntax 17 ATO COPY PS Description 18 Example 18 Syntax 18 ATO COPY PS TO STRING Description 19 Example 19 Syntax 19 ATO COPY STRING TO PS Description 20 Example 20 Syntax 20 ATO D
14. LIN line COL column label Valid values max 7 characters If a label is assigned to a FILL command this field may be referenced with a GETRDR or MOVE command data Valid values max 80 characters This parameter contains the text that is to be transferred to the defined position Variables can be transferred from the USER Exit ATOEXI with the use of DATA VARn Also compare page 93 of chapter User Exit ATOEXT CICS The TCT parameter UCTRAN YES causes the conversion into capital letters TSO Within TSO various conversions are active Codepages in ISPF etc line Valid values 01 24 This parameter defines the display screen row in which the value is to be transferred Default 01 column Valid values 01 80 This parameter defines the display screen column in which the value is to be transferred 48 Compatibility Mode masc ato Automated Transaction Operator User s Guide Default 01 Description FILL is used to transfer screen values to an input field The LIN and COL parameters determine the input position The input length is determined by the number of characters between the quotation marks If the DATA parameter extends over 2 or more lines one has to define a continuation mark in column 72 In this case the next line has to begin at column 16 This notation is according to assembler conventions Compare example 2 of figure 14 Note that a FILL command may only appear between MAP and MAPEND comman
15. MSGLEVEL 1 1 TIME 30 PROC1 EXEC PROC ATORUN 1 GEN ATOCTL DD PROLOG DIALOG DIALOG1 EPILOG END RUN ATORDR DD SALES CODE INPUT FOR GETRDR ITEM NUMBER Figure 78 MVS Assembly with Link and Go 114 Execution of ATO dialogs masc ato Automated Transaction Operator User s Guide 7 3 MVS Separate Dialog Generation and Execution This method requires that you have assembled and linked the source of the ATO dialog into a user load library The PARM field in the EXEC statement defines the ATO dialog to be executed with DIALOG dialogname where dialogname corresponds to the load module name in the user loadlib ATOGEN JOB ACCNT ATOGEN CLASS A MSGCLASS X MSGLEVEL 1 1 ATOGEN EXEC PROC ATOGEN DIALOG DIALOG1 LOAD ato user loadlib Figure 79 MVS ATO Dialog Generation job JOB ATOGO EXEC PROC ATOGO DIALOG dialogname REGION 2048K GO STEPLIB DD DSN user loadlib DISP SHR GO ATORDR DD 040 SALES CODE 02401 ITEM NUMBER Figure 80 MVS Load Module Execution masc ato Automated Transaction Operator User s Guide Execution of ATO dialogs 115 7 4 Advantages and Disadvantages of the ATO Dialog Execution Methods As mentioned in previous chapters the two execution methods 0 Assembly with Link and Run Mode and 0 Calling the dialog in Go mode have various advantages and disadvantages The first method with an Assembly followed by a Link a
16. CALL SIGNOFF SAY NORMAL TERMINATION OF DIALOG MAX RC MAX RC EXIT MAX RC o CHECK THE ATO RETURN CODE IF C2D ATO RC 0 THEN DO SAY ATO ERROR C2D ATO RC FUNCTION C2D ATO FUNC RC C2D ATO RC IF RC MAX RC THEN MAX RC RC END RETURN INITIALIZE LIST OF ALL FUNCTIONS AVAILABLE FOR ATO REXX INTERFACE ATO INITIALIZE D2C 1000 4 ATO TERMINATE D2C 1001 4 ATO_CONNECT_PS D2C 01 4 ATO_DISCONNECT_PS D2C 02 4 ATO_SEND_KEY D2C 03 4 ATO COPY PS D2C 05 4 ATO QUERY CURSOR D2C 07 4 ATO COPY PS TO STRING D2C 08 4 ATO SET SESSION PARAMETERS D2C 09 4 ATO COPY STRING TO PS D2C 15 4 ATO PAUSE D2C 18 4 ATO QUERY SESSION STATUS D2C 22 4 ATO SET CURSOR D2C 40 4 ATO SEND AID D2C 59 4 ATO PENDING D2C 60 4 ATO PUTLOG D2C 62 4 ATO PUTWTO D2C 64 4 ATO SLEEP D2C 66 4 ATO DISCONNECT FORCE D2C 68 4 ATO 1 D2C 70 4 MAX RC 0 RETURN PROLOG MAIN INITIALIZATION THIS FUNCTION MUST BE EXECUTED FIRST IN ALL CASES ATO FUNC ATO INITIALIZE ATO BUFF TRACEZNO CALL ATO IN CASE OF ERROR WE MUST QUIT IF C2D ATO RC 0 THEN DO SAY ATO ERROR NACH ATO INITIALIZE ATO FUNC ATO TERMINATE ATO BUFF CALL ATO EXIT 8 END C2D ATO RC SET SESSION PARAMETERS FOR SESSION A ATO SID ATO_FUNC ATO SET SESSION PARAMETERS ATO BUFF NETNAME A01ATO1 masc ato Automated Transaction Operator User s Guide Appendix A Example Dialogs 117
17. Figure 13 Example ATO DISCONNECT FORCE Note ATO DISCONNECT FORCE does not sign off or logoff from the TP monitor it is rather comparable to turning off the screen Therefore this command should be avoided masc ato Automated Transaction Operator User s Guide Commands 21 5 6 ATO DISCONNECT PS Syntax ATO DISCONNECT PS sessid Valid values 1 character This parameter shows which session should be terminated Default Like sessid in SESSBEG Description The ATO DISCONNECT PS command determines the end of a single session Before ending the program all sessions should be ended using ATO DISCONNECT PS Example ATO SID A ATO FUNC ATO DISCONNECT PS CALL ATO Figure 14 Example ATO DISCONNECT PS 22 Commands masc ato Automated Transaction Operator User s Guide 5 7 ATO EXI Syntax ATO FUNC ATO EXI Description The function ATO EXI calls the user exit ATOEXT The exit determines the communication area If ATO BUFF is filled with one of the constants VARx it will be filled with the value stored int the table of program ATOEXI after the call The following figure shows an example for the ATO EXI command VAR2 is filled with the value from the ATOEXI table and entered as password on the screen Example ATO FUNC ATO BUFF CALL ATO VAR2 ATO BUFF ATO FUNC ATO SEND KEY ATO BUFF Huserid H N VAR2 CALL ATO ATO EXI VAR2 Figure 15 ExampleATO EXI masc
18. The ATO dialog is initialized with the first call of ATOHLL from the batch program INIT Phase 2 The ATO dialog transfers the control by means of HLLCALL back to the batch program whereby information is transferred by means of HLLCALL DATA 3 The ATO dialog is again called by means of the transfer of data in the field HLLTO NEXT Phase The sequences 2 and 3 can be repeated as often as necessary 4 LASTMAP YES indicates to the batch program the end of the ATO dialog LAST 56 Compatibility Mode Phase masc ato Automated Transaction Operator User s Guide 6 12 HLL Interface Area To be able to communicate from a batch program with a ATO dialog via HLL interface a communication area the so called HLL interface area is used This area has a certain structure which has to be filled by the batch program or is filled with the corresponding data after returning from the ATO dialog to the batch program The following fields are available Fieldname HLLLENG Length of the HLL interface area This length is fixed at 256 Bytes HLLREQU Request type Will automatically be tracked by ATO Response type Will be filled with the value LAST when LASTMAP YES Return code field This field is filled with a corresponding return code by ATO when returning to the calling batch program HLLDATA Control area for the ATO dialog with a length of 80 bytes HLLDATA may not be altered by the batch program HLLTO Transfer area for the user bat
19. ck ck ckckck ck ck ck ck ck ck BRK KKK ys H LL FOR PL 1 EJ ke ke KK ck ck ck ck BRR DCL ATOHLL E DCL 1 HLL DC DC DC E N LID LREQ LRESP LRC LFIL1 LTO LFIL2 LDATA CHAR 8 CHAR 4 CHAR 4 CHAR 8 CHAR 80 CHAR 80 CHAR 64 I I I I FIXED BIN 31 I I I LLENG FIXED BIN 31 Figure 46 HLL Interface Area PL I Structure 58 Compatibility Mode TRY OPTIONS ASSEMBLER IT 256 IT ATOHLL IT INIT TECH IT 8 LECH y LE wy IT ry IT masc ato Automated Transaction Operator User s Guide 6 13 HLL Interface Calling Technique A user program that calls a ATO dialog CALL ATOHLL has to be assembled correspondingly The following figures demonstrate the Job Control for assembly of a user program with built in ATO dialog call by means of an assembler program Also see the notes as from page 35 JOB HLL OPTION LOG PARTDUMP LIBDEF SEARCH userlib ATO410 CATALOG userlib ATO410 OPTION CATAL ACTION CLEAR PHASE TESTHLL EXEC ASSEMBLY TESTHLL CSECT USING 10 BALR 10 0 BCTR 10 0 BCTR 10 0 LA 13 SAVE MVC HLLTO DIALOG CALL ATOHLL HLL EOJ RC 15 SAVE DS 18F DIALOG DC CL80 DI
20. command logtmod Valid values LOGMODE name according to VTAM definitions This parameter defines the logmode for the LOGTERM Usually this should be the same logmode as specified in the logmode parameter All screen models model 2 3 4 or 5 are now supported Default Value from PROLOG or previous SESSET command Description The SESSSET command follows the SESSBEG and sets all parameters not corresponding with the ones set in the PROLOG During a session the parameters may be changed using SESSMOD Example SESSBEG SESSION A SESSSET SESSION A 0 108 Compatibility Mode masc ato Automated Transaction Operator User s Guide NETNAME NETATO1 APPLID DBDCCICS LOGTERM LOGON SESSEND SESSION A EPILOG END Figure 74 Example SESSSSET masc ato Automated Transaction Operator User s Guide Compatibility Mode 109 6 37 SLEEP Syntax Command Parameter SLEEP SEC sec SEC Valid values 1 3600 Time value in seconds for the SLEEP command Default 60 Description SLEEP is used to interrupt the running dialog A SLEEP command does not read a new display screen for this reason a new MAP MAPEND sequence has to be defined Example MARK MAP FILL DATA MENU MAPEND SCAN DATA MAIN MENU FOUND L2 PUTPRT DATA WAIT FOR ENABLE CONDITION SLEEP GOTO MARK L1 L2 MARK Figure 75 Example SLEEP 110 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 38 UEXIT Synta
21. 2 2 1 21 1 2 2 2 seee 17 Sh PS aron a cle ese Beh gee es a dw a hee does bs 17 3 9 2 1011 18 3 3 ATOCCOPY PS TO STRING uetus DEEN 19 SA ATOSCOP Y STRING EO 20 5 5 ATO DISCONNECT FORCE nc ne er BO nena e eei bn ing 21 6 ATOSDISGONNECGHTZBS i ne eie e NEP bee Aa 22 5 23 24 59 PAUSE 0 a nae e RARIOR S nam 25 SN 20 FAAS ATO PUTEO ee a oa eek Se Eee EEE EES AER 27 E 00010101 0 28 ER 29 TO ORENI A nd IN 30 Skar ATO SEND 0001 EEE EI 31 35 T6 ATO 1 11 015001 4a et ete e De rer e deett ee 32 5 17 ATO SET SESSION PARAMETERS 000m nennen enne ener 33 SR 38 519 ATO TERMINATE 1 121 1 1 1 39 6 Compatibility 13 10 01 cc 41 6 1 Internal Work 41 6 2 Examples of Application of the WORK Areas RN 41 3 30011 42 COPY s 43 44 1 A ee 47 48 20 6 9 GOTO 00 en RO Re 52 OOS me te mesons 53 56 masc ato Automated Transaction Operator User s Guide Table of Contents V 612 1 ete tiere a 57 6 13 HLL Interface Calling 59 6 14 HEE Interface Instructions en dert pee t Eee regret
22. 5 are now supported Default D4A32782 logtmod Valid values LOGMODE name according to VTAM definitions This parameter defines the logmode for the LOGTERM Usually this should be the same logmode as specified in the logmode parameter All screen models model 2 3 4 or 5 are now supported Default D4A32782 Description The ATO SET SESSION PARAMETERS command defines the start of a ATO dialog By means of corresponding parameters a TP monitor and a logical terminal is selected for processing the dialog Furthermore with the respective parameters a detailed LOG or a LOG terminal running parallel to the dialog may be specified The communication between ATO SET SESSION PARAMETERS and the applications or VTAM definitions is described in the Installation Manual Example ATO SID A ATO FUNC ATO SET SESSION PARAMETERS ATO BUFF DIALOG SAMPLE1 ATO BUFF ATO BUFF NETNAME NETATO1 ATO BUFF ATO BUFF APPLID DBDCCICS ATO BUFF ATO BUFF LOGTERM LOGON CALL ATO Figure 25 Example ATO SET SESSION PARAMETERS masc ato Automated Transaction Operator User s Guide Commands 37 5 18 ATO SLEEP Syntax ATO FUNC ATO SLEEP sec Valid values 1 3600 time value in seconds for the ATO SLEEP command Description ATO SLEEP allows to interrupt a dialog for a certain amount of time ATO SLEEP does not read a new virtual screen The following figure sho
23. MDTAUTO see parameter MDTAUTO in the command MAP on page 65 Default Value from PROLOG or previous SESSET command Valid values 0 60000 This parameter defines the max time in seconds while masc ato waits for a reply This parameter sets the default for MAP and PENDING TIMEOUT The default value is sufficient for most applications When using TIMEOUT 1440 the timeout control is disabled TIMEOUT 1440 should only be used for long running dialogs with HLLCALL s Default 120 Valid values 1 character masc ato Automated Transaction Operator User s Guide Compatibility Mode 107 This parameter specifies the session for which to use the parameters Default Value from PROLOG or previous SESSET command support Valid values NO YES This parameter is used for diagnostic help With the use of SUPPORT YES detailed dialog evaluations are written to ATOLOG When SUPPORT YES is defined you should use LOGTERM YES for better performance Default NO VSE When SUPPORT YES is active the JCL parameter OPTION LOG PARTDUMP has to be defined MVS When SUPPORT YES is active the JCL parameter MSGLEVEL 1 1 in the JOB card as well as a SYSUDUMP DD statement has to be defined logmode Valid values LOGMODE name according to VTAM definitions The logmode parameter specifies which logmode should be applied for the virtual screen All screen models model 2 3 4 or 5 are now supported Default Value from PROLOG or previous SESSET
24. NETNAME NETATO1 0 APPLID DBDCCICS kckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckck AUFRUF SIGN ON TRANSAKTION d eee k AE K E k kk gt ke ke ke LOGON ARK MAP1 AP KEY CLEAR APEND AP DATA CESN APEND ck ck ckckckckckckckckckckckckckckckckckckckckckckckckck ck ck ckck KKK gt gt gt gt EINGABE USERID MAP2 AP FILL LIN 04 COL 14 DATA ATOUSRI FILL LIN 06 COL 16 DATA ATO APEND CKCkckckckckckckckckckckckck ck KKK SIGN ON OK JA SIGNOK gt gt ck ck KKK gt gt gt gt SCAN DATA SIGN ON IS COMPLETE FOUND SIGNOK PUTPRT DATA LOGON CESN TO CICS FAILED ckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckck gt gt gt gt gt SIGN ON FAILED EXIT DIALOG
25. Prepare function Send an entry to the virtual screen 2 Put the desired entry into the buffer 3 and call ATO 4 Begin a loop including the check of the ATO return code 5 Read a line 6 Put part of this line into the buffer 7 in order to have it appear as keyed in entry on the virtual screen 8 Call ATO 9 many more ATO or REXX commands or functions 8 Structure masc ato Automated Transaction Operator User s Guide Each masc ato dialog starts with a PROLOG and ends with an EPILOG command A masc ato dialog consists of the session handling whereas for the other program logic a programming language like REXX is used Each session starts with a SESSBEG and ends with a SESSEND command Up to 9 sessions can be used simultanesouly the session oriented commands are directed towards a specific session using the SESSID parameter Sequentially any number of sessions can be processed masc ato Automated Transaction Operator User s Guide Structure 9 4 COMMAND OVERVIEW This chapter gives an overview of the commands and functions of masc ato Where useful the call from REXX and the macro in the compatibility mode are compared The detailed description with all parameters follows in the chapters below 4 1 Dialog and Session Control Call from REXX Compatibility Mode ATO INITIALIZE Initial values of a dialog ATO TERMINATE End of a dialog ATO DISCONNECT FORCE Cancel a dialog ATO CONNECT PS SESSBEG Begin of a specif
26. SEND KEY ATO BUFF NABAP CALL ATO Figure 24 Example ATO SET CURSOR 32 Commands masc ato Automated Transaction Operator User s Guide 5 17 ATO SET SESSION PARAMETERS Syntax sessid ATO SET SESSION PARAMETERS DIALOG name NETNAME netname APPLIDzapplid APPLTRY appltry AUTOPENDczautopend LOGAIDczlogaid LOGTERM ogterm LOGTIME ogtime LOGTRY zlogtry LOOP loop LINEOV lineov MDTAUTO mdtauto TRACE trace sTIMEOUT timeout sSSESSMA X sessmax SUPPORT support NOGMODE Iogmode LOGTMOD logtmod sessid Valid values 1 character This parameter defines the session Default A name Valid values Max 8 alphanumerical characters This parameter indicates the name of the dialog to be executed Default ATODLOG netname Valid values Max 8 character terminal name according to network naming conventions CICS This parameter identifies a valid network name according to CICS TCT or CICS CSD TERMINAL definitions respectively masc ato Automated Transaction Operator User s Guide Commands 33 applid appltry autopend lineov logaid 34 Commands Default NETATOI Valid values APPLID name according to network conventions APPLID for a masc ato session CICS This parameter identifies the application name as defined in the SIT of the corresponding CICS This name is also displayed at the bottom right hand edge of the screen with the transaction CEMT INQ TAS Default DBDCCICS
27. Valid values 1 6000 appltry is the number of attempts that masc ato executes for the establishment of a connection with the application in parameter APPLID The entry APPLTRY 1 may be used to only execute a dialog when the TP monitor is active and available Default 6000 Valid values YES NO autopend defines if an asynchroneously sent message caused for example by an EXEC CICS START TRANSID or a CMSG transaction should interrupt the normal dialg flow or if the message should be discarded for the moment Specifying NO allows to process all asynchroneous messages at some well defined points in the program Default NO Valid values 0 99999 lineov defines the number of lines per page for ATOLOG and ATOPRT Default 55 Valid values YES or NO If this parameter is set to YES the key pressed is shown in the lower right corner when following a session with LOGTERM This helps to debug a session using LOGTERM If LOGTERM is not active the value of LOGAID is ignored masc ato Automated Transaction Operator User s Guide logterm logtime logtry loop Default NO Valid values Max 8 alphanumeric characters Valid network name according to network conventions NO or LOGON This parameter defines the network name of a display screen for the supervision and step by step reporting of the dialog If this optional function is not required specify LOGTERM NO When SUPPORT YES is defined specify LOGTERMENO i
28. ato Automated Transaction Operator User s Guide Commands 23 5 8 ATO INITIALIZE Syntax ATO FUNC ATO INITIALIZE ATO BUFF TRACE trace trace Valid values NO YES This parameter serves to swith on or off the ATOLOG If trace is set to YES all virtual screens of the dialog are shown Default YES Description The ATO_INITIALIZE command defines the begin of an ATO dialog and has to be the first ATO command that is processed Besides the general initialization it also serves to swith on or off the trace Example ATO_INITIALIZE TRACE YES Figure 16 Example ATO INITIALIZE 24 Commands masc ato Automated Transaction Operator User s Guide 5 9 ATO PAUSE Syntax ATO FUNC ATO PAUSE ATO BUFF Description ATO PAUSE interrupts the dialog until the next screen from the host is received This allows to wait for certain events like asynchronous messages that a process has ended If autopend in ATO SET SESSION PARAMETERS is not specified or is set to NO the new virtual screen content is made available to the application program using ATO PENDING If autopend is set to YES however the virtual screen is immediately filled with the new content there is no further action necessary The function ATO PAUSE only ends when an asynchronous message arrives or if it gets a timeout If the objective is to interrupt the dialog flow for a certain time consider the use of ATO SLEEP SAP To wait for the end of a l
29. for a specific value defined by DATA data In addition the data is converted into capital letters in the internal buffer before the search By means of the FOUND or NFOUND parameters you can branch correspondingly to a branch mark for masc ato Automated Transaction Operator User s Guide Compatibility Mode 99 further processing In the case of a FOUND condition the value stands left justified in the area defined with the TO parameter Default WORKI and may be processed with the commands MOVE PUTLOG etc Examples SCAN DATA SIGN ON IS COMPLETE FOUND OK1 PUTPRT DATA SIGN ON ERROR GOTO MARK END1 OK1 MARK END1 MARK Figure 69 Example 1 SCAN MOVE FROM SCREEN LIN 04 COL 67 TO S1 SCAN DATA 99 999 999 FROM SCREEN LIN 05 COL 67 FOUND OK1 PUTPRT DATA NOT FOUND OK1 MARK Figure 70 Example 2 SCAN SWITCH DCL DATA ON PERFORM PROC P1 SCAN DATA ON FROM SWITCH FOUND A1 MAP MAPEND PROC MOVE TO SWITCH DATA OF PROCEND Figure 71 Example 3 SCAN 100 Compatibility Mode masc ato Automated Transaction Operator User s Guide 0 33 SCANB Syntax o Command Parameter label SCANB DATA data FROM from TO to LIN line COL col ENDLIN endlin ENDCOL endcol TOFFSET toffset FOUND mark NFOUND mark label Valid values Max 7 alphanumeric characters label may be referenced by a command with a TO FROM parameter e g MOVE data Valid values Max 132
30. modules or 0 phases VSE load modules MVS The calling of an object module is a widely used method and is supported by all popular programming languages With this method the module ATOHLL is automatically merged into the user program at linking time The entry point and load point of ATOHLL are identical therefore no further entry statements have to be defined for the linkage editor In a user program the calling of a ATO dialog in form of a phase or load module is supported by the corresponding compiler with the corresponding options With this method ATOHLL is not merged into the user program but is loaded at execution time The parameter transfer takes place according to the standard linkage conventions and in the ASM standard format The ATOHLL interface expects that the length which was defined in the field HLLLENG is available as a whole In case the length definition is wrong other areas of the user program could be overwritten by mistake The ATOHLL interface always sets a return code By means of the corresponding coding this may be reviewed in the user program after returning from the ATO dialog In the case of programming languages which do not support return codes of modules this return code is also available in the field HLLRC Storage Requirements By calling a ATO dialog from a user program via ATOHLL masc ato aded into the same region VSE or the same address space MVS as the user program to be executed Therefore
31. the screen Dark and only serve for conversational prompting may also be transmitted herewith When defining MDTAUTOZNO only the fields that have been inserted or changed with FILL or MAPFLD will be transmitted This parameter sets the default for MAP MDTAUTO see parameter MDTAUTO in the command MAP on page 65 Default YES Valid values 0 60000 This parameter defines the max time in seconds while masc ato waits for a reply This parameter sets the default maps ATO PAUSE and ATO PENDING When using TIMEOUT 1440 the timeout control is disabled Default 120 Valid values NO YES This parameter serves to switch the ATOLOG on or off respectively If TRACE YES is set all screens of the dialog are displayed Default YES Valid values NO YES This parameter is used for diagnostic help With the use of SUPPORTZYES detailed dialog evaluations are written to ATOLOG When SUPPORT YES is defined you should use LOGTERM YES for better performance Default NO VSE When SUPPORT YES is active the JCL parameter OPTION LOG PARTDUMP has to be defined MVS When SUPPORT YES is active the JCL parameter MSGLEVEL 1 1 in the JOB card as well as a SYSUDUMP DD statement has to be defined Valid values LOGMODE name according to VTAM definitions The logmode parameter specifies which logmode should be applied for the virtual screen masc ato Automated Transaction Operator User s Guide All screen models model 2 3 4 or
32. used as a branch address for the GETRDR GOTO or SCAN commands or as a TO address for filling the data of the DATA parameter Default none Valid values up to 80 characters data contains the text that is to be sent to the screen Imbedded into the text also cursor control characters may be used If at the beginning none of these is specified the text starts at the actual cursor position Using DATA VARn variables from the user exit ATOEXI may be used Please find the details on page Fehler Textmarke nicht definiert CICS The use of the TCT UCTRAN YES parameter causes the translation of all characters into uppercase TSO Within TSO various translations are active like codepages in ISPF etc MAPKEYS serves to send keystrokests an entry field starting at the current cursor position The length of the entry is determined by the number of characters between the apostrophes minus the cursor control keys marked by If the data parameter occupies more than two lines a continuation mark has to be placed in column 72 and the next line has to start at column 16 The notation is according to assembler rules Please note that MAPKEYS commands may only be used in between of a MAP and MAPEND command 74 Compatibility Mode masc ato Automated Transaction Operator User s Guide Instead of the MAPKEYS command it is also possible to use FILL where the entry has to placed onto the virtual screen specifying the exact line and column B
33. 0 MAP MAPEND Figure 40 Example GOTO Note Use this command carefully in order to promote the readability of the dialog for maintenance or error diagnoses If possible try to code the dialog sequentially top down with as few branching statements as possible As an alternative the command PERFORM may be used in order to execute a command sequence The PERFORM command is described on page 56 52 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 10 HLLCALL Syntax Command Parameter abel HLLCALL DATA data TO field label data field Description Valid Values 7 characters maximum With the specification of a label the contents of the DATA parameter can be filled eg by a MOVE command Default none Valid Values 80 alphanumeric characters maximum This field defines an area in which the data strings are put It is made available to the calling program under the name HLLDATA for program control Default none Valid Values Defined field label or WORKI 9 with max 7 characters field is a value which is made available to the calling batch program by means of the HLLTO area Default WORKI HLLCALL serves to communicate with the batch program which the dialog has called using CALL ATOHLL In addition data can be made available for further processing via the area of the HLL Interface see HLL Interface area A renewed calling of the ATO dialog with CALL ATOH
34. 61 6 1 5 EOGTIME EE 63 0 16 E OO EE db a ee 64 617 MAP Lii oae ee ee 65 GS MAPEND z conserere o eee eet bete tette 69 619 uci 70 6 20 MAPBETLT J e Itb ttr t rt teet eie Ee Esp ec ba ege dein eel Sede Poeta eto d 72 621 MAPKBEYS uo und Len IC nS 74 6224 MARK rat Se PAURA NE e EAN de eum eee ee debe 76 6 22 0 E a ue etal acdiees Pees a E ucts thts 77 6 24 SPENDING ioe 0 80 6 25 PERRBEORM cete Re hi a e t ee Re REOR 84 6267 PROC ettet cute eet bet Cd 86 6 21 PBROGEND 4 iet te ER aeons od we RR eU 87 6 282 0000000000 88 6 29 PUT BOG ite ties Ge eae en ee el E SUBE 93 6 30 PU TTPRIT eerte PER het nte ic M E 95 6 3 T PULEW LO wheels ss ee oe eio reise e ete Henne ee ves mate redi e EE coSed 97 6 32 SCAN a ied stet t tee e eb a oL Rege Po Ce ERR 98 6 33 SCANB i ade e RO a to di ide ese ee te Cede 101 1 1 et a lel titled niece ised axes 103 6 35 SESSEND i id exerit ipee REED 104 6 36 SBSSSET 7 SESSMOD gn er 0 105 110 0 eels 2 e ee phe tiit 111 7 Execution OF ATO 01291089 i 113 7 1 VSE Assembly with Link and Run ee _ 0 02 2 ener 113 7 2 MVS Assembly with Link and RU 114 7 3 MVS Separate Dialog Generation and Execution pp 115 7 4 Advantages and Disadvantages of the ATO Dialog Execution Methods
35. A BEFEHL AUSGEFUEHRT GOTO MARK ENDE KKK KKK KKK KKK KKK KKK KKK KEINE EINGABEDATEN ERHALTEN ke ko ke k kk k k k kk NODATA MARK PUTPRT DATA KEINE BEFEHLE 122 Appendix A Example Dialogs masc ato Automated Transaction Operator User s Guide AP KEY CLEAR APEND AP LASTMAP YES RC 4 DATA CESF LOGOFF APEND KKK KK KKK KKK KKK gt ck ckckckckckckckckckckckckckckckckckckckckck ck gt ABSCHLUSS DES ATO 8 ke ke ke ke gt k kk k k Kok kk ck ENDE ARK gt KK gt LOGOFF ARK EPILOG END JCL GETRDR Daten CEMT SET DAT FI CLOSE Figure 86 ATO Dialog Example 3 masc ato Automated Transaction Operator User s Guide Appendix A Example Dialogs 123 9 APPENDIX B MIGRATION TO VERSION 4 1 masc ato 4 1 0 is source compatible to the previous version AII dialogs that are migrated have to be re assembled and relinked Please note that new the dialog name is specified directly at the program call in
36. ALOG TEST COPY ASMHLL LTORG DROP 10 END EXEC LNKEDT LIBDEF SEARCH userlib ATO410 CATALOG userlib ATO410 OPTION CATAL ACTION CLEAR PHASE TEST EXEC ASSEMBLY PROLOG DIALOG TEST TIMEOUT 1440 AP KEY CLEAR APEND AP LASTMAP YES DATA CESF LOGOFF APEND EPILOG END EXEC LNKEDT ASSGN SYS001 01E EXEC TESTHLL SIZE 512K Figure 47 HLL Calling Technique VSE masc ato Automated Transaction Operator User s Guide Compatibility Mode 59 jobname JOB STEP1 EXEC PROC ATOGEN DIALOG TESTHLL TESTHLL CSECT USING 10 BALR 0 BCTR 10 0 BCTR 10 0 LA 13 SAVE MVC HLLTO DIALOG CALL ATOHLL HLL EOJ RC 15 SAVE DS 18F DIALOG 6 CL80 DIALOG TEST COPY ASMHLL LTORG DROP 10 END STEP2 EXEC PROC ATOGEN DIALOG TEST PROLOG DIALOG TEST TIMEOUT 1440 MAP KEY CLEAR MAPEND MAP LASTMAP YES DATA CESF LOGOFF MAPEND EPILOG END STEP3 EXEC PGM TESTHLL ATO DD SYSOUT ye Figure 48 HLL Calling Technique MVS 60 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 14 HLL Interface Instructions Calling and Parameter Transfer Apart from various programming languages a ATO dialog can also be called via ATOHLL with tools and vendor utilities For detailed instructions on the calling of a dialog see the corresponding chapters that describe the calling of assembler modules ATOHLL can be called from a user program in the form of 0 object
37. Automated Transaction Operator Handout MATO GI410 1 E masc ato Automated Transaction Operator General Information MATO UGA410 1 E masc ato Automated Transaction Operator User s Guide MATO INA410 1 E masc ato Automated Transaction Operator Installation Guide MATO MC410 1 E masc ato Automated Transaction Operator Messages and Codes 4 MATO SA410 1 E masc ato Automated Transaction Operator Samples masc ato Automated Transaction Operator User s Guide Preface I UPGRADE OVERVIEW This is the first edition of masc ato Automated Transaction Operator Users Guide Enhancements masc ato has been reworked extensively and has been supplemented with new commands and parameters The new command options have been set up in a way that their correlation is logical in many places Special attention has been paid to clarity and legibility of the commands We thank all users whose suggestions have assisted us in the writing of this new upgrade CICS The examples in this documentation are based on CICS ESA Changes in the March 1998 Edition A new ATO SET SESSION PARAMETERS parameter LOGAID shows the key pressed when following a session in logterm mode New PROLOG parameters LOGAID shows the key pressedd when following a session in logterm mode MLOG shows all macros passeed during the session on ATOPRT ASMGEN and ASMDATA control the output of the assembly step PUTPRT now accepts a label that can be used in GO
38. C DIALOG1 NETATO1 VARn UUUUUUUU KKK KKK KKK KKK KK KKK KKK KKK KKK KK gt gt TABELLE VON ATO FI LL VARIABLEN CkCkckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckck ck gt SHOW THIS VARIABLES PRINT OFF DO DIALOG DS 0D TAB DS 0C DIALOG DC DC DC DIALOG DC DC DC DIALOG DC CT DC DC CT DIALOG DC CT DC DC 0 1 DIALOG DC DC CT DC Figure 90 User ETNAME APPLID ET ETA ETA ETA ET ETA ETA ETATO1 xxx ET E APPLID 2 0 ETATO2 kK KK 2 0 E APPLID OO CICSP1 O0 CICSP1 O0 CICSP1 E APPLID OLR KK KKK KKK OL KKK KK KKK BD lt Ee ETNAME APPLID ETATO9 xxxx xe ETATOO9 xxx x e x ETNAME APPLID Exit ATOEXI
39. CSD TERMINAL PRINTER SAP It is to your advantage to use the function execution Nxxx on line column 24 5 instead of the predefined function keys for a better overview MVS The CLEAR key may not be used for TSO applications PA1 is used in TSO for interrupting the output on the screen after a TSO command Valid values YES ONLY With RECEIVE ONLY a second screen can be received from the TP monitor see description for PENDING as from page 52 Default YES masc ato Automated Transaction Operator User s Guide Compatibility Mode 67 Description The command MAP is used to position the cursor on the input screen and to define the operational function keys Between MAP and MAPEND only FILL and MAPFLD commands may be used Example CLEAR1 MAP KEY CLEAR APEND TRA1 MAP TIMEOUT 300 DATA TRA1 APEND PFKEY MAP LIN 07 COL 80 KEY PF14 APEND MAP KEY PF3 D KEY CLEAR D MAP LASTMAP YES RC 04 DATA CESF LOGOFF APEND Figure 51 Example MAP KKK KKK KKK KKK KKK KKK KKK KKK KKK ck ck ckckckckck ko SESSION PASSING WITH NEW APPLID AP DATA CECI IS PA LU CICS2 APEND AP KEY ENT APEND AP KEY PF3 LASTMAP PASS APEND
40. D 104 Fig re 74 ExampleSESSSE 000 109 Figure 75 Example SLEEP ed 110 Figure76 Example UEXIL so 111 Figure 77 VSE Assembly Link 113 Figure 78 MVS Assembly Link and GO 114 Figure 79 MVS ATO Dialog Generation 010101010100000 115 Figure 1 MVS Load Module Execution 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 115 Figure 80 ATO Dialog Example 1 00101001010000 119 120 Figure 82 ATO Dialog Example 2 from REXX sss 121 Figure 83 ATO Dialog 010101010101010 121 Figure 84 ATO Dialog Example 3 from eee eee esee ee ee esee 122 123 Figure 86 ATOEXI Generation for VSE Lecce 1 1 1 1 1 1 1 1 1 1 2 2 2 2 2 2 2 2 2 2 2 2 2 tasse 127 Figure 0101010100000 127 Figure User Exit Usage 2 lt lt lt lt 2 lt 2 lt 2 2 lt 2 2 2 9 129 Figure 89 User Exit ATOEXI Part of table TAB 4 eee e eren e ee esten seen us 130 VIII Table of Figures masc ato Automated Transaction Operator User s Guide 1 NOTATION CONVENTIONS The format of the ATO commands are supplemented by means of the following symbols 0 Square brackets specify optional fields or parameters o A vertical bar divides up a selection In the ca
41. DCB definition of DCB LRECL 121 BLKSIZE 121 RECFM FBA Messages that only serve for dialog checking i e purely informational messages should be written by use of the PUTPRT command See chapter PUTPRT on page 94 masc ato Automated Transaction Operator User s Guide Compatibility Mode 93 Example MSG01 DCL DATA ERROR MAIN MENU NOT FOUND MAP1 MAP DATA MENU MAPEND SCAN DATA MAIN MENU NFOUND ERROR ERROR MARK PUTLOG FROM MSGO1 Figure 66 Example PUTLOG 94 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 30 PUTPRT Syntax o Command Parameter label PUTPRT DATA data FROM field TITLE ritlenr label data field titlenr Description Valid values Max 7 alphanumeric characters label may used as the address in a GOTO however it may not be referenced by a command with a TO FROM parameter e g MOVE Valid values Max 64 alphanumerical characters See command PUTLOG on page 93 Default none Valid values WORKI 9 or predefined field eg with DCL MAP FILL SCAN B MAPFLD etc The contents of field are output on ATOPRT Default WORKI Valid values 3 This parameter defines headings with the text of the DATA parameter In this case a heading is unambiguously identified with the TITLE parameter Omit this parameter if you do not intend to write a title heading Default blank PUTPRT either writes the text supplied with the DATA p
42. END Figure 62 Example 2 PENDING 82 Compatibility Mode masc ato Automated Transaction Operator User s Guide B1 AP DATA CEMT INQ TAS APEND B2 AP KEY ENT APEND B3 AP KEY ENT APEND B4 AP KEY PF3 APEND 2 The next transaction will B5 AP FILL DATA CMSG APEND KKK gt Get any pending transaction PENDING CkCkckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckck ck ckckckckckckckok Any pending transaction received E
43. ION OF MAPFLD DATA FOLDER MAPFLD DATA HAS ENDED NO MAPFLD DATA 000000 MAPEND NF1 MARK Figure 59 Example 1 MOVE ME 78 Compatibility Mode masc ato Automated Transaction Operator User s Guide MAP DATA FIBU MAPEND MARK GETRDR TO WORK2 EOF END1 MOVE FROM WORK2 COL 1 TO TEXT MOVE FROM WORK2 COL 13 TO AMNT MOVE FROM WORK2 COL 21 TO ITEM MAP FILL LINE 10 COL 14 DATA XXXXXXXXXXXX FILL LINE 11 COL 20 DATA XXXXX XX FILL LINE 12 COL 10 DATA XX MAPEND GOTO MARK L20 END1 MARK Figure 60 Example 2 MOVE masc ato Automated Transaction Operator User s Guide Compatibility Mode 79 6 24 PENDING Syntax Command Parameter PENDING FOUND label NFOUND label TIMEOUT sec label Valid values 7 characters maximum label is a branch mark defined with label MARK or label MAP for the FOUND or NFOUND condition sec Valid values 1 60000 See TIMEOUT parameter in chapter MAP on page 65 Default 60 In the case where a TP monitor transaction always transmits a second screen output at the same position of the transaction as an alternative to PENDING the command MAP RECEIVE ONLY may also be used CICS PENDING is used for receiving extraordinary messages e g CMSG SAP PENDING is used for the reproduction of folders via SBDC or TF70 ABAP 80 Compatibility Mode masc ato Automated Transaction Operator User s Guide Description masc ato strictly
44. ISCONNECT FORCE Description 21 Example 21 Note 21 Syntax 21 ATO DISCONNECT PS Description 22 Example 22 Syntax 22 ATO EXI masc ato Automated Transaction Operator User s Guide Description 23 Example 23 Syntax 23 ATO INITIALIZE Description 24 Example 24 Syntax 24 ATO PAUSE Description 25 Example 25 Syntax 25 ATO PENDING Description 26 Example 26 Syntax 26 ATO PUTLOG Description 27 Example 27 Syntax 27 ATO PUTWTO Description 28 Example 28 Syntax 28 ATO QUERY CURSOR Description 29 Example 29 Syntax 29 ATO SEND AID Description 30 Example 30 Syntax 30 ATO SEND KEY Description 31 Example 31 Syntax 31 ATO SET CURSOR Description 32 Example 32 Syntax 32 ATO SET SESSION PARAMETERS Description 37 Example 37 Syntax 33 ATO SLEEP Description 38 Example 38 Syntax 38 ATO TERMINATE Description 39 Example 39 Syntax 39 ATOEXI Usage of 129 User Exit 127 Variables VARn 128 ATOHLL 53 Command Overview 16 Index 131 Correlation with Languages 62 JCL Definitions 62 Storage Requirements 61 ATOHLL Interface 56 Description 56 Programming C Call from REXX 12 14 Command overview 11 Compatibility Mode 13 15 41 Control of Virtual Screens 12 COPY Command Overview 15 Description 43 Example 43 Syntax 43 D DCL Description 44 Example 45 Syntax 44 Dialog and Session Control 11 E END Command Overview 11 Description 46 Example 46 Syntax 46 EPILOG 9 Command Overview 11 Descr
45. LL continues the processing after the HLLCALL command masc ato Automated Transaction Operator User s Guide Compatibility Mode 53 Note HLLCALL can only be used in dialogs which have been called from a batch program by means of CALL ATOHLL With the specification PROLOG SUPPORT YES the transferred data areas and parameters can be logged and checked in detail HLLCALL is called implicitly after a MAP LASTMAP YES and after the command ABORT After these two commands the ATO dialog is terminated and renewed calling of the dialog with the HLL interface leads to undesired results Example 1 HLLCALL TO WORK2 DATA CALENDAR PUTPRT FROM WORK2 MOVE TO CALENDR FROM WORK2 MAP CALENDR FILL LIN 07 COL 14 DATA XXX MAPEND Figure 41 Example 1 HLLCALL Example 2 ARK HLLCALL DATA NEXT TO WORK2 PUTPRT FROM WORK2 SCAN FROM WORK2 DATA FOUND END1 AP DATA FIBU APEND OVE TO CREDI FROM WORK2 COL 01 AP FILL LIN 07 COL 14 DATA 00000000 APEND SCA DATA WRONG FOUND L2 GOTO MARK L3 ARK OVE TO WORK2 FROM SPACES HLLCALL DATA NOTFOUND TO WORK2 GOTO MARK L1 ARK OVE TO WORK2 FROM SPACES OVE TO WORK3 FROM SCREEN LIN 08 COL 02 HLLCALL DATA FOUND TO WORK2 GOTO MARK L1 ARK AP LASTMAP YES DATA CESF LOGOFF RC 0 APEND Figure 42 Example 2 HLLCALL 54 Compatibility Mode masc ato Automated Transaction Operator User s Guide Example 3 NUMBER TEXT AMOUNT ARK SCAN OVE AP A
46. NE FILL DATA XXXXXXXXXXXXXXXXXXXXXXXXXXXXXC XKXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX MAPEND GOTO MARK READ10 EOF99 MARK PROCEND KKK KK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK ck ck kk PROCEDURE FOR ERROR HANDLING ERRO8 PROC MAP LASTMAP YES RC 08 DATA CESF LOGOFF MAPEND PROCEND ck ck ckckckckckck Ckckckckckckckckckckckckckckckckckckckckckckckckckckck ck PROCEDURE CHECK CHECK PROC MOVE TO WORK2 FROM SPACES SCAN DATA LINE INSERTED COL 05 LIN 24 FOUND CHECK05 MOVE TO WORK2 DATA ERROR CHECK05 MARK PROCEND CkCkckckckckckckckckckckckck ck ck ko END OF DIALOG EPILOG END Figure 64 Example PERFORM and PROC masc ato Automated Transaction Operator User s Guide Compa
47. NECT_PS CALL ATO CALL RETTEST MAIN TERMINATION THIS FUNCTION MUST BE EXECUTED LAST IN ALL CASES ATO FUNC ATO TERMINATE CALL ATO CALL RETTEST RETURN AID SEND AID ARG ATO BUFF ATO FUNC ATO SEND AID CALL ATO CALL RETTEST RETURN DISPSCR 118 Appendix A Example Dialogs masc ato Automated Transaction Operator User s Guide SUBROUTINE TO DISPLAY THE CURRENT SCREEN CONTENTS SAY SCREEN DISPLAY ATO FUNC ATO COPY PS TO STRING ATO BUFF COPIES 4000 ATO POSITION D2C 1 4 CALL ATO CALL RETTEST POS 1 DO WHILE POS gt LENGTH ATO BUFF SAY SUBSTR ATO BUFF POS 80 POS POS 80 END SAY END OF SCREEN RETURN A Figure 81 ATO Dialog Beispiel 1 Note This example of a masc ato dialog signs on to DBDCCICS succedded by a CESF LOGOFF If the sign on is no successful a return code of 8 is set The examples also shows how subroutines help to take frequently used code sequences out of the main program to make the program easier to read The values DATA ATOUSRI and DATA ATO could also be filled with DATA VARI or DATA VAR2 respectively using the ATO User Exit ATOEXI For further details please look at the corresponding appendix and the chapter ATO EXI This dialog can be found on the SAMPLB with the name RXAPPAT 8 1 2 Compatibility Mode PROLOG DIALOG SAMPLE1 0
48. NSACTION ATO_FUNC ATO_SEND_KEY ATO_BUFF CEMT I TA CALL ATO CALL AID ENTER CALL DISPSCR CALL PF3 CALL SIGNOFF SAY NORMAL TERMINATION OF DIALOG MAX RC MAX RC EXIT MAX RC Figure 83 ATO Dialog Example 2 from REXX This example can be found on the SAMPLIB with the name RXAPPA2 8 2 2 Compatiblity Mode PROLOG DIALOG SAMPLE2 NETNAME NETATO1 APPLID DBDCCICS kckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckck ck ABFRAGE DER TASKS G Ckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckckck LOGON ARK AP KEY CLEAR APEND AP DATA CEMT INQ TAS APEND AP KEY PF3 APEND KK KKK KKK KKK KKK KKK KKK ck ck ckckckckckckckckckckckckckckckckckckckckckck LOGOFF ARK EPILOG END Figure 84 ATO Dialog Example 2 masc ato Automated Transaction Operator User s Guide Appendix A Example Dialogs 121 8 3 Common CICS commands 8 3 1 Call from REXX KR KK KK Kk a RK ck ck ck ck ck kck kk ck ck ck ck ck kckckckckckckck kk ck ck ck ck ckckckckck ke ke kx f SAMPLE 3 EXECUTE TRANSACTION READ FROM SYSTSIN EJ gt ARG ARG1 ARG2 CA INITIALIZE CA PROLOG CA LOGON
49. O WORK1 MOVE DATA AAA TO WORK1 Figure 28 Example 1 WORK Areas OVE FROM WORK1 TO S1 SCAN DATA BBB TO WORK2 PUTPRT FROM WORK1 GETRDR EOF EOF1 TO WORK2 OVE FROM WORK2 COL 2 TO F1 AP FILL DATA XXXX APEND SCAN DATA A FROM WORK1 TO WORK1 FOUND M1 ARK Figure 29 Example 2 WORK Areas masc ato Automated Transaction Operator User s Guide Compatibility Mode 41 6 3 ABORT Syntax Command Parameter ABORT RC retcode retcode Valid values 04 08 16 A return code that is set at the termination of a dialog This return code may be referenced in the JCL This way a possible dependency of any subsequent processing can be controlled Default 08 Description ABORT immediately terminates the dialog Any commands following this statement will not be processed ABORT is used to prevent any further processing after an error How to use this statement is shown in example in figure 7 Example FATAL MARK PUTPRT DATA FATAL ERROR ABORT RC 16 Figure 30 Example ABORT Note No logoff from CICS is initiated with ABORT This command has the same effect as switching off the logical video display An alternative and better method is provided in the dialog sequence in figure 32 MARK PUTPRT DATA FATAL ERROR MAP KEY CLEAR MAPEND MAP LASTMAP YES RC 16 FILL DATA CSSF LOGOFF MAPEND Figure 31 ABORT Alternative Conventions for Return Codes 00 Processing success
50. PEND OVE AP FILL APEND SCA OVE OVE AP FIL HLLCALL DATA DATAENTRY TO WORK2 FROM WORK2 DATA FOUND L9 TO TRANS FROM WORK2 DATA XXXX TO NUMBER FROM WORK2 COL 05 LIN 02 COL 202 DATA XXXXXX DATA WRONG FOUND L3 TO TEXT FROM WORK2 COL 11 TO AMOUNT FROM WORK2 COL 21 LIN 10 COL 205 DATA XXXXXXXXXX LIN 11 COL 208 DATA BY ATOHLL LIN 12 COL 05 DATA 0000000000 DATA MUTIERT NFOUND L2 TO WORK2 DATA OK MARK L1 TO WORK2 DATA ERROR DATA MARK L1 TO WORK2 DATA ERROR KEY MARK L1 LASTMAP YES DATA CESF LOGOFF Figure 43 Example 3 HLLCALL masc ato Automated Transaction Operator User s Guide Compatibility Mode 55 6 11 ATOHLL Interface Description The ATOHLL interface serves to call a ATO dialog from a batch program and to communicate by means of HLLCALL The following diagram shows the principles of the ATOHLL interface and the process and communication with the ATO dialog The IF sentences used in this example can also be replaced with corresponding SELECT statements User Batch Program ATO Dialog HLL Interface COPY CBLHLL G MOVE DIALOG CEBL1 TO HLLTO P PROLOG DIALOG CBL1 bos Rl 2 81 MARK CALL ATOHLL USING HLL HLLCALL 3 IF HLLRC IF HLLRESP LAST THEN GO TO END DLG IF HLLDATA GOTO MARK R1 a MOVE TO HLLTO cH MAP LASTMAP YES GO TO RI MAPEND END DLC 1
51. R is used to read input card values If the default for a field is not used a TO field has to be referenced MVS With the JCL definition ATORDR DD DSN datasetname member DISP SHR you may also read in PDS members ATORDR has a DCB definition of DCB LRECL 80 RECFM FB 50 Compatibility Mode masc ato Automated Transaction Operator User s Guide Examples GETRDR TO VARI EOF EOF1 MAP FILL COL 02 LIN 02 DATA VARIABLE1 MAPEND MARK PUTPRT DATA END OF DATA GOTO MARK END1 GETRDR JCL data MANDANT1 Figure 38 Example 1 GETRDR AP FILL DATA FIBU APEND L20 ARK GETRDR TO WORK2 EOF END1 OVE FROM WORK2 COL 1 TO TEXT OVE FROM WORK2 COL 13 TO AMNT OVE FROM WORK2 COL 21 TO ITEM B20 AP TEXT FILL LIN 10 COL 14 DATA XXXXXXXXXXXX AMNT FILL LIN 11 COL 20 DATA XXXXX XX ITEM FILL LIN 12 COL 10 DATA XX APEND GOTO MARK L20 END1 ARK GETRDR JCL data wies eres 0 00010 0502 07012 7003 Figure 39 Example 2 GETRDR masc ato Automated Transaction Operator User s Guide Compatibility Mode 51 0 9 COTO Syntax Command Parameter GOTO MARK mark mark Valid values max 7 characters This parameter defines a branch mark that is to be declared with the command MARK or a label of a MAP definition Description This command is used to branch to a defined abel MARK or label MAP Example GOTO MARK END1 MARK GOTO MARK MAP10 MAP1
52. TA XXXXXX MAPEND Figure 55 Example 2 MAPFLD masc ato Automated Transaction Operator User s Guide Compatibility Mode 71 6 20 MAPFILL Syntax dE Befehl MAPFILL DATA data LIN line COL column SESSID sessid data line column sessid Description Valid Values Up to 1 line of alpanumerical characters 80 or 132 data can contain a constant value or any alphanumeric characters The number of characters determines the length of the line Default None Valid Values 01 43 This parameter defines the line where to put the entry Default 01 Valid values 01 132 This parameter defines the line where to put the entry Default 01 G ltige Werte 1 character This parameter specifies the session where to direct the data entry Default Currently active session The command MAPFILL makes a data entry on a formatted screen 72 Compatibility Mode masc ato Automated Transaction Operator User s Guide Example CLEAR1 MAP KEY CLEAR APEND TRAL MAP TIMEOUT 300 DATA TRA1 APEND PFKEY MAP LIN 07 COL 80 KEY PF14 APEND ENDE MAP KEY PF3 APEND MAP KEY CLEAR APEND LASTMAP YES RC 04 DATA CESF LOGOFF D Figure 56 Example MAP masc ato Automated Transaction Operator User s Guide Compatibility Mode 73 6 21 MAPKEYS Syntax Befehl abel MAPKEYS DATA data label data Description Valid values Maximum of 7 characters label may be
53. TOs The default values of LIN ENDLIN and COL ENDCOL change according to the values entered masc ato Automated Transaction Operator User s Guide Upgrade Overview III TABLE OF CONTENTS Preface M Q I UI pe rad 6 road P IH 1 Notation ConventlOns eins ve nieto co eoe een trn e eue S e Ne ae see ee een EE YE rani secet s ut Pre ER EYE ERE 1 2 General Notation Rul 3 2L Genera Rules vcr Er 3 2 2 Compatibility Modes me m tet EP Hebe bertus 3 3 2 1 1 1 12 2 2 1212 2 2 2 2 2 2 2 2 2 212 12 2 2 2 2 5 31 masc sato 5 32 Reserved 1 teet Parr cogit cre recessed ne DE 5 35 3 Keys and cursor COmtrol cesi et ee en UID gutesldvsess 6 3 4 Progratndogiec e dae odere tede I ata 7 5 55 sample fnasc ato dialog repete eee detects 8 4 Command Overview 1 2 2 2 2 2 lt 2 2 2 2 2 2 reSss 11 4 1 Dialog and Session Control ente e En eet ee o bene 11 4 2 Control of Virtual 5 626 I e eee nne n nennen nennen 12 0 Call front RA 4 onde titer tete etre P pe e riore et ee e rie een 12 42 2 Compatibility Mode 13 4 3 Additional Commands rdiet ite acer itte ER EMILE REL AERE NE en 14 14 473 2 Comaptbility 0 15 S5 COmmiatd C RE 202 2 2 2 2 2 2 2 2
54. With this the preset values in ATOEXI are set dependent on dialog names APPLID user ID etc The dependency and transfer in user exit ATOEXI is determined by a table named TAB The transfer of variables may be used as entries for user ID password accounting information company etc Figure 58 shows part of the table TAB of ATOEXI for this purpose This exit is supplied with the masc ato software as an example It may be tailored according to your requirements on your configuration and generated newly For the call from REXX as well as for the compatibility mode the same module of ATOEXI is used i e it has to be generated only once 10 3 User Code in the Exit The User Exit AOTEXI may also be used to insert your own code The place in the program for your user code is marked with the comment INSERT YOUR CODE HERE and END USER CODE respectively 128 APPENDIX C User Exit ATOEXI masc ato Automated Transaction Operator User s Guide 10 4 Using the User Exit The following example explains the usage and functionality of the user exit ATOEXI PROLOG DIALOG ATODLG1 NETNAME NETATO1 APPLID CICSP1 MAP DATA CESN MAPEND MAP FILL LIN 04 COL 14 DATA 4VARlf USERID FILL LIN 06 COL 16 DATA 4VAR2f PSW MAPEND Figure 89 User Exit Usage With the definition of the user variables VARI1 and VAR2 in the DATA parameter of the FILL commands ATOEXI is called implicitly At execution time
55. alues 1 character sessid shows for which session the SESSBEG is valid Default Currently active session Description The SESSEND command defines theendt of an singleATO session Before the EPILOG command all ATO sessions have to be terminated using SESSEND Examples SESSEND SESSID A Figure 73 Example SESSEND 104 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 36 SESSSET SESSMOD Syntax Command Parameter name netname applid SESSSET DIALOG name SESSMOD NETNAME netname APPLIDzapplid APPLTRYzappitry LINEOV lineov LOGTERM ogterm LOGTIME ogtime LOGTRY logtry LOOP o0p MDTAUTO mdtauto TIMEOUT timeout SUPPORT support LOGMODE logmode LOGTMOD logtmod Valid values Max 8 alphanumerical characters This parameter indicates the name of the dialog to be executed Default Value from PROLOG or previous SESSET command Valid values Max 8 character terminal name according to network naming conventions CICS This parameter identifies a valid network name according to CICS TCT or CICS CSD TERMINAL definitions respectively Default Value from PROLOG or previous SESSET command Valid values APPLID name according to network conventions APPLID for a masc ato session CICS This parameter identifies the application name as defined in the SIT of the corresponding CICS This name is also displayed at the bottom right hand edge of the screen with the tran
56. an not only send normal keys to the screen but also tabulator and cursor control keys This allows to write dialogs in a user friendly way To recognize these special keys the is used This Escape Character shows that the next character has a special meaning The following entries are possible Ch Home Set cursor to the first entry field of the screen Qn Newline Set cursor to the first entry field of the next line on the screen Qt Tabulator Set cursor to the next entry field Gr Cursor right Set cursor one character to the right Cursor left Set cursor one character to the left Qu Cursor up Set cursor one line up Cd Cursor down Set cursor one line down These special characters are behaving like the corresponding keys Some keys may only skip to entry fields while other ones leave the cursor on protected areas The cursor is also moved like with manual entries If for example an eight character field is filled with an eight character value the cursor automatically skips to the next entry field The PF PA and Clear keys are sent with the ATO SEND AID command after filling the screen with any contents and setting the cursor to a certain place 6 Structure masc ato Automated Transaction Operator User s Guide 3 4 Program logic masc ato provides the interface to your on line applications The actual program logic is programmed in a programming language that is better suited for that purpose and also provides the necessar
57. arameter or the contents of the field defined with FROM to ATOPRT This simplifies the checking of the output e g for the staff of the DP Center Only one of the two parameters may be defined If no parameter is supplied the default is PUTPRT FROMZWORKI masc ato Automated Transaction Operator User s Guide Compatibility Mode 95 Note VSE PUTPRT writes to SYS001 and may be set with e g ASSGN SYS001 01E to 01E The virtual printer has to be referenced with POWER statements MVS PUTPRT writes to ATOPRT DD SYSOUT ATOPRT has a DCB definition of DCB LRECL 121 BLKSIZE 121 RECFM FBA Example PUTPRT TITLE 1 DATA H EADING ONE PUTPRT TITLE 2 DATA PUTPRT TITLE 3 DATA PUTPRT DATA LOGON SUCCESSFUL MSG01 DCL DATA FOLDERS NOT FOUND PUTPRT FROM MSGO1 Figure 67 Example PUTPRT 96 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 31 PUTWTO Syntax Command Parameter PUTWTO DATA data FROM field data Valid values Max 64 alphanumerical characters See command PUTLOG on page 93 Default none field Valid values WORK1 9 or predefined field eg with DCL MAP FILL SCAN B MAPFLD etc The contents of field are displayed on the console Default WORKI Description PUTWTO writes the text supplied with the DATA parameter or the contents of the field defined with FROM to the console Only one of the two parameters can be defined If no paramet
58. asc ato Automated Transaction Operator User s Guide Commands 29 5 14 ATO SEND AID Syntax ATO SEND AID key Valid values ENTER CLEAR PAI PA3 211 PF24 This parameter defines the function key or the enter key respectively Default ENTER Description ATO SEND AID serves to send a function key to the virtual screen Often this function follows an ATO SEND KEY The following figure shows easy functions with ATO SEND AID commands that help to keep the main dialog easily readable Example CALL CLEAR ATO FUNC ATO SEND KEY ATO BUFF CEMT CALL ATO CALL ENTER CLEAR ATO FUNC ATO BUFF CALL ATO RETURN ATO SEND AID ENTER ENTER ATO FUNC ATO BUFF CALL ATO RETURN ATO SEND AID ENTER Figure 22 ExampleATO SEND AID 30 Commands masc ato Automated Transaction Operator User s Guide 5 15 ATO SEND KEY Syntax ATO SEND KEY key Valid values Any succession of keystrokes Description ATO SEND KEY sends any keystrokes to the virtual screen The embedding of special keys using the escape character is described earlier in the manual If the entry starts with text the input is made at the current cursor position The following figure shows an example of the ATO SEND KEY command H places the cursor on the first entry field where the string userid is entered Then after N newline i e on the first input field of the following line password is entered It is als
59. ault Like in ATO SET SESSION PARAMETERS Description The ATO CONNECT PS command defines the begin of a session BEFORE ATO SET SESSION PARAMETERS sets all parameters for the session Example ATO FUNC ATO CONNECT PS CALL ATO IF C2D ATO RC gt 0 THEN DO SAY SESSION COULD NOT BE ESTABLISHED RC C2D ATO RC EXIT 16 END Figure 9 Example ATO CONNECT PS masc ato Automated Transaction Operator User s Guide Commands 17 5 2 ATO COPY PS Syntax ATO FUNC ATO COPY PS ATO BUFF area area Valid values Any area area defines where to copy the virtual screen Description This function copies a virtual screen In order to copy only parts of a virtual screen ATO COPY PS TO STRING should be used instead Example ATO COPY PS COPIES 4000 Figure 10 Example ATO COPY PS 18 Commands masc ato Automated Transaction Operator User s Guide 5 3 ATO COPY PS TO STRING Syntax ATO FUNC ATO COPY PS TO STRING ATO BUFF Description This command copies the virtual screen content into a buffer where it can be used for further processing The length of the buffer should be big enough to hold the entire screen In order to avoid unpredictable results the buffer should be initialized before calling the function A use of the ATO COPY PS TO STRING command is shown in figure 11 The example copies the virtual screen and afterwards displays it line by line This routine can be used to show a hardco
60. ch program with a length of 80 bytes The following figures demonstrate the coding of the HLL interface area for the programming languages ASSEMBLER COBOL and PL I however this structure can similarly adapted with other programming languages Assembler structure for HLL Interface Area ee 0 ee HLL FOR ASSEMBLER CkCkckckckckckckckckckckckckckckckckck ck L 0CL256 HLLLENG F 256 HLLID CL8 ATOHLL HLLREQ CL4 INIT HLLRESP CHATT HLLRC CL8 HLLTO CL80 HLLDATA CL80 CL64 Figure 44 HLL Interface Area Assembler Structure masc ato Automated Transaction Operator User s Guide Compatibility Mode 57 COBOL Structure for HLL Interface Area CkCkckckckckckckckckckckckckckckckckckckckckckckckckckckck ck ck HLL FOR COBOL CkCkckckckckckckckckckckckckckckckck ck 01 HL HL HL HL HL EI HL HL FI LLENG LID LREQU LRESP LRC LLER LTO LDATA LLER PIC PIC PIC PIC PIC EIC PIC PIC PIC S9 5 X 8 X 4 X 4 S9 5 X 8 X 80 X 80 X 64 COMP COMP VA VA VA VA LUE LUE LUE LUE LUE LUE LUE LUE LUE 256 ATOHLL SPACES SPACES T8 SPACES SPACES SPACES SPACES Figure 45 HLL Interface Area COBOL Structure PL I Structure for HLL Interface Area ck ck ke ke ke ke
61. characters The defined value of data 1s searched for in the received screen content from Valid values SCREEN WORKI 9 or predefined field from defines an area in which the string is searched for in the DATA parameter Default SCREEN display screen to Valid values SCREEN WORKI 9 or predefined field to defines an area into which the next 80 characters from the found string in the DATA parameter are set or data that lie within the position defined by ENDLIN and ENDCOL With WORKI1 9 80 characters are moved Default WORKI lin Valid values 01 43 lin defines the line position by a SCANB on the SCREEN masc ato Automated Transaction Operator User s Guide Compatibility Mode 101 col endlin endcol toffset mark Description Default 01 Valid values 01 2 col defines the column position from which the SCANB will begin SCREEN or on WORKI 9 Default 01 Valid values 01 43 With endlin an endposition of a line may be defined for SCANB on SCREEN The string in the DATA parameter has to be within the lines which are defined with LIN and ENDLIN with specification of ENDLIN If this does not apply the NFOUND condition is set The value endlin must be greater or equal to the value in LIN Default 01 Valid values 01 143 With endcol an endposition of a column or WORKI 9 can be defined for SCANB on SCREEN The string in the DATA parameter has to lie within a column that li
62. de 89 logtry logaid loop mlog mdtauto timeout Valid values 1 6000 logtry defines the number of attempts to establish a connection with the LOGTERM terminal When using LOGTRY 1 the LOGTERM terminal is only used if available or if defined in VTAM Otherwise the processing is continued without LOGTERM Default 6000 Valid values YES or NO If this parameter is set to YES the key pressed is shown in the lower right corner when following a session with LOGTERM This helps to debug a session using LOGTERM If LOGTERM is not active the value of LOGAID is ignored Default NO Valid values 1 100000 This parameter serves as a LOOP control When exceeding this value the dialog is terminated Default 9000 Valid values YES NO If this parameter is set to YES all macros and labels passed during the dialog are written to ATOPRT This helps in the case of errors to see the exact flow of the dialog Default NO Valid values YES NO When using MDTAUTO YES FlILL commands are generated automatically for MDT display fields eg CICS BMS FSET fields Fields which remain invisible to the user on the screen Dark and only serve for conversational prompting may also be transmitted herewith When defining MDTAUTOZNO only the fields that have been inserted or changed with FILL or MAPFLD will be transmitted This parameter sets the default for MAP MDTAUTO see parameter MDTAUTO in the command MAP on page 65
63. dels model 2 3 4 or 5 are now supported Default D4A32782 Valid values LOGMODE name according to VTAM definitions masc ato Automated Transaction Operator User s Guide Compatibility Mode 91 This parameter defines the logmode for the LOGTERM Usually this should be the same logmode as specified in the logmode parameter All screen models model 2 3 4 or 5 are now supported Default D4A32782 Description The PROLOG command defines the start of a ATO dialog and is therefore the mandatory first masc ato instruction to be processed By means of corresponding parameters a TP monitor and a logical terminal is selected for processing the dialog Furthermore with the respective parameters a detailed LOG or a LOG terminal running parallel to the dialog may be specified which is used likewise for diagnostics in the support center of the licensor The communication between the PROLOG and the applications or VTAM definitions is described in the nstallation Manual Note The session startet with PROLOG contains implicitely a SESSSET and SESSBEG for session A The session started with PROLOG does not have to end with SESSEND In addition to the setting of a response time the PROLOG TIMEOUT parameter also determines the intervals for masc ato console messages in seconds If a longer response time is expected for a MAP input as defined in the PROLOG TIMEOUT parameter the MAP resp PENDING TIMEOUT parameter has to be set accordi
64. dex 133 U UEXIT Command Overview 14 16 Description 112 Example 112 Syntax 112 Upgrade overview III User Exit see ATOEXI Using the User Exit see ATOEXI 134 Index masc ato Automated Transaction Operator User s Guide
65. ds See examples in figure 13 and 14 Note CICS Transactions like CESN check the input length When entering transaction codes on a blank screen it is advantageous to use the command MAP DATA tran This corresponds to an entry in line mode If the screen is cleared using MAP KEY CLEAR MAP DATA data has to be used afterwards Display screens with LIN COL indicators on the bottom may be helpful in determining the values for the LIN and COL parameters Example MAP FILL COL 5 LIN 10 DATA INPUT MAPEND Figure 36 Example 1 FILL GETRDR EOF EOF1 TO LINE1 MAP FILL DATA XXXXXXXXXXXXXXXXXXXXXXXXXXXXC XXXXXXXXXXXXXXXXXXXXXXXXXX MAPEND Figure 37 Example 2 FILL masc ato Automated Transaction Operator User s Guide Compatibility Mode 49 6 8 GETRDR Syntax o Command Parameter GETRDR EOF mark TO field mark Valid values max 7 characters This parameter defines a branch mark that will be branched to in case of an EOF condition End of data mark has to be defined with the command MARK in order to process an EOF condition This parameter is mandatory field Valid values 7 characters maximum defined field label or WORK1 9 This field is used to receive values with the command GETRDR A maximum of 80 characters can be read with each GETRDR VSE The values are read in via SYSRDR MVS The values are read in via the ATORDR DD statement Default WORKI Description GETRD
66. eg closing of files rewind of VSE tapes or to return to CBLTDLI under DL 1 A corresponding return code is also set if the called ATO dialog is terminated with the command ABORT Please note that a ATO dialog should always be ended if possible with the sequence MAP LASTMAP YES Within a batch program masc ato can only be initiated once JCL Definitions For the input output commands GETRDR PUTLOG and PUTPRT ATO requires different allocations Under MVS the following DD statements are used ATORDR DD ATOPRT DD ATOLOG DD SYSUDUMP DD Diagnostic help Note that masc ato does not use DD allocations with SYS This allows components that are applied within a user program to allocate inputs or outputs to SYSPRINT SYSIN SYSOUT etc eg SORT programs 62 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 15 LOGTIME Syntax o Command Parameter LOGTIME SEC sec Sec Valid Values 0 60 When using PROLOG LOGTERM this parameter defines the delay time in seconds between to ATO commands being executed Default 3 Description Using the PROLOG LOGTERM function this command serves to define the delay time between the ATO commands LOGTIME can be coded at any arbitrary position in the ATO dialog This is used if the value of the LOGTIME parameter in the PROLOG command has to be reset With this command you achieve greater efficiency when checking a ATO dialog by means
67. emerkung CICS Some transactions like CESN check the lenth of the input Entering transaction codes on an empty screen it is recommendable to use MAP DATA ran This is like an entry in line mode Example MAP MAPKEYS DATE USERID NPASSWORD MAPEND Figure 57 Beispiel MAPKEYS The example above places the string USERID to the actual cursor position then the N causes a newline in order to enter PASSWORD on the first input field of a new line masc ato Automated Transaction Operator User s Guide Compatibility Mode 75 6 22 MARK Syntax EEEEEN Command Parameter label Valid values 7 characters maximum label defines a branch mark and is a mandatory entry Default None Description MARK is used to define a branch mark which may be referenced in the commands GETRDR GOTO SCAN SCANB and PENDING ATO internally maintains a loop counter for MARK The obvious reason is to prevent an endless loop This loop counter can be set to a maximum value in the PROLOG command using the LOOP parameter Example GETRDR EOF EOF1 SCAN DATA MAIN MENU NFOUND F1 GOTO MARK END MARK MARK MARK Figure 58 Example MARK 76 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 23 MOVE Syntax Command Parameter MOVE DATA data FROM fromfield COL column LIN line TO tofield TOCOL tocolumn TOLEN tolength data fromfield column line Valid val
68. er is supplied the default is PUTWTO FROMZWORKI Note MVS The message sent to the console has a Routecode 11 and Descriptor Code 7 Example DCL DATA ATO DIALOG ENDED PUTWTO DATA SIGN ON ERROR PUTWTO FROM MSGO1 ABORT RC 08 Figure 68 Example PUTWTO masc ato Automated Transaction Operator User s Guide Compatibility Mode 97 0 32 SCAN Syntax o Command Parameter label SCAN DATA data FROM from TO to LIN line COL col ENDLIN endlin ENDCOL endcol TOFFSET toffset FOUND mark NFOUND mark label Valid values Max 7 alphanumeric characters label may be referenced by a command with a TO FROM parameter e g MOVE data Valid values Max 132 characters The defined value of data 1s searched for in the received screen content from Valid values SCREEN WORKI 9 or predefined field from defines an area in which the string is searched for in the DATA parameter Default SCREEN display screen to Valid values SCREEN WORKI 9 or predefined field to defines an area into which the next 80 characters from the found string in the DATA parameter are set or data that lie within the position defined by ENDLIN and ENDCOL With WORKI1 9 80 characters are moved Default WORKI lin Valid values 01 43 lin defines the line position by a SCAN on the SCREEN 98 Compatibility Mode masc ato Automated Transaction Operator User s Guide col endlin endcol toffset ma
69. es between COL and ENDCOL when specifying ENDCOL If this does not apply the NFOUND condition is set The value endcol must be greater or equal to the value in COL Default 01 Valid values 01 132 toffset defines the position where to place a field Default 01 Valid values Max 7 characters branch mark MARK MAP mark defines a branch mark that is branched to after FOUND or NFOUND condition of the defined value in the data SCANB searches backwards the received content of a display screen SCREEN or a predefined field WORK1 9 DCL field for a specific value defined by DATA data see also description for command SCAN on page 97 For examples refer to SCAN command on page 104 SAP SCANB may be used for SBDC transactions to position the last folder on a page 102 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 34 SESSBEG Syntax Command Parameter SESSBEG SESSID sessid sessid Valid values 1 character sessid shows for which session the SESSBEG is valid Default A Description The SESSBEG command defines the start of an ATO session Previously the session parameters have to be set using SESSSET Examples SESSSET SESSID A APPLID DBDCCICS SESSBEG Figure 72 Example SESSBEG masc ato Automated Transaction Operator User s Guide Compatibility Mode 103 6 35 SESSEND Syntax Command Parameter SESSEND SESSID sessid sessid Valid v
70. ful 08 Error 04 Warning 16 Serious error 42 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 4 COPY Syntax Command Parameter COPY name VSE name Valid values Valid bookname according to VSE conventions The copy book must be available in one of the LIBDEF SEARCH libraries MVS name Valid values Valid member name according to MVS conventions The member must be in one of the datasets of the SYSLIB concatenation Default None Description COPY includes predefined dialog sequences into the program execution It functionally corresponds to the COPY as usually found in programming languages Refer to page 74 for the possible use of FILL DATA gt VAR for logon sequences An example of the COPY command is given in figure 9 Example PROLOG COPY ATOSAP EPILOG END Figure 32 Example COPY masc ato Automated Transaction Operator User s Guide Compatibility Mode 43 6 5 DCL Syntax Command Parameter field Valid Values Fieldname of maximal 7 alphanumeric characters field indicates the name of a field which is defined for further processing This name is a mandatory specification Default none data Valid Values 80 alphanumeric characters maximum data may contain a constant value or arbitrary alphanumeric characters The number of characters defines the length of the field The DATA parameter is a mandatory specification Default no
71. g has not been coded to handle such restart situations SAP With long running transactions e g the reproduction of folders via SBDC the Finished message will be initiated by a CICS START Transaction It can take several hours for this message to appear and for this reason the collision has to be initiated by the ATO dialog With this in mind go through the examples in figure 36 and 37 on page 82 masc ato Automated Transaction Operator User s Guide Compatibility Mode 81 Note PENDING is used chiefly to capture the messages and transactions of TP monitors outside the dialog cycles Pending transactions can be started by CICS applications e g EXEC CICS START TRANSID or by means of the CMSG transaction As these suspended transactions are always connected to a specific masc ato terminal it would be an advantage to use a reserved masc ato terminal for each masc ato application in order to prevent conflicts with previously aborted dialogs For SAP applications it is recommended to additionally use a reserved SAP user per masc ato terminal Example MARK MAP Collision MAPEND SCAN DATA FINISHED FOUND END1 PENDING FOUND END1 SLEEP GOTO MARK REDO1 END1 MARK Figure 61 Example 1 PENDING CICS SAP MAP DATA TRA1 MAPEND SCAN DATA MESSAGE OF TRA1 PENDING NFOUND NTRA2 SCAN DATA MESSAGE OF TRA2 NTRA2 ARK ARK AP KEY PF3 APEND PENDING AP KEY CLEAR APEND AP LASTMAP YES DATA CESF LOGOFF AP
72. h USSTAB message 10 Default Value from PROLOG or previous SESSET command Valid values 0 60 logtime defines a time delay in seconds when using LOGTERM During this time masc ato waits with displaying the next screen With the command LOGTIME the time value in the dialog may be reset and redefined see command LOGTIME on page 63 106 Compatibility Mode masc ato Automated Transaction Operator User s Guide logtry loop mdtauto timeout sessid Default Value from PROLOG or previous SESSET command Valid values 1 6000 logtry defines the number of attempts to establish a connection with the LOGTERM terminal When using LOGTRY 1 the LOGTERM terminal is only used if available or if defined in VTAM Otherwise the processing is continued without LOGTERM Default Value from PROLOG or previous SESSET command Valid values 1 100000 This parameter serves as a LOOP control When exceeding this value the dialog is terminated Default Value from PROLOG or previous SESSET command Valid values YES NO When using MDTAUTO YES FlILL commands are generated automatically for MDT display fields eg CICS BMS FSET fields Fields which remain invisible to the user on the screen Dark and only serve for conversational prompting may also be transmitted herewith When defining MDTAUTOZNO only the fields that have been inserted or changed with FILL or MAPFLD will be transmitted This parameter sets the default for MAP
73. he assembler conventions see chapter General Notation Rules on page VIID the corresponding error reports and messages will be displayed by the assembler program Basically there are two methods to execute a ATO dialog 0 Calling a dialog in the Link and Run mode 0 Calling a dialog in Go mode Generally the first method is preferred and recommended A comparison of the advantages and disadvantages of each method is discussed later in the chapter 7 1 VSE Assembly with Link and Run The VSE JCL displayed in figure 49 executes a ATO dialog whereby the masc ato commands are first assembled linked as a load module and then executed JOB JNM ATORUN LST CLASS L LST CLASS L LST 01E JOB ATORUN OPTION LOG PARTDUMP LIBDEF SEARCH userlib ATO410 CATALOG userlib ATO410 OPTION CATAL NOXREF ACTION CLEAR PHASE DIALOGI EXEC ASSEMBLY PROLOG DIALOG DIALOG1 EPILOG END EXEC LNKEDT ASSIGN SYS001 01E ATORUN EXEC ATO PARM DIALOG DIALOG1 040 SALES CODE INPUT FOR GETRDR 02401 ITEM NUMBER amp EOJ Figure 77 VSE Assembly with Link and Go masc ato Automated Transaction Operator User s Guide Execution of ATO dialogs 113 7 2 MVS Assembly with Link and Run The MVS JCL displayed in figure 50 executes a ATO dialog whereby the masc ato commands are first assembled linked as a temporary load module and then executed ATORUN JOB ACCNT ATORUN CLASS A MSGCLASS X
74. ic session New in masc ato 4 1 0 ATO DISCONNECT PS SESSEND End of a specific session New in masc ato 4 1 0 ATO QUERY SESSION STATUS Query status of a session ATO SET SESSION PARAMETERS SESSSET Set session defaults New in masc ato 4 1 0 Figure 4 Dialog and Session Control masc ato Automated Transaction Operator User s Guide Command Overview 11 4 2 Control of Virtual Screens 4 2 1 Call from REXX ATO QUERY CURSOR ATO SEND KEY ATO SET CURSOR ATO SEND AID ATO COPY PS ATO COPY PS TO STRING ATO COPY STRING TO PS Figure 5 Dialog and Session Control 12 Command Overview Query Cursor Position Send keys to virtual screen Set Cursor Position Send Enter PF or PA key to virtual screen Copy contents of virtual screen Copy contents of virtual screen to buffer Copy buffer to virtual screen masc ato Automated Transaction Operator User s Guide 4 2 2 Compatibility Mode Begin of screen input MAPEND End of screen input FILL Filling a screen display input field MAPKEYS Filing a screen display input field using keys and cursor control New in masc ato 4 1 0 MAPFLD Filling a screen input subfield Figure 6 ATO Command Overview masc ato Automated Transaction Operator User s Guide Command Overview 13 4 3 Additional Commands 4 3 1 Call from REXX ATO PUTLOG ATO PUTWTO ATO PENDING ATO PAUSE ATO SLEEP ATO EXI Figure 7 Additional Commands from REXX 14 Command Over
75. iption 47 Example 47 Syntax 47 Example CICS CEMT ITAS 121 CICS CEMT I TAS Compatiblity Mode 121 CICS CEMT I TAS from REXX 121 CICS Signon and Signoff 117 CICS Signon and Compatibility Mode 119 CICS Signon and Signoff from REXX 117 Common CICS commands 122 Common CICS commands Compatiblity Mode 122 Common CICS commands from REXX 122 Signoff F FILL Command Overview 13 Description 49 Example 49 Syntax 48 G General Notation Rules 3 GETRDR 132 Index Command Overview 15 Description 50 Examples 51 Syntax 50 GOTO Command Overview 15 Description 52 Example 52 Syntax 52 H HLL Interface 53 Calling and parameter transfer 61 Calling Technique 59 Data Area 57 Instructions 61 Load Module 61 Object Module 61 Phase 61 HLLCALL Command Overview 15 Description 53 Examples 54 5 Note 54 Syntax 53 HLLDATA 57 HLLLENG 57 HLLRC 57 HLLREQU 57 HLLRESP 57 HLLTO 57 I Internal Work Areas Examples 41 Internal Work Areas 41 J JCL MVS 114 VSE 113 L Load Module see HLL Interface LOGTIME Command Overview 15 Description 63 Example 63 Syntax 63 LOOP Command Overview 15 Description 64 Example 64 Syntax 64 M MAP Command Overview 13 Description 68 Examples 68 Syntax 65 MAPEND masc ato Automated Transaction Operator User s Guide Command Overview 13 Description 69 Example 69 Syntax 69 MAPFILL Description 72 Example 73 Syntax 72 MAPFLD Command Overview 13 Description 70 Examples 71 Sy
76. l sessions are active in parallel sessid is valid for all following MAP commands that do not specify this parameter Default currently active session Valid values 80 alphanumeric characters maximum data may contain a constant value or arbitrary alphanumeric characters The number of characters define the field length If a label is allocated to the MAP command it is possible to reference this field with TO parameters Default none Valid values Maximum of 7 characters label may be used as a branch address for the GETRDR GOTO or SCAN commands or as a TO address for filling the data of the DATA parameter Default none Valid values 01 43 This parameter defines the row where the cursor on the input screen will be positioned with data entry or with the pressing of a PF key Default 01 masc ato Automated Transaction Operator User s Guide Compatibility Mode 65 column retcode lastmap mdtauto timeout Valid values 01 2 This parameter defines the column where the cursor will be positioned on the input screen when pressing the enter or PF key Default 01 Valid values 00 04 08 16 A job control return code can be set with this parameter Also see Conventions for Return Codes on page 23 Default 00 Valid values NO YES PASS The statement LASTMAP YES informs masc ato that it relates to the last MAP instruction to be processed PASS is used to change from a session with an APPLID to ano
77. masc ato Automated Transaction Operator User s Guide sse VSE MVS Version 4 1 0 MATO UG410 1 E Distributor masc ag Dept SWD Birkenstr 49 CH 6343 Rotkreuz Switzerland Telephone 041 790 53 44 International 41 41 790 53 44 Telefax 041 790 53 40 International 41 41 790 53 40 Office hours 8 12h 14 17h CET Mo Fr March 1998 Edition Documentation Material Copyright 1991 1998 masc ag Program Material Copyright O 1996 1998 masc ag This documentation may not be copied or duplicated without the express written consent of masc ag Switzerland Further copies of this documentation may be ordered with the enclosed order form PREFACE This manual describes the Automated Transaction Operator ATO commands and how to use them It contains further appendixes with Appendix A Examples of ATO dialogs Appendix B Migration hints for users of the previous version Appendix C User Exit ATOEXI Changes to this publication are summarized under the heading Summary of Changes Technical changes are marked with a vertical bar in the left hand margin Readers of this publication should have fundamental knowledge of VSE resp MVS functions as well as experience with the user interface of the corresponding application Knowledge of REXX or another programming language is also necessary Summary of ATO documentation MATO HO410 1 E masc ato
78. mated Transaction Operator User s Guide 5 11 ATO PUTLOG Syntax ATO FUNC ATO PUTLOG ATO BUFF meldung Description ATO PUTLOG writes the text in ATO BUFF to ATOLOG Note VSE ATO PUTLOG writes to SYSLST MVS ATO PUTLOG writes to the ddname ATOLOG Also other commands like SAY in REXX are available to write messages Example ATO PUTLOG Dieser Text erscheint im LOG Figure 19 Example ATO PUTLOG masc ato Automated Transaction Operator User s Guide Commands 27 5 12 ATO PUTWTO Syntax ATO FUNC ATO PUTWTO ATO BUFF Description PUTWTO writes the text in ATO BUFF to the console The following figure shows an example of the ATO PUTWTO command Example ATO PUTWTO Dieser Text erscheint auf der Konsole Figure 20 Example ATO PUTWTO 28 Commands masc ato Automated Transaction Operator User s Guide 5 13 ATO QUERY CURSOR Syntax ATO POSITION ATO FUNC ATO QUERY CURSOR ATO BUFF Description ATO QUERY CURSOR serves to query the cursor position This function puts the current cursor position into ATO POSITION looking at the whole virtual screen like one string This allows to easily calculate the line and column as shown in the following figure Example ATO FUNC ATO QUERY CURSOR ATO BUFF CALL ATO LINE C2D ATO POSITION COL C2D ATO POSITION SAY ATO POSITION C2D ATO POSITION SAY LINE LINE SAY Figure 21 Example ATO QUERY CURSOR m
79. n order to reduce excessive output By using LOGTERM LOGON LOGTERM is dynamically activated by entering LOGON APPLID netname masc ato then delays the processing until a LOGON APPLID netname follows Note LOGTERM is also supported for session manager products The use of LOGON APPLID corresponds to the default USSCMD FORMAT PLI in the definition USSTAB When using FORMAT BAL LOGON APPLID has to be used The entry follows with USSTAB message 10 Default NO Valid values 0 60 logtime defines a time delay in seconds when using LOGTERM During this time masc ato waits with displaying the next screen Default 2 Valid values 1 6000 logtry defines the number of attempts to establish a connection with the LOGTERM terminal When using LOGTRY 1 the LOGTERM terminal is only used if available or if defined in VTAM Otherwise the processing is continued without LOGTERM Default 6000 Valid values 1 100000 This parameter serves as a LOOP control When exceeding this value the dialog is terminated It is recommendable to use the programming language to detect and handle loops Default 9000 masc ato Automated Transaction Operator User s Guide Commands 35 mdtauto timeout trace support logmode 36 Commands Valid values YES NO When using MDTAUTO YES FlILL commands are generated automatically for MDT display fields eg CICS BMS FSET fields Fields which remain invisible to the user on
80. nd Run is to the preferred way to execute a ATO dialog This method guarantees the consistency of all dialogs in a new environment after a ATO upgrade without any re assembling and re linking of ATO dialogs In addition this method concentrates the whole dialog in only one job This may be helpful in maintaining and adding new code to existing dialogs The second method consists of the calling of assembled and linked load modules This method separates the source and the load modules of a dialog which may be desirable or even required in installations with strict separation of authorities Another advantage is that at execution time no assembly and link steps have to be run which results in lower CPU load These savings however are minimal on a MVS system With a release change of masc ato the dialogs should be assembled and newly linked We do recommend that you use the Assembly with Link and Run method when executing a ATO dialog 116 Execution of ATO dialogs masc ato Automated Transaction Operator User s Guide 8 APPENDIX A EXAMPLE DIALOGS 8 1 CICS Signon and Signoff 8 1 1 Call from REXX RRR KK KK Rk a RR KK KK ck ck ck ck kckckckckckckck kk ck ck ck ck ckckckck kk KK SAMPLE 1 SIGN ON SIGN OFF TO CICS KK kckckckckckck k k ck ck ck ck ck ck ckckck KK Kk a gt ARG 6011 2 CALL INITIALIZE CALL PROLOG CALL LOGON
81. ne Description With the command DCL Declare fields may be defined which will be used with FROM TO in further processings The command may appear in any position in the dialog For a more clarity of the dialog it is recommended to use the declarations in a separate paragraph at the beginning of the dialog An example of application is shown in figure 10 44 Compatibility Mode masc ato Automated Transaction Operator User s Guide Example PROLOG KKK KKK KKK KKK KKK KKK KKK ck ck ck ckck ck DECLARATION MSGO1 DCL DATA ERROR IN LOGON PROC CUSTNR DCL DATA 123 456 789 RETC DCL DATA FALSE KKK KKK KKK KKK KKK MAIN PROCESSING PERFORM PROC LOGON SCAN DATA TRUE FROM RETC FOUND MAP20 PUTPRT FROM MSGO1 PERFORM PROC ERRO8 MAP 0 ARK OVE FROM CUSTNR TO FLDCUST AP FLDCUST FILL LIN 05 COL 20 DATA 999 999 999 APEND AP KEY CLEAR APEND AP LASTMAP YES DATA CESF LOGOFF APEND
82. ngly MAP TIMEOUT locally sets the time value for this entry The PROLOG TIMEOUT value should not be increased unnecessarily because masc ato will not be able to recognize any internal logical errors For separate entries where long response times are expected the MAP TIMEOUT parameter should be used The PROLOG APPLTRY parameter is used to execute a dialog only when the TP monitor is available For this purpose define APPLTRY 1 Example PROLOG DIALOG SAMPLE1 NETNAME NETATO1 APPLID DBDCCICS LOGTERM LOGON EPILOG END Figure 65 Example PROLOG 92 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 29 PUTLOG Syntax Command Parameter PUTLOG DATA data FROM field data Valid values Max 64 alphanumerical characters The string data is written to ATOLOG If this parameter is omitted the data in the current WORK area of the last SCAN SCANB or GETRDR command is listed Default none field Valid values WORKI 9 or a predefined field eg with DCL MAP FILL SCAN B MAPFLD etc The contents of field are output on ATOLOG Default WORKI Description PUTLOG either writes the text entered in the DATA parameter or the contents of the field indicated with FROM to ATOLOG Only ONE of the two parameters can be defined If no parameter is supplied the default is PUTLOG FROM ZWORKI Note VSE PUTLOG writes to SYSLST MVS PUTLOG writes to ATOLOG DD SYSOUT ATOLOG has a
83. ntax 70 MAPKEYS Command Overview 13 Description 74 Example 75 Syntax 74 MARK Command Overview 15 Description 76 Example 76 Syntax 76 MASC ATO COMMANDS 5 Migration Version 4 1 125 MOVE Command Overview 16 Description 78 Examples 78 Syntax 77 N Notation Conventions 1 O Object Module see HLL Interface P PENDING Command Overview 14 16 Description 81 Example 82 Syntax 80 PERFORM Command Overview 15 Description 84 Example 85 Syntax 84 Phase see HLL Interface Preface I PROC 86 Command Overview 15 Description 86 PROCEND 87 Command Overview 15 PROLOG 9 Command Overview 11 Description 92 Example 92 masc ato Automated Transaction Operator User s Guide Syntax 88 PUTLOG Command Overview 14 15 Description 93 Example 94 Syntax 93 PUTPRT Command Overview 15 Description 95 Example 96 Syntax 95 PUTWTO Command Overview 14 15 Description 97 Example 97 Syntax 97 R Return Codes Conventions 42 5 SCAN Command Overview 15 Description 99 Examples 100 Syntax 98 SCANB Command Overview 15 Description 102 Syntax 101 SESSBEG 9 Command Overview 11 Description 104 Examples 104 Syntax 104 SESSEND 9 Command Overview 11 Description 105 Examples 105 Syntax 105 SESSET Command Overview 11 SESSID 9 SESSSET Description 109 Example 109 SESSSET SESSMOD Syntax 106 SLEEP Command Overview 14 16 Description 111 Example 111 Syntax 111 STRUCTURE 5 T Table of Contents V Table of Figures VII In
84. ntially ie without previous calling by perform An example of PROC is found in figure 39 on page 85 masc ato Automated Transaction Operator User s Guide Compatibility Mode 87 6 28 PROLOG Syntax Command Parameter PROLOG DIALOG name NETNAME netname APPLIDzapplid APPLTRYzappiltry LINEOV lineov LOGTERM logterm LOGTIME logtime LOGTRY zlogtry LOGAID logaid LOOP loop MLOG mlog MDTAUTO mdtauto sTIMEOUT timeout TRACE trace SSESSMAX sessmax SSUPPORT support LOGMODE logmode LOGTMOD logtmod name Valid values Max 8 alphanumerical characters This parameter indicates the name of the dialog to be executed Default ATODLOG netname Valid values Max 8 character terminal name according to network naming conventions CICS This parameter identifies a valid network name according to CICS TCT or CICS CSD TERMINAL definitions respectively Default NETATOI applid Valid values APPLID name according to network conventions APPLID for a masc ato session CICS This parameter identifies the application name as defined in the SIT of the corresponding CICS This name is also displayed at the bottom right hand edge of the screen with the transaction CEMT INQ TAS 88 Compatibility Mode masc ato Automated Transaction Operator User s Guide appltry lineov logterm logtime Default DBDCCICS Valid values 1 6000 appltry is the number of attempts that masc ato executes for the establishmen
85. o possible to get the same effect with 2 ATO SEND KEY calls which might be more readable in some circumstances Please note that after getting the virtual screen the cursor is automatically placed on the first input field H could therefore also be omitted Example ATO FUNC ATO BUFF CALL ATO ATO FUNC ATO SEND AID ATO BUFF ENTER CALL ATO ATO SEND KEY Huserid Npassword Figure 23 Example ATO_SEND_KEY masc ato Automated Transaction Operator User s Guide Commands 31 5 16 ATO SET CURSOR Syntax ATO FUNC ATO SET CURSOR ATO POSITION pos Valid values Depends from the terminal defintion for the virtual screen pos defines the new cursor position Description After receiving a virtual screen the cursor is on the first entry field If another field should be filled the cursor position can be changed using ATO SET CURSOR The general formula to get the cursor position is as follows line number 1 number of characters per line column number Note Also the virtual keystrokes Gt tab n newline etc allow to position the cursor on the virtual screen The following figure shows as example of the ATO SET CURSOR command how on line 24 column 5 the SAP transaction ABAP is called assuming that the dialog is made for a model 2 with 80 characters per line Example 24 L 3 LIN 1 80 COL ATO FUNC ATO SET CURSOR ATO POSITION D2C POS 4 CALL ATO ATO FUNC ATO
86. of a PROLOG LOGTERM function eg by letting already tested dialog sequences eg logon s etc pass at a higher speed and only setting a larger interval as from a certain processing sequence Example PROLOG LOGTERM LOGON LOGTIME 0 LOGTIME SEC 4 MAP50 MAP DATA FIBU MAPEND Figure 49 Example LOGTIME masc ato Automated Transaction Operator User s Guide Compatibility Mode 63 0 10 LOOP Syntax Command Parameter LOOP COUNT count count Valid Values 1 100000 This parameter resets the value of the PROLOG LOOP parameter to the desired number Default 9000 Description By using the LOOP command at any arbitrary position in the dialog the internal LOOP counter can Example be set to a new value PROLOG LOOP APE SCAN AP APE AP APE GOTO AP FILL APE LOGTERM LOGON LOOP 50000 COUNT 3000 AP DATA FIBU D DATA MAIN MENU FOUND MAP60 KEY PF3 D KEY CLEAR D MARK MAP 50 DATA 123456 LIN 07 COL 14 D Figure 50 Example LOOP 64 Compatibility Mode masc ato Automated Transaction Operator User s Guide 6 17 MAP Syntax Command Parameter label MAP SESSID sessid DATA data LIN line COL column RC retcode LASTMAP lastmap MDTAUTO mdtauto sTIMEOUT timeout KEY key RECEIVE receive Valid values 1 character sessid data label line sessid switches to a certain session This is necessary whenever severa
87. on Rules masc ato Automated Transaction Operator User s Guide General Notation Rules 3 Note 0 All labels commands and parameters should be entered in capital letters 0 Unless otherwise noted the string in the DATA parameter may contain a maximum of 80 characters and may be referenced with FROM TO if a label has been defined 0 A in column 1 defines a comment line 0 Special characters have to be avoided the rules apply according to the Assembler conventions 4 General Notation Rules masc ato Automated Transaction Operator User s Guide 3 STRUCTURE 3 1 masc ato commands To control the sessions and screen interactions masc ato uses a set of clear functions that lets you write easily legible programs All functions are described in detail in the following chapters In the native mode a function is set and the buffer prepared with its parameters before the call to the module ATO is made To call specific functions we recommend to use mnemotechnically easy names that you may put into copybooks according to the rules of the programming language The terminology used in this manual is well suited for the embedding in REXX programs 3 2 Reserved Words The following variables are reserved ATO SID Session ID ATO FUNC Function ATO RC Return Code ATO POSITION Cursor Position ATO BUFF Parameters for a Function masc ato Automated Transaction Operator User s Guide Structure 5 3 3 Keys and cursor control masc ato c
88. ong running task ATO PAUSE can be used The following figure shows an example for ATO PAUSE After ATO PAUSE ends because of the arrival of the next host message it checks if it now received the next screen or an asynchronous message Example ATO FUNC ATO PAUSE CALL ATO ATO FUNC ATO PENDING only necessary if AUTOPEND NO L ATO FUNC ATO COPY PS TO STRING BUFF COPIES 28 ATO POSITION D2C 1 20 CALL ATO IF ATO BUFF Title line of the new screen THEN Figure 17 Example ATO PAUSE masc ato Automated Transaction Operator User s Guide Commands 25 5 10 ATO PENDING Syntax ATO PENDING Description Asynchronous messages sent to a dialog can temporarily be suppressed using AUTOPENDzNO in ATO SET SESSION PARAMETERS in order not to interrupt the normal dialog flow ATO PENDING allows to get these messages i e the new virtual screen content is now available to the application program and for example can be copied into a buffer using ATO COPY PS TO STRING Note SAP A special message shows that a task is changing its status into long running Later when the processing is done there appears the screen that is usually expected This is recognized by ATO PAUSE Depending on the AUTOPEND parameter it is now necessary to get the new virtual screen contents using ATO PENDING Example ATO FUNC ATO PENDING CALL ATO Figure 18 Example ATO PENDING 26 Commands masc ato Auto
89. operates according to the dialog cycles of in and outputs which are processed by the commands MAP MAPEND Except for the first transaction masc ato always determines which transaction should be processed next Exceptions are the commands PENDING and MAP RECEIVE ONLY If the TP monitor starts a transaction it will collide with the transaction start of MAP MAPEND and will be rejected by masc ato TP monitors like CICS try to repeat the pending task at each transaction end which leads to a repeated collision and rejection by masc ato If a TP monitor transaction is pending that has been rejected by masc ato it can be initiated with the use of the PENDING command PENDING signals the TP monitor to start the pending transaction If the PENDING FOUND condition is true the TP monitor has started the pending transaction Hereby masc ato functions like after MAPEND ie the screen is ready for further processing However if the PENDING NFOUND condition is true masc ato acts just like a GOTO where the processing continues at the position defined in the NFOUND parameter CICS When a ATO dialog is terminated it is the responsibility of CICS to handle any pending transactions CICS usually restarts these transactions instead of the expected Good Morning transaction If the same or another dialog is executed at the same logical terminal a violation of the security level or other undesired conditions are likely to be expected if the ATO dialo
90. py of the virtual screen Example ATO FUNC ATO COPY PS TO STRING ATO BUFF COPIES 4000 ATO POSITION D2C 1 4 CALL ATO CALL RETTEST DO WHILE POS lt LENGTH ATO BUFF SAY SUBSTR ATO BUFF POS 80 POS POS 0 END SAY END OF SCREEN Figure 11 Example ATO COPY PS TO STRING masc ato Automated Transaction Operator User s Guide Commands 19 5 4 ATO COPY STRING TO PS Syntax ATO POSITION position ATO COPY STRING TO PS Description This function serves to copy a buffer into a virtual screen This allows to fill the virtual screen before sending it to the host using ATO SEND AID An example of the ATO COPY STRING TO PS command is shown in figure 12 This puts the string nend on line 24 column 5 of the virtual screen and sends it afterwards to the host pressing the ENTER key Example POB 23 80 5 ATO POSITION D2C POS 4 ATO FUNC ATO COPY STRING TO PS ATO BUFF nend CALL ATO ATO FUNC ATO SEND AID ATO BUFF ENTER CALL ATO Figure 12 Example ATO COPY STRING TO PS 20 Commands masc ato Automated Transaction Operator User s Guide 5 5 ATO DISCONNECT FORCE Syntax ATO DISCONNECT FORCE Description ATO DISCONNECT FORCE terminates the connection to the current session however the dialog or the program respectively continues A use of the ATO DISCONNECT FORCE command is shown in figure 13 Example ATO DISCONNECT FORCE
91. rk Description Default 01 Valid values 01 2 col defines the column position from which the SCAN will begin on SCREEN or on WORKI 9 Default 01 Valid values 01 43 With endlin an endposition of a line may be defined for SCAN on SCREEN The string in the DATA parameter has to be within the lines which are defined with LIN and ENDLIN with specification of ENDLIN If this does not apply the NFOUND condition is set The value endlin must be greater or equal to the value in LIN If only LIN is specified whereas ENDLIN does not contain a value the string is searched on line Jin Default 01 Valid values 01 132 With endcol an endposition of a column or WORKI 9 can be defined for SCAN on SCREEN The string in the DATA parameter has to lie within a column that lies between COL and ENDCOL when specifying ENDCOL If this does not apply the NFOUND condition is set The value endcol must be greater or equal to the value in COL If col and endcol have the same value the string is searched starting in col with the length of string Default 01 Valid values 01 132 toffset defines the position where to place a field Default 01 Valid values Max 7 characters branch mark MARK MAP mark defines a branch mark that is branched to after 8 FOUND or NFOUND condition of the defined value in the data SCAN searches the received content of a display screen SCREEN or a predefined field WORKI 9 DCL field
92. saction CEMT INQ TAS masc ato Automated Transaction Operator User s Guide Compatibility Mode 105 appltry lineov logterm logtime Default Value from PROLOG or previous SESSET command Valid values 1 6000 appltry is the number of attempts that masc ato executes for the establishment of a connection with the application in parameter APPLID The entry APPLTRY 1 may be used to only execute a dialog when the TP monitor is active and available Default Value from PROLOG or previous SESSET command Valid values 0 80 lineov defines the number of lines per page for ATOLOG and ATOPRT Default Value from PROLOG or previous SESSET command Valid values Max 8 alphanumeric characters Valid network name according to network conventions or NO or LOGON This parameter defines the network name of a display screen for the supervision and step by step reporting of the dialog If this optional function is not required specify LOGTERM NO When SUPPORT YES is defined specify LOGTERMENO in order to reduce excessive output By using LOGTERM LOGON LOGTERM is dynamically activated by entering LOGON APPLID netname masc ato then delays the processing until a LOGON APPLID netname follows Note LOGTERM is also supported for session manager products The use of LOGON APPLID corresponds to the default USSCMD FORMAT PLI in the definition USSTAB When using FORMAT BAL LOGON APPLID has to be used The entry follows wit
93. se that nothing else is mentioned only one alternative may be chosen o BOLD letters must be entered exactly as described o Italic letters describe fields or parameters that have to be given together with a command 0 Application specific additions 0 VSE Operating System 0 MVS Operating System 0 VM CMS Operating System 0 CICS TP Monitor 0 IMS TP Monitor 0 TSO TP Monitor 0 SAP Application Software 0 COPICS Application Software 0 MRPS Application Software masc ato Automated Transaction Operator User s Guide Notation Conventions 1 2 GENERAL NOTATION RULES 2 1 General Rules The notation rules of masc ato do not require a certain form but are in accordance to the rules of the corresponding programming language 2 2 Compatibility Mode The notation rules of the compatibility mode are in accordance to the assembler conventions This means Label start at column 1 Commands start at column 10 Parameters start at column 16 Continuations are characterized with a comma and a continuation character at column 72 Only the commands documented in this manual should be used This will ensure that the defined dialogs will be compatible with future developments Cmd Parameterl Parameter2 Parameter3 Figure 1 General Notation Rules Example MAP FILL DATA LOGOFF LIN 24 COL 05 MAPEND MOVE TO FELD1 DATA XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXC XXXXXXXXX Figure 2 Example Notati
94. t of a connection with the application in parameter APPLID The entry APPLTRY 1 may be used to only execute a dialog when the TP monitor is active and available Default 6000 Valid values 0 80 lineov defines the number of lines per page for ATOLOG and ATOPRT Default 55 Valid values Max 8 alphanumeric characters Valid network name according to network conventions or NO or LOGON This parameter defines the network name of a display screen for the supervision and step by step reporting of the dialog If this optional function is not required specify LOGTERM NO When SUPPORT YES is defined specify LOGTERMENO in order to reduce excessive output By using LOGTERM LOGON LOGTERM is dynamically activated by entering LOGON APPLID netname masc ato then delays the processing until a LOGON APPLID netname follows Note LOGTERM is also supported for session manager products The use of LOGON APPLID corresponds to the default USSCMD FORMAT PLI in the definition USSTAB When using FORMAT BAL LOGON APPLID has to be used The entry follows with USSTAB message 10 Default NO Valid values 0 60 logtime defines a time delay in seconds when using LOGTERM During this time masc ato waits with displaying the next screen With the command LOGTIME the time value in the dialog may be reset and redefined see command LOGTIME on page 63 Default 2 masc ato Automated Transaction Operator User s Guide Compatibility Mo
95. the memory requirement is larger namely about 256 K for masc ato and about 64 K for explicit memory requests of masc ato during execution time In addition further implicit memory requests of the called interfaces have to be taken into consideration eg VTAM DLA SQL etc By defining large enough regions or partitions with VSE EXEC USERPGM SIZE nnnK GETVIS for ATO and VTAM masc ato Automated Transaction Operator User s Guide Compatibility Mode 61 MVS EXEC PGM USERPGM REGION nnnK Program size plus GETMAIN s you can avoid abnormal termination due to the partition size or region size being too small Correlation with Programming Languages Various programming languages offer diagnostic help eg by localizing data exceptions by means of SPIE STXIT Within the masc ato no SPIE STXIT is used because program checks can be initiated by the user exit ATOEXI This condition therefore guarantees the full spectrum of diagnostic help for the user program in the selected programming language Internally masc ato operates with various asynchronous constructions and with multitasking With the PROLOG option TIMEOUT 1440 a task can be eliminated This may be necessary under VSE since only a couple of task levels are supported If masc ato discovers an error after calling a dialog the control is returned to the user program with the corresponding return code This enables the user program to execute the necessary steps according to each situation
96. the previous version it had to be passed as a parameter Also note that masc ato 4 1 0 does not by itself translate any characters in uppercase but takes them as they appear on the screen Please check if your dialog depends on this translation e g in SCAN commands In this case consider to turn on the uppercase translation of CICS for the virtual terminal masc ato Automated Transaction Operator User s Guide APPENDIX B Migration to Version 4 1 125 10 APPENDIX C USER ExiT ATOEXI 10 1 Introduction The user exit ATOEXI is available for various requirements ATOEXI is called at different positions of a ATO dialog implicitly by masc ato or explicitly when using the command UEXIT or by FILL variables VARn Within the system the user exit ATOEXI is called at various points of the session handlings with SYS The current APPLID from the TP monitor is tracked automatically by session passing After each alteration the user exit ATOEXI has to be newly generated ie according to figure 56 for VSE and figure 57 for MVS Replace the library or data set names according to your masc ato installation JOB ATOEXI JOB ATOEXI OPTION LOG LIBDEF SEARCH userlib ATO410 CATALOG userlib ATO410 OPTION CATAL XREF ACTION CLEAR PHASE ATOEXI EXEC ASSEMBLY COPY ATOEXI END EXEC LNKEDT amp EOJ Figure 87 ATEXI Generation for VSE ATOEXI JOB ACCT ATO EXIT CLASS A MSGCLASS X MSGLEVEL 1 1
97. the table TAB in ATOEXI is searched according to figure 59 In the above named example the variables VARI and VAR2 are replace by the values MILLER and masc ato Any variables may generally be assigned with this table if the corresponding conditions have been met The corresponding replacement values have to be defined in the USER column Per variable V ARn max 9 and condition to be fulfilled one line in the table TAB in ATOEXI has to be defined The length of the line and the single fields within a line have to be followed exactly The contents of a line have been defined as follows DIALOG NETNAME APPLID VAR USER DATA DDDDDDDDNNNNNNNNAAAAAAAA VARN UUUUUUUU Dialogname definiert in PROLOG DIALOG Netname definiert in PROLOG NETNAME Application ID definiert in PROLOG APPLID Variablen Nummer wobei ftir n eine Zahl von 1 9 steht Ersatzwert f r VARn The field values may also be defined generically with whereby the asterisks indicate the non relevant positions The table TAB is run through from top to bottom top down up to the first relevant entry This is returned to the dialog in the FILL DATA of the corresponding V ARn variable Incorrect DC C DIALOG1 NETATOl VARni UUUUUUUU DC C DIALOG1 NETATO1 CICS1 VARn UUUUUUUU masc ato Automated Transaction Operator User s Guide APPENDIX C User Exit ATOEXI 129 Correct DC DC C DIALOG1 NETATO1 CICS1 VARn UUUUUUUU
98. ther This functionality can now be achieved easier using several parallel session using the SESSBEG SESSMOD SESSSET and SESSEND commands Default NO Valid values NO YES When setting MDTAUTOZNO only fields that are transferred with FILL or MAPFLD are transmitted Default See PROLOG MDTAUTO on page 60 The default is set with PROLOG MDTAUTO Valid values 1 60000 With the statement TIMEOUT timeout the maximum duration is specified in seconds which the dialog will wait for an answer from the TP monitor When this value is exceeded the dialog will be aborted The default value is set with the PROLOG TIMEOUT parameter Default see PROLOG TIMEOUT parameter on page 21 SAP For ABAP TF70 TF78 TK31 this value has to be increased MVS For long running transactions the TIME parameter has to be adjusted in the JOB statement or EXEC statement eg TIME 1440 or a corresponding job class has to be chosen for processing of the dialog 66 Compatibility Mode masc ato Automated Transaction Operator User s Guide Key receive Valid values ENT Enter CLEAR PAI PA3 PF1 PF24 With this parameter the function key necessary for this transaction is specified Default ENT Enter PA1 PA3 are supported in transaction mode only When using the CLEAR key to delete a screen the next command sequence to be used for displaying data on the unformatted screen is MAP DATAc data CICS PAI is not supported for TCT PRINTO
99. thin TSO various conversions may be active Codepages in ISPF etc Description MAPFLD transfers the value in the DATA parameter of a MAP where the length equals the number of characters between the quotation marks The MAPFLD value may be filled with the GETRDR or MOVE commands Figure 31 and 32 on page 71 show the use of this command MAPFLD commands can be coded only following a FILL command between MAP and MAPEND commands Generally this command is used to fill fields declared with a MAP FILL statement with values of variable content 70 Compatibility Mode masc ato Automated Transaction Operator User s Guide Examples SCAN DATA FOLDER OVE COL 6 TO FNAME1 MAPN AP FILL LIN 14 COL 207 DATA REPRODUCTION OF FNAME1 MAPFLD DATA XXXXXXXX MAPFLD DATA HAS ENDED APEND EOF1 ARK Figure 54 Example 1 MAPFLD This example enters the value REPRODUCTION OF on line 14 beginning at column 7 With the first MAPFLD command a variable value of 8 characters 15 added Because the label FNAMEI precedes the first MAPFLD command the DATA parameter defines the length of this receiving field and is filled accordingly with the GETRDR or MOVE command The second MAPFLD instruction adds the value HAS ENDED for the conclusion of the line which results to the final line value of REPRODUCTION OF XXXXXXXX HAS ENDED MAP KEY CLEAR MAPEND MOVE TO FOLDER DATA FOLDER1 MAP DATA SBDC 5 FOLDER MAPFLD DA
100. tibility Mode 85 0 20 PROC Syntax Command Parameter Procname PROC procname Valid values Max 7 alphanumeric characters procname defines the name of the procedure and is a compulsory entry Up to 32 levels may be nested as a maximum Default none Description The command PROC marks the beginning of a procedure The contents of such a procedure are normal dialog command sequences which can be called with PERFORM PROC procname The procedure ends with the command PROCEND Within PROC PROCEND further PROC PROCEND and PERFORM commands may be used A procedure may also be passed sequentially without a previous calling of PERFORM Important Within a procedure no labels may be referenced or jumped to that lie outside PROC PROCEND For a better overview we recommend that you place the procedures after the definition MAP LASTMAP YES You can find an example of PROC in figure 39 on page 85 86 Compatibility Mode masc ato Automated Transaction Operator User s Guide 0 27 PROCEND Syntax Command Parameter abel PROCEND label Valid values Max 7 alphanumeric characters label defines a branch mark which can be branched to within a procedure Default none Description With the command PROCEND the end of a procedure is marked Control goes back to the instruction that follows the calling PERFORM command With PROCEND no return occurs if a command sequence PROC PROCEND is passed seque
101. ues Max 80 characters This parameter contains the data which should be transferred to a field The length of the data to be transferred is determined by the number of characters between the quotes Valid values WORKI 9 SCREEN SPACES or a label This fieldname defines the area from which the values are transferred Default WORKI Valid values 01 80 This parameter defines the display screen column of WORKI 9 and SCREEN from which the value should be transferred Default 01 Valid values 01 24 This parameter defines the line from which the value has to be transferred from SCREEN Default 01 masc ato Automated Transaction Operator User s Guide Compatibility Mode 77 tofield Valid values Fieldname with max 7 characters WORK1 9 or a label This fieldname defines an area into which values are transferred Default WORKI tocolumn Valid values 01 80 This value defines the column of WORK 9 into which will be transferred Default 1 tolength Valid values 01 80 This value defines the length of the data in WORKI 9 which is to be transferred Default 80 Description MOVE serves for the transfer of various areas With WORKI 9 SCREEN the parameters TOLEN TOCOL LIN and COL can be defined additionally Examples MAP DATA TRAI1 MAPEND SCAN DATA FOLDER NFOUND NF1 MOVE FROM SCREEN TO FNAME1 MOVE FROM SCREEN COL 8 LIN 3 TO FNUMM1 MAP FILL LIN 14 COL 07 DATA REPRODUCT
102. view PUTLOG Write Message to ATO Log PUTWTO Write Message to Console PENDING Process of pending transactions SLEEP UEXIT Call User Exit ATOEXI masc ato Automated Transaction Operator User s Guide 4 3 2 Comaptibility Mode SCAN Search in the output received SCANB Search backwards in the output received emm Reading input data from ATORDR Write Message to ATO LOG o eme Write Message to ATO PRT Write Message to Console o Jem Branching to a branch mark LOOP Reset the LOOP counter to a new value O ask 0003 PERFORM Perform a procedure or subroutine 0 3 PROCEND Marks the end of a procedure COPY Copying of predefined dialog sequences Copybook HLLCALL Communicating with a calling user program via HLL interface LOGTIME Sets the dealy time between two commands when using LOGTERM masc ato Automated Transaction Operator User s Guide Command Overview 15 Transfer from and to WORK area ATO PENDING PENDING Processing of pending transactions ATO PAUSE SLEEP Waiting time ATO SLEEP ATO EXI UEXIT Execution call User Exit ATOEXI ATOHLL HLL Interface to call an ATO dialog from a user batch program with CALL Figure 8 ATO Command Overview 16 Command Overview masc ato Automated Transaction Operator User s Guide 5 COMMANDS 5 1 ATO CONNECT PS Syntax ATO FUNC ATO CONNECT PS ATO SID sessid sessid Valid values 1 character sessid shows for which session SESSBEG is valid Def
103. ws an example of the ATO SLEEP command Example ATO FUNC ATO SLEEP ATO POSITION D2C 10 4 10 Sekunden warten CALL ATO Figure 26 Example ATO SLEEP 38 Commands masc ato Automated Transaction Operator User s Guide 5 19 ATO TERMINATE Syntax ATO TERMINATE Description ATO TERMINATE closes the ATO dialog and has to be programmed only once at the end of the dialog Before ATO TERMINATE all sessions that are connected have to be closed using ATO DISCONNECT PS The following example shows the termination of the dialog and the exit of the program setting return code 16 Example ATO TERMINATE Figure 27 ExampleATO TERMINATE masc ato Automated Transaction Operator User s Guide Commands 39 0 COMPATIBILITY MODE 6 1 Internal Work Areas The work areas WORK1 9 are work areas which are referenced using commands with field parameters Each of these areas are 80 bytes long and are initialized with SPACES They can be applied in the TO and FROM parameters of the corresponding commands The following commands address the work areas WORK1 9 0 HLLCALL Default TO WORK1 0 PUTPRT Default FROM WORK1 0 PUTLOG Default FROM WORK1 0 PUTWTO Default FROM WORK1 0 SCAN Default TO WORK1 0 SCANB Default TO WORK1 0 GETRDR Default TO WORK1 0 MOVE Default FROM WORK1 0 UEXIT Default TO WORK1 6 2 Examples of Application of the WORK Areas MOVE FROM SPACES T
104. x o Command Parameter UEXIT DATA data TOzt0 data Valid values Max 80 alphanumeric characters For control the data are transferred to the user exit ATOEXI which returns the corresponding value in form of the user variables indicated by to Default none to Valid values WORKI 9 FILL Label or field declared by DCL to specifies the area into which the user exit places the requested data Default WORKI Description With UEXIT the user exit is called explicitly ATOEXI is used for the manipulation of fields with various possibilities Further information on ATOEXI are to be found in appendix D on page 93 Example UEXIT DATA USERI TO WORK1 PUTPRT FROM WORK1 FILL DATA MENU MOVE FROM WORK1 TO F1 MAP F1 FILL LIN 03 COL 204 DATA XXXX MAPEND Figure 76 Example UEXIT masc ato Automated Transaction Operator User s Guide Compatibility Mode 111 7 EXECUTION OF ATO DIALOGS This chapter deals with the procedure for the execution of ATO dialogs under VSE or MVS masc ato commands can be embedded into any REXX programs Jobs for the call of REXX procedures are provided on the SAMPLIB There is no compilation or preprocessing necessary The masc ato commands are defined as assembler macros and follow the assembler conventions In order to execute a dialog the macros first have to be converted that is assembled and linked as a load module It has to be considered that with the violation of t
105. y interfaces to system resources like databases files etc Additionally to loops case structures and many possibilities to manipulate variables REXX for example also provides a rich set of functions that can help enormously interpreting the received or preparing the next screen The commands described above are therefore integrated either in REXX a relatively easy to use but powerful language portable to several platforms or in another programming language like COBOL Assembler or 1 The choice of the right programming language for your dialog depends on different factors Portability the rich set of functions and the ease to develop dialogs may often be in favor of REXX while the access to DB 2 or VSAM datasets may be easier to program in other languages masc ato Automated Transaction Operator User s Guide Structure 7 3 5 Sample masc ato dialog The following illustration shows a simple part of a dialog using 7850 3810 commands ATO Dialog JOB TP Monitor GEN ATOCTL DD ATO FUNC ATO SEND KEY ATO BUFF TRA1 CALL ATO DO WHILE ATO RC 0 PULL ZEILE ATO BUFF SUBSTR ZEILE ATO FUNC ATO SEND KE CALL ATO 00 10 O1 CO PD ES REXX ASM H F COBOL II PL I SOL etc Journal ABA gt 582 DL 1 etc VSAM Tape etc Figure 3 masc ato Dialog Explanations 1

masc-ato: User's Guide

Contents

Download Pdf Manuals

Related Search

Related Contents