Mainframes Archive

Debug Tool Commands – Mainframes

IBM Debug Tool Commands for mainframes a Quick reference F2           – Line by Line Execution F9           – break point to break point execution Setting Break Point-> – Place the cursor on the line where the break point is needed and press PF6. – In Command line give AT

CICS Scrolling logic with examples

CICS scrolling logic looks very simple in algorithm representation but implementing it practically so many questions arises. This topic is to clear all the queries related to CICS scrolling (page Up / Down) logic with suitable examples. Let me give few basic points before getting into detailed implementation logic. Decide the number of rows(MAX-SCRN-SIZE) to

Online expeditor commands – CICS

Below are the few online expeditor useful commands for basic debugging of a program. Expeditor Quick Reference → Command line Commands: XPED <Program Name> → Type this in the Native CICS region which open the program in Debug mode allowing user to enter break points or setup KEEP/ PEEK etc. KEEP <variable name> → It

MDT and its usage in CICS with examples

Modified data Tag (MDT) is the most important feature in CICS programming consisting of MAPS. One who involves in CICS programming needs to know the importance of it for efficient coding. It is stored in 7th bit of a attribute byte of a screen field with either ‘0’(OFF) or ‘1’ (ON) as the values.(Every input

cobol redefines clause with examples

This topic covers the redefines clause usage, syntax, declaring and valid & Invalid redefines cases. Redefines clause is used to share the common storage among the different data items/groups. This is useful to optimize the usage of working storage area. 1. This can be used at 01 level as well. Ex: 01 VAR-1 PIC X(10)