TETAMFTPROIC1016
Infosys Certified Mainframe CICS Programmer
Practice with real exam-pattern questions for Infosys Certified Mainframe CICS Programmer. Each question includes a detailed explanation to help you understand the concept, not just memorise the answer. Try 10 questions free — no login required.
BeginnerMainframe60 min
Unlock everything
₹1,300/mo
Full question bank for this exam + 1,357+ others. Cancel anytime.
Join PremiumFree questions
10 Infosys Certified Mainframe CICS Programmer practice questions with answers
Real Lex exam-pattern multiple-choice questions for the Infosys Certified Mainframe CICS Programmer certification. Each question includes the correct answer. The full question bank is available to Premium members.
- Question 1
What is the content of the COMMAREA after the following RETURN is executed?
Assume that the code below is a successfully compiled code and T700 is the transaction ID for this program
WORKING-STORAGE SECTION.
01 WS-COMMAREA PIC X(10) VALUE IS "THINK BIG".
LINKAGE SECTION.
01 DFHCOMMAREA PIC X(3).
PROCEDURE DIVISION.
EXEC CICS RETURN
TRANID(T700)
COMMAREA(WS-COMMAREA)
END-EXEC.- ✓ ABEND occurs since the LENGTH is not mentioned in RETURN. Correct
- B THINK BIG
- C ABEND occurs since the DFHCOMMAREA size mentioned is smaller than required.
- D THI
- Question 2
Consider the following code snippet.
**************************************************
EXEC CICS READ
FILE (‘FILE1’)
INTO (WS-X)
LENGTH (WS-Y)
RIDFLD (WS-Z)
KEYLENGTH (WS-W)
END-EXEC.
**************************************************
Filename is FILE1.
RECORDSIZE is 80, KEYLENGTH is 1 and the record to be read has a key value of '6'.
What should be moved to the variables WS-X, WS-Y, WS-Z and WS-W before the READ is performed?- ✓
MOVE 80 TO WS-X
MOVE 1 TO WS-W
MOVE 6 TO WS-Y
MOVE ZEROS TO WS-Z Correct - B
MOVE 80 TO WS-Y
MOVE 1 TO WS-Z
MOVE 6 TO WS-W
MOVE LOW-VALUES TO WS-Z - C
MOVE 80 TO WS-Y
MOVE 1 TO WS-W
MOVE 6 TO WS-Z
MOVE LOW-VALUES TO WS-X - D MOVE 80 TO WS-W
- ✓
MOVE 80 TO WS-X
- Question 3
Consider the following code snippet.
MOVE +80 TO WS-A.
MOVE '10000' TO WS-B.
MOVE 5 TO WS-C.
EXEC CICS READ
FILE ('ABCD')
INTO (WS-D)
LENGTH (WS-A)
RIDFLD (WS-B)
KEYLENGTH (WS-C)
END-EXEC.
EXEC CICS DELETE
FILE('ABCD')
END-EXEC.
Assume that the record with key 10000 exists.
What is deleted when the program containing the above code is executed?- ✓ The entire file ABCD is deleted Correct
- B The record with key 10000 is deleted
- C The program throws an error
- D None of the options
- Question 4
Indicate whether the following statements refer to the (L) LINK command, the (X) XCTL command or (B) both commands.
1. Transfers control to a program at the same logical level.
2. The program issuing the command is released from memory.
3. Information can be passed to the new program using the COMMAREA operand.
4. Transfers control to a program one logical level below.- ✓ 1-B,2-B,3-X,4-L. Correct
- B 1-X,2-X,3-B,4-L.
- C 1-X,2-B,3-L,4-B.
- D 1-X,2-X,3-L,4-B.
- Question 5
MOVE LOW-VALUES TO WS-EMP-NO.
EXEC CICS STARTBR
DATASET ('FILE1')
RIDFLD(WS-EMP-NO)
END-EXEC.
The above CICS command (Assume that the above command is syntactically correct)- ✓ Gets the first record into your program from FILE1 Correct
- B Just opens FILE1
- C Opens FILE1 and gets the first record into your program from FILE1
- D Just positions file pointer in the beginning of FILE1
- Question 6
Assume TX1 is a transaction which invokes PGM1. Now PGM1 'LINKs' to PGM2 and PGM2 'XCTLs' to PGM3 and PGM3 'XCTLs' to PGM4. If PGM4 executes the below return command,
EXEC CICS
RETURN
END-EXEC.
then which of the following will happen?- ✓ Control will be transferred back to PGM1 Correct
- B Control will be transferred back to PGM2
- C Control will be transferred back to CICS
- D Control will be transferred to PGM3
- Question 7
Match the following CICS supplied transactions
(i) CEDF (a) Displays the contents of Temporary Storage Queue
(ii) CEMT (b) Provides interactive Debug execution facility
(iii) CECI (c) Manipulates CICS control environment interactively.
(iv) CEBR (d) Executes CICS commands- ✓ (i)---(b),(ii)---(c),(iii)---(d),(iv)---(a) Correct
- B (i)---(c),(ii)---(b),(iii)---(d),(iv)---(a)
- C (i)---(d),(ii)---(c),(iii)---(a),(iv)---(b)
- D (i)---(b),(ii)---(c),(iii)---(a),(iv)---(d)
- Question 8
PGMA, PGMB, PGMC, PGMD and PGME are the programs in a CICS application in which:
PGMA XCTLs to PGMB;
PGMB XCTLs to PGMC;
PGMC LINKs to PGMD and PGMD links to PGME.
Assume that PGMA is the first program to be invoked in the application. PGME is at what logical level?
Note: CICS is at logical level 0.- ✓ 3 Correct
- B 5
- C 4
- D 6
- Question 9
In CICS, a field named 'INPT' in a BMS map has the following ATTRB parameter.
ATTRB=(UNPROT,NORM,FSET)
Which of the following statement is TRUE about this field?- ✓ INPT is a field where the user can key in some data and it will be received by the program regardless of whether the user has modified it or not Correct
- B INPT is a field where the user can key in some data and it will be received by the program only when the user has modified it
- C INPT is a field where the user cannot key in any data and it will not be received by the program at all
- D INPT is a field where the user can key in some data but it will not be received by the program at all
- Question 10
Consider the following code snippet
A0000-MAIN-PARA.
EXEC CICS IGNORE CONDITION
MAPFAIL
END-EXEC.
MOVE DFHCOMMAREA TO WS-COMMAREA.
IF EIBCALEN = 0
MOVE LOW-VALUES TO ADDMAPO
PERFORM B000-SEND-INMAP-PARA
* MOVE 'FIRSTTIME' TO WS-COMMAREA
PERFORM B003-RETURN-PARA
ELSE
PERFORM B002-SEND-RECIEVE-MAP-PARA
EVALUATE EIBAID
WHEN DFHENTER
PERFORM BOO8-CALC-PARA
PERFORM B003-RETURN-PARA
WHEN DFHPF3
PERFORM BOO7-EXIT-PARA
WHEN DFHPF1
PERFORM BOO7-HELP-PARA
PERFORM B003-RETURN-PARA
What is the output of the above code snippet.
Note: MOVE 'FIRSTTIME' TO WS-COMMAREA is a comment. Assume there are no syntax errors in the above code snippet.- ✓ Program runs normally and gives the output Correct
- B Junk value gets moved to DFHCOMMAREA and code runs normally and gives the output
- C Nothing gets moved to DFHCOMMAREA and EIBCALEN will always be 0, so it does not compute the results
- D None of the options
Related
More in Mainframe
TETAMFTDNKIC1022Free preview
Infosys Certified Mainframe Batch Application Programmer
BeginnerMainframe
View exam · Try 10 freeTETAMFTDEVIC2026Free preview
Infosys Certified Mainframe REXX Automation Tools Developer
BeginnerMainframe
View exam · Try 10 freeTETAMFTPRFIC2025Free preview
Infosys Certified Mainframe Rehosting Professional
IntermediateMainframe
View exam · Try 10 freePricing
Pay once. Clear every cert this year.
One subscription, full Telegram channel access, every PDF posted during your membership.
Monthly
50% OFF₹1,300₹2,600
Per month · cancel anytime
- Full access to all 1,357+ certifications
- Monthly updated question banks
- Telegram private channel access
- Cancel anytime
POPULAR
Quarterly
44% OFF₹1,800₹3,200
That's ₹600/mo · billed for 3 months
- Everything in Monthly
- Save ₹2,100 vs monthly billing
- Priority answer key requests
- Best for increasing DQ score fast
BEST VALUE
Lifetime
52% OFF₹2,400₹5,000
One-time · lifetime access
- Everything in Quarterly
- Lifetime channel access — no renewals
- All future certifications included
- Priority response from admin team
FAQ
Common questions, straight answers.
A monthly-updated Telegram channel where we post real exam-pattern question banks and detailed answer keys for 1,357+ Infosys Lex certifications. You join once, you get every PDF posted during your membership.
Right after payment on our Graphy page, you'll receive a private invite link to the Telegram channel. Access is instant — usually under 30 seconds.
We compile question banks from the actual Lex test pattern, sourced and verified by 180K+ community members who've recently cleared these exams. Match rate is consistently 85–95%.
Every single month. When Infosys rolls out new versions of certifications, we post updated dumps within 7–10 days. You'll see channel activity weekly.
Clearing certifications is one of the highest-weighted DQ factors. Members typically clear 3–5 certifications in their first 3 months, which moves DQ scores up by a full band.