EIBRESP 53

When you are getting EIBRESP =13 for any action on given resource means you are referring a resource which is defined in remote region and you don't have remote entry in your local region.

Resolution - Create remote entry for given resource in local region.

RLCP abend in mainframe

RLCP abend indicates that the transaction exceeded the resource threshold. Here for RLCP resource is CPU utilization which is exceeded.

RC 84 in mainframe.

RC 84 - Check if the file is in close disable state.
Open enable the file in order to resolve the abend.

AEI0 abend in CICS

AEI0 abend in CICS
This abend occurs during CICS LINK execution due to wrong input parameter for link.
E.g. AEI0 abend with PGMIDERR
This indicates wrong program id/name.

S04E abend during DB2 load replace.

S04E abend during DB2 load replace.

S04E abend will occur during load replace if the db2 resource is not available.

Solution - If the job to load replace abends with S04E then make sure that the resource is available.
Resubmit the job once the resource is available.

DB2 SQLCODE -305

Mainframe db2 SQLCODE -305

Null indicator is missing in given SQL query. Given query is returning a NULL value.

Solution :- Handle the null indicator while retrieving the data using SQL query.

AD2U abend in CICS. THREADERROR 906

AD2U abend in CICS OR THREADERROR 906

AD2U abend occurs when DB2 thread creation fails.

Resolution:-
Check the SQLCODE associated with the abend.
THREADERROR 906 is the common SQLCODE with AD2U. Application may return the different SQLCODE,
SQLCODE 922 indicates the authorization error - i.e. given user does't have authorization on given plan in given region.

So verify your plan, its access and also verify the RCT entries for application's transaction for given plan.

What is -818 SQLCODE & how to resolve it?

-818 SQLCODE

Time-stamp mismatch between PLAN and load module.
Solution - Rebind the given component.

-911 SQLCODE

-911 SQLCODE

Deadlock.
Given task will go in deadlock, when resource is not available for long time.

-904 SQLCODE

-904 SQLCODE

Resource not available.
db2 SQL query will throw this error while db2 resource is not available.
Solution - Delay the given query and retry for the operation.

-803 SQLCODE

-803 SQLCODE

Duplicate record while INSERT.
db2 SQL query will throw this error while inserting duplicate record into db2 table.

How to resolve -805 SQLCODE in db2?

How to resolve -805 SQLCODE in db2?

This sqlcode code indicates than DBRM not found. DBRM/package not found in given Plan
Solution - Bind the corresponding component.

S878 abend in JCL.

S878 abend in JCL.

Cause - This abend occurs due to not enough virtual private storage space available.
Solution - Increas the region space in job card.

ASRA abend in CICS program.

*What is ASRA abend in CICS program?

ASRA abend - This abend occurs due to program interruption.

*How to resolve ASRA abend in CICS program?

Most of the time this abend occurs due to SOC7 conditions, where non numeric value is moved in numeric variable.

SqlCode 92J in db2 cobol program.

SqlCode 92J in db2 cobol program.

-92J - authorization failure with DB2 connection.
In order to resolve this issue, given userid should have access to given db2 Plan under given db2 schema.

String handling in REXX program.

String handling in REXX.

In REXX programs, we can handle the string using inbuilt functions

1) LENGTH - It gives the length of given string.
Sample Program -

/*REXX*/
A = 'REXX'
B = LENGTH(A)
SAY 'Length of A is =' B

Console output -
Length of A is =4

2) WORD - It gives the number of words in the given string.
Sample Program -

/*REXX*/

X = 'Use of  String function in REXX'
Y = LENGTH(X)
SAY 'No of words in X are =' Y

Console output -
'No of words in X are =6

Use of switching logic in REXX program.

Use of switching logic in REXX program.

In REXX program, we can add switch logic in order perform respective task.

Sample Program -

/*REXX*/
SAY 'Your Marks'
PULL A
SELECT
  WHEN A < 40
     SAY 'You are FAIL' 
  WHEN A > 40
     SAY 'You are PASS'
  OTHERWISE
     SAY 'Please enter the correct marks'
END

SELECT - It works like SWITCH.

Output Console -
50
You are PASS

How to use loop in REXX program?

How to use loop in REXX program?

In REXX programs, we can add the logic for loops with the help of DO statement.

Sample Program -

Use of IF ELSE statement in REXX.

Use of IF-ELSE statement in REXX.

Lets see how to use the IF-ELSE statement in REXX,

/*REXX*/
A = 10
B = 12
IF A > B THEN
    SAY 'A is greater than B'
ELSE
    SAY 'B is greater than A'

How to execute REXX program in mainframe?

How to execute REXX program in mainframe?

REXX program can be executed by two way,

1) EX command -
Use the command "EX" in front of the member of PDS having REXX program.

2) TSO "<REXX_PROGRAM_NAME>" -
In order to run the REXX program like TSO utility/command,
    i) Add your REXX program member to CLIST dataset
    (In many this library is "<your_id>.A.CLIST")
    ii) Then us the command TSO "<program_name>"