how to change pic of variables declared in copy book inside progrm?

how to change picture class of copy book variable inside program?

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.

Cap Gemini,

How to insert values for variables that are declared as COMP-3 variables in COBOL program in an already created VSAM file.

What will happen if a variable is declared as below.. Explain with an example? Working storage section:- 01 WS-VARX PIC X(9) VALUE SPACES. 01 WS-VARN REDEFINES WS-VARX PIC 9(9).

If there are a set of statements and each has a word "value" in it, If I want to display all these statements so that the word "value" is aligned, then how do I code this in REXX. e.g - The value of X is Y. Wot is its value? Do u know its value? I want to know its value.

I have a table which has thousand of records i want to fetch only record num 100 to record num 200. Write a query that satisfies this criteria.(Cant use any keys) Anyone please reply ASAP!

KNIT, Tech Mahindra,

In a single step if input file is present then only need to copy into output file or else need to through a RC is it possible. Note : i want it in a single step

Hi, My dataset have multiple records, say 100. I want to start copy records only after a record contain a specific value that may be in a specific position. Secondly I want to stop copying rest records if certain record contains a specific value. Can it be done using SORT/ICETOOL utilities?

Patni,

if we give TIME=0 how many sec that job/step

what is the difference between read and find ?

IBM,

Types Of Read , FIND

difference between fetch , call and callnat

IBM,

control variable in online screens

Mind Tree,

ADABAS basic concepts. Like inverted list, address converter ,data storage

IBM,