The IDMS Account Code Derivation Exit is a user-written SAS
routine invoked for each transaction processed. The object
of the account code derivation routine is to build the data
elements IDMACT1 to IDMACT9 (as many as have been defined in
IDMACCT) from the data made available in the IDMS transaction
input data. For example, if the IDMACCT member in the
sharedprefix.MICS.PARMS library defines four account code
levels, the user routine builds the data values of those four
codes for each transaction processed.
The account code derivation routine makes available for use
each of the data elements in the IDMS User Activity File
(IDMSUA) and the IDMS Application Unit Counts File (IDMSAC).
The names of the elements begin with SSW since the data are
first read into a common work file. For example, SUAPGM
would be referenced as SSWPGM. For your convenience, the
list below includes most of the elements that you should need
to construct the account code, IDMACTn, and application unit,
IDMAPU, data elements:
Elements that are 4 characters:
SSWCTRN1 - CICS LRE Local ID1
SSWCTRN2 - CICS LRE Local ID2
SSWIVER - IDMS Version
Elements that are 7 characters:
SSWOPSYS - Operating System
Elements that are 8 characters:
SSWJOB - Batch/CICS Job Name
SSWPGM - Batch/CICS/DC Program Name
SSWTERM - CICS/DC Terminal Name
SSWPTERM - Physical Terminal Name
SSWCTRNC - CICS Transaction Code
SSWOPRID - CICS Operator ID
SSWDCTSK - DC Task Code
Elements that are 9 characters:
SSWPTYP - Program Type
Elements that are 12 characters:
SSWDCBGP - DC Billing Group
Elements that are 30 characters:
SSWBAF1 - Batch Accounting Field 1
SSWBAF2 - Batch Accounting Field 2
SSWBAF3 - Batch Accounting Field 3
SSWBAF4 - Batch Accounting Field 4
SSWBAF5 - Batch Accounting Field 5
Elements that are 32 characters:
SSWDCUSR - DC User ID
The CA MICS Analyzer for CA-IDMS provides the following
sample account code derivation routine to help verify the
accuracy of the user modification to the routine. Do not use
the sample account codes without first verifying their
compatibility with your data center's needs and other
installed CA MICS components. The complexity of the
algorithm varies for each installation.
The sample account code derivation routine supplied with the
component sets IDMACT1 equal to the billing group for IDMS/DC
online tasks and to a constant for other types of tasks. The
exit sets IDMACT2 equal to program name and IDMACT3 to
program type for all IDMS tasks. The sample exit code can be
found in sharedprefix.MICS.PARMS(IDMACRT) and is shown below:
IF IDMTYPE = 'O' THEN IDMACT1 = SSWDCBGP;
ELSE IDMACT1 = '************';
IDMACT2 = SSWPGM;
IDMACT3 = SSWPTYP;
The worksheet for structuring the IDMS Account Code
Derivation Routine is shown in Figure 7-2.
+--------------------------------------------------------------------------+ | INSTALLATION PREPARATION WORKSHEET: IDMS Account Code Routine Definition | | | | PARMS Library Member is IDMACRT | | Reference Sections: 7.2.3 CA MICS Analyzer for CA-IDMS Guide | +--------------------------------------------------------------------------+ | | | * VALIDATE FOR VALID ACCOUNT CODES, WHERE POSSIBLE ; | | | | IF { account data is valid } THEN DO; | | | | * BUILD ACCOUNT CODE FIELDS AS IN THE WORKSHEET 7-2 | | | | IDMACT1=field source 1 ; | | IDMACTn=field source n ; | | ____________________________________________________________________ | | ____________________________________________________________________ | | ____________________________________________________________________ | | ____________________________________________________________________ | | ____________________________________________________________________ | | ____________________________________________________________________ | | ____________________________________________________________________ | | | | END; | | ELSE DO; | | | | * ROUTINE TO BUILD INSTALLATION OVERHEAD ACCOUNT CODES ; | | | | IDMACT1='overhead category' ; | | IDMACTn='overhead category' ; | | ____________________________________________________________________ | | ____________________________________________________________________ | | ____________________________________________________________________ | | ____________________________________________________________________ | | ____________________________________________________________________ | | ____________________________________________________________________ | | | | END; | | | +--------------------------------------------------------------------------+ | ....5...10...15...20...25...30...35...40...45...50...55...60...65...70.. | +--------------------------------------------------------------------------+
Figure 7-2. IDMS Account Code Routine Definition Worksheet
| Copyright © 2012 CA. All rights reserved. | Tell Technical Publications how we can improve this information |