⌘K
Press Enter to open chat
Module

Credit Authorization (IMS/DB2/MQ)

Handles credit authorizations using IMS DB, DB2, and MQ. This is a module for CardDemo Application

Programs

  • CBPAUP0C.cbl: IMS DB2 Account AuthorizationReads IMS control libraries to authorize accounts within the DB2 environment.
    View
  • COPAUA0C.cbl: CP00 Authorization MQ Account Extract ReaderReads account and customer data from IMS and DB2, processing CP00 credit authorizations by extracting data for MQ processing.
    View
  • COPAUS0C.cbl: Credit Authorizations CPVS Transaction ReaderReads account and card xref data to process Credit Authorizations for CPVS transactions.
    View
  • COPAUS1C.cbl: CPVD Authorization IMS/DB2/MQ HandlerProcesses CPVD transactions within the Credit Authorizations module, interacting with IMS, DB2, and MQ for data management and communication.
    View
  • COPAUS2C.cbl: CPVD Authorization IMS ReaderReads CPVD authorization transactions from IMS for processing.
    View
  • DBUNLDGS.cbl: GSAM Root/Child Dataset UnloaderUnloads data from the GSAM root and child datasets, likely for backup or analysis.
    View
  • PAUDBLOD.cbl: Authorization DB2 LoaderLoads authorization data from DB2 files into child and root file records.
    View
  • PAUDBUNL.cbl: Authorization DB2 File LoaderLoads authorization data into DB2 child and root files from IMS.
    View

Jobs

  • CBPAUP0J.jcl: CBPAUP0JThis batch job performs credit authorization processing using IMS, DB2, and MQ. It reads various IMS and load libraries, processes an authorization application, and likely produces authorization decisions or logs. The primary execution involves the CBPAUP0C COBOL program run via the DFSRRC00 utility.
    View
  • DBPAUTP0.jcl: DBPAUTP0This batch job processes credit authorizations using IMS/DB2/MQ. It reads from and updates the IMSDATA.DBPAUTP0 dataset, utilizing utilities like DFSRRC00 and DFSURGU0 for data manipulation and loads from various IMS system libraries.
    View
  • LOADPADB.jcl: LOADPADBThis job loads credit authorization data, interacting with IMS DB2 and MQ. It reads from various datasets, including PAUTDB files, and updates GSAM files for both child and root PAUTDB datasets. The primary load program is PAUDBLOD, executed using the DFSRRC00 utility.
    View
  • UNLDGSAM.jcl: UNLDGSAMThis job unloads data related to credit authorizations, interacting with IMS and DB2 databases. It reads various IMS and load libraries, and updates GSAM datasets for both root and child records. The core process is executed by the DBUNLDGS.CBL program using the DFSRRC00 utility.
    View
  • UNLDPADB.jcl: UNLDPADBThis job performs credit authorization processing using IMS/DB2/MQ. It reads from various IMS and load libraries, and writes to and updates authorization database files. The core logic is executed by the PAUDBUNL.CBL program, utilizing the DFSRRC00 utility.
    View

Copybooks

  • CCPAUERY.cpy: IMS DB2 MQ Authorization Error Log Record (Copybook)Defines the structure for logging authorization errors encountered during IMS DB2 MQ processing, including timestamps, application, program, and location details.
    View
  • CCPAURLY.cpy: Credit Authorization Fields (Copybook)Defines key fields for credit authorization transactions, including card number, transaction ID, and authorization response codes.
    View
  • CCPAURQY.cpy: Credit Authorization DB2 Loader (Copybook)This copybook defines fields for credit authorization requests, including dates, times, card numbers, and message types, intended for loading into a DB2 database.
    View
  • CIPAUDTY.cpy: Authorization Audit Record (Copybook)Defines the structure for authorization audit records, including key identifiers, dates, and card numbers.
    View
  • CIPAUSMY.cpy: Credit Authorization IMS/DB2/MQ CopybookDefines fields for credit authorization data, including account, customer, and status information, used across IMS, DB2, and MQ systems.
    View
  • IMSFUNCS.cpy: Authorization IMS/DB2/MQ Field Definitions (Copybook)This copybook defines fields used for Credit Authorizations, including function codes and various IMS database access operations.
    View
  • PADFLPCB.cpy: IMS DB2 MQ Authorization PCB Status (Copybook)This copybook defines fields related to the Program Communication Block (PCB) status for IMS DB2 MQ Credit Authorizations.
    View
  • PASFLPCB.cpy: Credit Authorization DB2 IMS PCB Definitions (Copybook)Copybook defining fields for the Program Control Block (PCB) related to Credit Authorizations processing through IMS and DB2.
    View
  • PAUTBPCB.cpy: IMS DB2 MQ Credit Authorization PCB (Copybook)Defines fields for the IMS DB2 MQ Credit Authorization Program Control Block (PCB), including status and processing options.
    View

