Monday, May 3, 2010

CICS ABEND CODES


Murach's CICS Desk Reference
by Raul Menendez and Doug Lowe
Murach © 2002 Citation


  1. Most of the abend codes that occur most often fall into two categories: exceptional condition abends and program check abends.
  2. An exceptional condition abend occurs when a CICS command encounters an unusual situation and the RESP option was not included.
  3. These abend codes starts with AEI OR AEY indicates they are exceptional conditions.
  4. Program Check abend: When a program tries to do operations whch are not allowed by HARDWARE. This results in ASRA abend.
  5. AEIV - Length Error
  6. AEI0 - PGMID Error & AEIO - Duprec
  7. AEI9 - MAP FAIL
  8. AEIZ - Item Error

For an ASRA abend, the Program Status Word (PSW) in the storage dump contains a one-byte code identifying the type of program check.

  • ABM0: The specified map isn’t in the mapset. The map name is misspelled either in the program or in the mapset, or the program specifies the wrong mapset.
  • APCT: The program could not be found or is disabled.

Friday, April 30, 2010

File-AID/MVS

File-AID/MVS has the scope and flexibility to let users customize data
to match their needs, while providing exceptional dependability to handle potentially costly problems with production data.

copy records that meet specifi ed conditions.
add a new field to the target fi le and initialize it.
reorganize fi elds in a fi le by defi ning a new structure for the target file.
validate fi elds from the source fi le and copy only valid records.

File-AID/MVS lets you access multiple record layouts within an XREF

XREF:

Step1: Open FILE-AID primary option menu. Type in option '7'
Below Screen Will be shown to you.
Step2: Allocate a PDS of your own eg: HLQ.XREF.DSN. Put the member name (XREFEMCU)
FILE-AID will create selection criteria logic
Step3: Mention the Dataset name which contain the copybooks with which you can view
your multiple record layout dataset eg: HLQ.Copybook (This the library)

File-AID -------------- Record Layout Cross Reference -----------------------
COMMAND ===>

Specify Cross Reference Dataset to be Created or Edited:
XREF dataset name ===>
Member name ===>

Specify Record Layout Information:
Record layout dataset ===>

Step4: Press Enter After Step3. Following screen will appear.

File-AID ----- Define XREF ------------------------------------ Row 1 to 2 of 2
COMMAND ===> SCROLL ===> PAGE

Member list description ===> ______________________________

Long ===> ______________________________________________________________
Description ===> ______________________________________________________________

Generated filler length ===> 0 (0 to suppress filler)

Cmd Member Beginning Data Name Description Status
--- ---------- ------------------------------ --------------- ----------------
___ EMP EMP-REC DEFAULT BASE
___ CUST CUST-REC DEFAULT BASE
************************** END OF SELECTION CRITERIA **************************

Step5: In the above screen type in 's' command against each copybook name one by one.
press Enter. The following screen will appear.

File-AID --- Formatted XREF Definition ----------------------------------------
COMMAND ===> SCROLL ===> CSR
SET 1 OF 1 :TAG:-DATA LAYOUT LENGTH: 566
---- FIELD LEVEL/NAME ------- -FORMAT- RO ----+----1----+----2----+----3----+--
******************************* TOP OF DATA ***********************************
5 emp-org 8/AN EQ MAFATLAL
5 emp-name 11/AN
5 emp-sala 5/SNUM

Step6: You need to apply the Formatted XREF Definition for CUST copybook. Then Press PF3.

Then go to "browse/edit" option mode FILE-AID primary option menu.
Browse Mode ===> C (F=Fmt; C=Char; V=Vfmt; U=Unfmt)

Specify Browse Information:
Dataset name or HFS path ===>
Member name ===> (Blank or pattern for member list)
Volume serial ===> (If dataset is not cataloged)
I/O exit name ===> (User written I/O program)

Specify Record Layout and XREF Information:
Record layout usage ===> X (S = Single; X = XREF; N = None)
Record layout dataset ===> 'HLQ.COPYLIB'
Member name ===> (Blank or pattern for member list)
XREF dataset name ===> 'HLQ.XREF'
Member name ===> XREFEMCU (Blank or pattern for member list)

Specify Selection Criteria Information: (E = Existing; T = Temporary;
Selection criteria usage ===> T M = Modify; Q = Quick; N = None)
Selection dataset name ===>
Member name ===> (Blank or pattern for member list)

Step7: Press Enter

File-AID - Selection Criteria Menu - TEMPORARY --------------------------------
OPTION ===> 2
- Status -
1 OPTIONS - Enter selection criteria options default
G GLOBAL - GLOBAL Fields 0 fields
2 FORMATTED - Edit formatted selection criteria 0 sets
3 UNFORMATTED - Edit unformatted selection criteria 0 sets


Member list description ===> ______________________________

Long ===> ______________________________________________________________
Description ===> ______________________________________________________________






Use VIEW command to display selection criteria summary
Use SAVE command to write selection criteria request
Use END to continue processing
Use CANCEL to return to main panel

Step8:
Select the record layout. Type "s" against the member name.


File-AID ----- Define XREF ------------------------------------ Row 1 to 2 of 2
COMMAND ===> SCROLL ===> PAGE

Member list description ===> ______________________________

Long ===> ______________________________________________________________
Description ===> ______________________________________________________________

Generated filler length ===> 0 (0 to suppress filler)

Cmd Member Beginning Data Name Description Status
--- ---------- ------------------------------ --------------- ----------------
_s__ EMP EMP-REC BASE
___ CUST CUST-REC BASE
************************** END OF SELECTION CRITERIA **************************

Press F3 Three times. You will get the desired records as per the selection.

Tuesday, July 21, 2009

get helped

Hi to all,
This is a forum for the people who are working in Mainframe technology.
Helpourselves blog should elicit our inner talent and help each other. This should expand horizantally and vertically. That is my wish.