I have PCB with structure: PCB TYPE=DB, C DBDNAME=EMPCADBD, C KEYLEN=18, C PROCOPT=LS SENSEG NAME=EMPLOYEE, C PARENT=0 SENSEG NAME=COMPDTL, C PARENT=EMPLOYEE SENSEG NAME=BANKDTL, C PARENT=COMPDTL SENSEG NAME=SALDTLS, C PARENT=BANKDTL SENSEG NAME=EDUCDATA, C PARENT=EMPLOYEE SENSEG NAME=EMERDETL, C PARENT=EDUCDATA SENSEG NAME=ADDRESS, C PARENT=EMPLOYEE ************************************************************ *********** PSBGEN PSBNAME=PSBCALDP,LANG=COBOL END Requirement is to Create a report based on Salary brackets. ( Use SSA’s for logic) · It should have CTCGROSS brackets and No of employees o Employee names falling in each bracket Salary < 100,000 No of Employees Employee-Name Level 100,000 < Salary < 300,000 No of Employees Employee-Name Level 300,000 < Salary No of Employees Employee-Name Level1 4247
how to create a changeman read only audit and update only audit Specifications for the Read only Audit 1) Read HFFD database unqualified. 2) Read FDRT, FDDM, FDAP segments. If FDAP-APP-STS is ‘2’ read the FDAV segment and get the FDAV segment which has FDAV-APV-OPTION as ‘X’ If FDAP-APP-STS is ‘5’ read the HFAC database. Read the ACRT segment qualified based on the key obtained from the FDAP segment from HFFD database. Conditions for writing into output file: a. App Type should be NEWR b. App Status should be 1, 2 & 5. c. Write 50 records per app status. For e.g. first 50 records for App status 1, 2 & 5 each The output file should contain the following fields from the database FDRT-COMP-CTRY-CODE X(03). FDRT-CUST-ID-NUM X(10) FDDM-DEM-SEQ-NUM X(01) FDAP-APP-SEQ X(02) FDAP-JNT-IND X(01) FDAP-APP-STS X(01) FDAV-APV-OPTION X(01) FDAV-APV-DT X(06) FDAV-APV-AMT X(07) ACRT-ACCT-NUM X(06) ACRT-SEG-BUS-TYPE X(02) ACRT-NM1-LAST X(19) ACRT-NM1-SS X(09) ACRT-NM1-1ST X(12) ACRT-NM1-INIT X(01) ACRT-NM1-SFX X(03) ACRT-NM1-TITLE X(02) PSB – DVAN2BMP In case you get a GE for any of the conditions, write to output file along with the details of the database segment which was not found. We need to complete this whole process by tomorrow. Run the audit in DLI mode. 2) Sort the output file created in step 1 on Cust ID, Dem Seq & App Seq. Specifications for the Update Audit 3) Take the output of step 2 as input for an update audit. Details are as follows: Read each record & check the app status. If app status is less than 2 then update the FDAP-NEW- MONEY-ENT to $25000.00 PSB - AUDBMPJ The job would be a BMP job. The test job would be run in IMSE region. Note - The proc (which will be called by the job) and the job should also be present in the change-man package itself. You’ll have a test job in your PDS along with overrides to execute the program in test regions. The job would be a DLI job. The test job would be run in IMSE region. It’ll have the following steps. 1) Delete-define output and error files. 2) Use a copybook for the output layout.2698
Hi all..., Nowadays many of the companies asking for IMS/DB , actually i hav learned mainframes but i dont have any knowledge on IMS/DB. it will be a great help if any one suggest me whr i can learn it ( in any institute).1 5195
Looking for mainframes IMS DB training @ 99125988823 4839
This question regarding Checkpoint. Suppose my program has checkpoint for every 100 records. If my program abends at 120 records, what will happen. I know first 100 records are committed and rest of 20 records where they gone and where they are stored.1 8010
can u tell me and give me an example : how to code a program checkpoint , restart, and tell me when and where i have to run 2 programs...Thanks1 11277
How to write the PCB code ? if in thic PCB i have 3 PSB ?4 7741
Can we give the GSAM-PCB in between the DB-PCB'S like below? I/O-PCB DB-PCB1 GSAM-PCB1 GSAM-PCB2 DB-PCB2
I am totally confused on IMS message segments. When I create a message and it contains 5 segments does the entire message have a 32k limit or does each segment have a 32k limit? Is there a setting in the stage1 sys gen that defines if a transaction can receive/send multi-segmented messages?1849
how do you bind the cobol with db21784
Explain dbdgen process?
Explain psbgen process?
What are the retrieval sequences in ims db?
What is ims (db/dc)?
Explain the maximum number of pcbs allowed in a psb?
Explain ims software environment?
My IMS main progam is calling Db2 subroutine ...Its giving - 923 db2 sql code..so could any one tell how to solve this issue.
Can we use procopt on pcb and segment field (senseg)?
What is the need for a secondary index in ims?
how do you bind the cobol with db2
What is psb?
What is the need of a secondary index in IMS?
Which languages does ims support / application program languages?