Question { IBM, 6912 }

What are the 3 common ways to create maps?

Answer

The 3 common ways to create MAPs are as below,

1> The 1'st way is to use MAP generator such as SDF(Screen
Defination Facility.

2> The 2'nd way is using BMF facility in which create a
Physical MAP along with a matching Symbolic MAP is to code
only the Physical MAP using the &SYSPRAM option in code,
CICS will automatically create a member in a COPY library.

3> The 3'rd way is to code a Physical MAP and then code a
matching Symbolic MAP in your COBOL program.

these are the most common ways to create maps.

Question { Syntel, 20260 }

What is "Call by content" and "call by reference"?

Answer

'Call by Content' means value of the variable is passed to
the subprogram and after modification on this variable in
sub-program will not effected in main program.

'Call by Address' is opposite to above. Here address of the
variable is pass to the sub-program at the time of call and
modification on this passed variable in sub-prog will be
effected in main program.

Question { 16436 }

which is better comp or comp-3 in terms of memory
utilization?

Answer

COMP is better that COMP-3 in terms of memory utilization.

check out below examples.

COMP COMP-3
(in bytes) (in bytes)


S9(04) 2 3
S9(08) 4 5
S9(09) 4 5
S9(10) 8 6
S9(11) 8 6
S9(12) 8 7
S9(13) 8 7
S9(14) 8 8

hope it is useful.

Question { RBS, 11450 }

I have the file which is having the extension no as records.
sample file will look like below.

2310
3410
3256
4350
3781
5408

I need to replace the record which is starting with 3 to 5
(i.e) 3410 to 5410. How can we do it through cobol

and cobol-db2 program? I need the possible logic?

Answer

You can solve this problem using the Referencial Intigrity.

Let consider these extension no. in WS section.
01 WS-EXTN PIC X(4).

IF WS-EXTN(1,1)='3'
ISPECT WS-EXTN replacng first '3' by '5'
END-IF.

read the next record.

Question { iGate, 20134 }

how do you resolve for soc7 error

Answer

SOC7 abend occure due to the data exception or mostly due
to moving of non-numric data into numric data field.

we can resolve this correcting the data format.

Question { Accenture, 12306 }

I have a PDS and want to omit few rows of all members of a
PDS. How to do it?

Answer

as a know, we are not storing the data records in members
of PDS.

Records are mostly stored in PS or VSAM file.

Then how come u r going to ask such question?

Question { Xansa, 11820 }

At which situation we need to use the push and pop
conditions...pls tell me with exampls.

Answer

If one programe call the any subprogram within it. Then in
SUB program we use PUSH command to sustained all the Handle
conditions of main program, and before the control giving
back to main program we use POP command to reactivate all
the sustained Handle conditions of Main program.

Use of PUSH and POP conditions is to sustained all the
Handle error conditions in Subprog.

Exaples :- Prog A

EXEC SEND....END-EXEC
EXEC HANDLE LENGERR(LABEL1)...
EXEC RECIVE..END EXEC.

CALL PROG B
EXEC SEND....END-EXEC


Prog B
EXEC PUSH
EXEC HANDLE
EXEC POP
EXEC SEND ..
EXEC RETRUN.

in the above exp, when the control comes to at prog B then
all the HANDLES error condtions of Prog A in sustained
using PUSH condition and before control giving back to prog
A all the sustaineded handle error conditons are activated
using the POP condition.

Question { Verizon, 10257 }

What error I will get if my select query gives multiple
row while executing a Cobol-DB2 program.How can I solve it
without using a cursor.

Answer

u will get -811 error code.

this will b solve in different way. first u have to find
out y this error comes.
exmple :-
If u r selecting the address of the emp with help of
Name key, then may b same name contain 2 different address,
as per the business need, it may contain 1 defualt address
and other is alternet address.
So as per the business need find out that which address
u want to select, and as per this need u can use one flag
veriable to differentiate these 2 address. make the change
as per above in ur table. with the help of solution u can
solve the above problem without using the cursor.