C35T1

L C001 enter

if one does not appear, or you need to signon to CICS during a session, type: CESN and press Enter.

try again, by retyping CESN.

• A service transaction called CEMT
• allows you to perform supervisory CICS functions.
• For now, we will use CEMT to inquire on files and programs in the CICS environment.

Pause

clears the screen

CEMT I PROG(*3C)

CEMT I PROG(INQPA7) enter

CEMT I TRAN(*A7)

CEMT I FI(*A7) enter

• Pause
• CESF LOGOFF enter

• the execution of an application program for a specific user.
• With CICS, two ore more tasks can execute at the same time using a CICS feature called multitasking.

• that CICS allows more than one task to be executed at the same time.
• CICS provides multitasking within a single address space.

• allows all the users in a CICS region to use the same copy of a program at the same time.
• For multithreading to work, the program must be reentrant.

• doesn't change itself in any way(cannot modify data in working storage)
• CICS provides a separate copy of working storage for each user running a COBOL program.

• CICS provides a separate copy of working storage for each user running a COBOL program.
• When the program finishes executing, the working storage for that users is released and the virtual memory that was used is free to be allocated to another user.

Under CICS, a user cannot directly invoke a program. Instead, the user invokes a transaction, which in turn specifies the application program to be run. When a user invokes a transaction, CICS locates the application program associated with the transaction, loads it into storage(if it isn't in storage already), and starts a task.

each transaction is identified by a unique, 4-char identifier called a transaction identifier or trans-id

• Program Control Table
• Each trans-id in the PCT identifies the program CICS should execute when the transaction is invoked.

• Processing Program Table
• keeps track of which programs are already loaded into storage. If a program has not been loaded into storage, it's loaded when its associated transaction is invoked

provides the interface between CICS and the operating system's telecommunication access method. It lets you send text or receive text from the terminal that initiated the task.

• Basic Mapping Support
• is an interface between application programs and terminal control.
• BMS lets you create a map that specifies the position of the individual display elements on the terminal screen.

physical mapset: location, appearance, operation of data on screen

symbolic mapset: copy member that can be copied into the cobol program that uses the mapset

• DFHMSD: start the mapset
• DFHMDI:  to start each map
• DFHMDF to define each field with a map

• DFHMDF POS=(5,1),                X
•                      LENGTH=11,                X
•                      ATTRB=(NORM,PROT),  X
•                      COLOR=GREEN,           X
•                      INITIAL='Type of gas'
• TYPE DFHMDF POS=(5,13),              x
•                     LENGTH=1,                 X
•                     ATTRB=(NORM,UNPROT,IC),X
•                     COLOR=TURQUOISE,   X
•                     INITIAL='_'
•         DFHMDF POS=(5,15),              X
•                     LENGTH=0,                 X
•                     ATTRB=ASKIP

• LITRES   DFHMDF POS=(7,18),             X
•                          LENGTH=3,                X
•                          ATTRB=(NORM,UNPROT),X
•                         COLOR=TURQUOISE,       X
•                          INITIAL='___'
•             DFHMDF POS=(7,22),                 X
•                         LENGTH=0,                    X
•                         ATTRB=PROT

• DFHMDF POS=(9,1),              X
•                         LENGTH=7,               X
•                         ATTRB=(NORM,PROT), X
•                         COLOR=GREEN,          X
•                         INITIAL='Price :'
• PRICE    DFHMDF POS=(9,8),             X
•                          LENGTH=7,               X
•                          ATTRB=(NORM,PROT),X
•                          COLOR=TURQUOISE,  X
•                          PICOUT='$ZZ9.99'

• DUMMY DFHMDF POS=(24,79),                X
•                        LENGTH=1,                     X
•                        ATTRB=(FSET,DRK,PROT), X
•                        INITIAL='X'

• MAP         DFHMDI SIZE=(24,80),     X
•                            LINE=1,               X
•                            COLUMN=1

• DFHMSD TYPE=FINAL
•      END
• //

• Customer Information Control System
• Basic Mapping Support
• Attention Identifier(Enter, Right Control, PF, PA, Clear or Pause)
• Modified Data Tag

• A task is the execution of an application program for a specific user.
• Under CICS, a user cannot directly invoke a program. Instead, the suer invokes a transaction, which in turn specifies the application program to be run.

• Multitasking means that CICS allows more than one task to be executed at the same time.
• Multithreading allows all the users in a CICS region to use the same copy of the program as the same time.

• A reentrant program doesn't change itself in any way(don't change working storage)
• CICS provide a separate copy of working storage for each user running a program.

• A conversational program is an online program that sits idle while it waits for user input.
• (SOS- short on Storage)
• With pseudo-conversational programming, a program ends after it sends data to a terminal. This releases some of the resources. The program restarts when a person hits an AID key

Each transaction is identified by a unique 4 char code called a transaction identifier, or trans-id.

• TCT Terminal Control Table
• used to define each terminal to the CICS system.
• each terminal is given a unique 1-4 char terminal identifier(term-id)
• these make it possible for CICS to direct program output ot the correct
• terminal and input from the terminal to the correct program

• PCT (Program Control Table) is a list of valid trans-id's - paired with
• the name of the program CICS loads and executes when the transaction is
• invoked.

PPT(Processing Program Table) - list of all valid programs, keeps track of which programs are located in storage, uses it to determine whether a new copy of a program needs to be loaded into storage.

File Control Table - used to keep track of which files are available to application programs

• After you code a mapset, you assemble it to produce a physical mapset and a symbolic mapset.
• The physical mapset is used by CICS to determine the location, appearance, and operation of data that’s displayed on a screen.
• The symbolic mapset is a COBOL copy member that allows you to manipulate the screen data in your COBOL program.

• DFHMSD: start the mapset
• DFHMDI:  to start each map
• DFHMDF to define each field with a map

L A C H D     F I O

• The attribute byte determines the location and characteristics of screen fields.
• An attribute byte takes up one position on the screen, but it’s displayed as a space.

A skip field is skipped over and causes the cursor to automatically advance to the next unprotected field.

• The attribute byte determines the location and characteristics of screen fields.
• An attribute byte takes up one position on the screen, but it’s displayed as a space.
• A field starts immediately following its attribute byte and ends immediately before the next field’s attribute byte.

The last bit in an attribute is called a Modified Data Tag(MDT). It indicates whether the user has keyed any data into the field.  Only those fields with MDT turned on, will be transmitted to the program.

Any line with an asterisk in column 1 and a blank in column 72 is treated as a comment line.

• * in the first column
• A comment line can NOT be placed between continuation lines and comment lines can NOT be continued.  You cannot have blank lines in the assembler program.

careful: don’t let asterisks appear in column 72

• To continue a literal onto a 2nd line:
• INITIAL=’THIS IS A LONG LINE AND NEEDS TO BE CONTINUED Ox
• NTO THE NEXT LINE IN COL 16’

IC

ASKIP

POS=(6,26)

ATTRB=(FSET,DRK,PROT)

YES generates a 12-byte FILLER item at the beginning of the symbolic map that the system uses to maintain control information.

FREEKB option of the CTRL parameter so the keyboard is unlocked when a map is sent to the terminal