Data Definitions

  • AUTHFRDS.ddl: IMS/DB2/MQ Credit AuthorizationsDDL script defining tables and structures for credit authorization processing within the IMS/DB2/MQ environment.
    View
  • XAUTHFRD.ddl: IMS/DB2/MQ AuthorizationData Definition Language file for the Credit Authorizations module, specifying structures for IMS, DB2, and MQ interactions.
    View

Datasets

  • DBPAUTP0.jcl: AWS.M2.CARDDEMO.IMSDATA.DBPAUTP0
    View
  • DBPAUTP0.jcl: AWS.M2.CARDDEMO.LOADLIB
    View
  • LOADPADB.jcl: AWS.M2.CARDDEMO.PAUTDB.CHILD.FILEO
    View
  • UNLDGSAM.jcl: AWS.M2.CARDDEMO.PAUTDB.CHILD.GSAM
    View
  • LOADPADB.jcl: AWS.M2.CARDDEMO.PAUTDB.ROOT.FILEO
    View
  • UNLDGSAM.jcl: AWS.M2.CARDDEMO.PAUTDB.ROOT.GSAM
    View
  • CBPAUP0J.jcl: IMS.DBDLIB
    View
  • CBPAUP0J.jcl: IMS.PROCLIB
    View
  • CBPAUP0J.jcl: IMS.PSBLIB
    View
  • CBPAUP0J.jcl: IMS.SDFSRESL
    View
  • PAUDBLOD.cbl: INFILE1
    View
  • PAUDBLOD.cbl: INFILE2
    View
  • DBPAUTP0.jcl: OEM.IMS.IMSP.DBDLIB
    View
  • DBPAUTP0.jcl: OEM.IMS.IMSP.PAUTHDB
    View
  • DBPAUTP0.jcl: OEM.IMS.IMSP.PAUTHDBX
    View
  • DBPAUTP0.jcl: OEM.IMS.IMSP.PSBLIB
    View
  • DBPAUTP0.jcl: OEM.IMS.IMSP.RECON1
    View
  • DBPAUTP0.jcl: OEM.IMS.IMSP.RECON2
    View
  • DBPAUTP0.jcl: OEM.IMS.IMSP.RECON3
    View
  • DBPAUTP0.jcl: OEMA.IMS.IMSP.SDFSRESL
    View
  • LOADPADB.jcl: OEMA.IMS.IMSP.SDFSRESL.V151
    View
  • DBPAUTP0.jcl: OEMPP.IMS.V15R01MB.PROCLIB
    View
  • PAUDBUNL.cbl: OUTFIL1
    View
  • PAUDBUNL.cbl: OUTFIL2
    View
  • COPAUA0C.cbl: WS-ACCTFILENAME
    View
  • COPAUS0C.cbl: WS-CARDXREFNAME-ACCT-PATH
    View
  • COPAUA0C.cbl: WS-CCXREF-FILE
    View
  • COPAUA0C.cbl: WS-CUSTFILENAME
    View
  • CBPAUP0J.jcl: XXXXXXXX.PROD.LOADLIB
    View
  • CBPAUP0J.jcl: instream:CBPAUP0J:STEP01:SYSIN
    View
  • DBPAUTP0.jcl: instream:DBPAUTP0:UNLOAD:DFSCTL
    View

Services

  • DB2This module interacts with DB2 by reading and writing to the CARDDEMO.AUTHFRDS table via programs like COPAUS2C to process credit authorizations.
  • IMSThis module interacts with IMS databases, specifically DBPAUTP0, for credit authorization processing, utilizing DB2 and MQ.
  • MQThe module interacts with MQ using two queues, enabling both sending (put1) and receiving (get) of credit authorization messages.
  • CICSThis module interacts with CICS to process credit authorizations via transactions CP00, CPVD, and CPVS, likely involving programs like COPAUA0C.

Utilities

  • DBUNLDGS.cbl: CBLTDLI
    View
  • CBPAUP0J.jcl: DFSRRC00
    View
  • DBPAUTP0.jcl: DFSURGU0
    View
  • COPAUA0C.cbl: MQCLOSE
    View
  • COPAUA0C.cbl: MQGET
    View
  • COPAUA0C.cbl: MQOPEN
    View
  • COPAUA0C.cbl: MQPUT1
    View

Sibling Modules

Account Extracts (MQ/VSAM)

Provides optional account extraction services using MQ and VSAM for data retrieval.

Programs6Datasets2Tagscards, lending, lending-credit
View

CardDemo Core

The CardDemo Core module provides foundational CICS/VSAM application components and shared artifacts for card management.

Programs75Datasets182Tagslarge, data-heavy, auxiliary
View

JCL Utilities

Provides utility JCL, control jobs, and supporting procedures for VSAM dataset management.

Programs3Datasets10Tagscards, card-management
View

DB2 Transaction Types

Manages DB2 transaction types, integrating with CICS and supporting optional maintenance.

Programs17Datasets20
View