In a Natural program i used the below code for report FORMAT LS=132 PS=60 And down the line I want to change either LS/PS like FORMAT LS=120 PS=50, is it possible? How it will work?
1944I want to JCL sort for Non-COMP and COMP-3 fields SORT FIELDS=(1,5,A,6,11,A,12,11,A,19,1,A,20,1,A),FORMAT=BI,EQUALS Length of comp bytes is 11 bytes which start at 6byte and 12 byte considering 11 bytes in comp-3 is 6 bytes. Can anyone tell if the above sort work SORT FIELDS=(1,5,A,6,6,A,12,6,A,19,1,A,20,1,A),FORMAT=BI,EQUALS does not works OK
IBM,
1953Could you please let me no the query for below I have table name xyx under this there is column name called employee name which starts from 100th column ends 120th column,now i want to replace only column from 101 to 104 which contains ABCS to replace with PQRS for all records which comes beetween 101 to 104 ..how to write query for this..
HSBC,
1 3686Why do we use COMP-3 variables for computation, when we know that they are non displayable fields and require additional MOVE to numeric field before we populate it in output Reports?
1 6796have 3 tables table1, table2 and table3 which contains employee information. table1 is master table, table2 contains emp details like emp no and so on, table 3 contains emp salary. so if any emp leave company between 25th - 30th of every month it has to get updated in tables. but it is not getting updated. What is the reason.
1743I have a program with an Array of 5000 occurences which is being passed from 5 sub levels to the front end screen. Thess 5 programs using each 5*2 = 10 different arrays with size as 5000. This is causing the transaction to utilize more storage consupmtion. I am looking to reduce the storage consumption. As part of that initially i thought Dynamic array may solve my problem. After viewing the comments given i see its same as normal array. IS there any other way we can resolve this issue?
HCL,
1654In a file if a column account number conatain value 0001234.. how can we move the value to another variable without zero. value may contain any type such as 00123405. we need the value 1234 or 12305. how can we do that in cobol. Please help.
CSC,
1 3369If a file has 1000 records.. if i have to replace the first and last characters of the file with another character. how it can be done....
HCL,
1 4058If my program receives input feed from program in other system.. if the receiving field size is less than the sending field.. what abend will be happening.
HCL,
1 2688what are the types of abends that occur on job failure? And explain the possible causes of these
1627
What is the need of a secondary index in IMS?
What are some uses of the evaluate statement? Explore the syntax of the evaluate statement?
What is the function of logging in the db2 database?
Define the term transaction routing?
What is the contrast between delimited by space and delimited by size?
How do you eliminate the duplicates?
How to get the last record in vsam file in cluster? And how can you get the kids file records into your cobol program?
What is the structure and definition for the same?
How does a cursor work?
What is the maximum No of rows per page?
What is the advantage of creating the acbs well ahead of time?
by using cursors , we can access particular records from the table based on some condition, i want to delete those selected records, how can we write a query for this in the program?
Tandem COBOL Interview questions (on TACL,SCOBOL,ENSCRIBE,PATHWAY0
What are the full forms of spufi and dclgen and why are they used?
Hi, While I am trying to produce a html report from SAS interactive screen, I am always getting an error. I have attached the result of interactive execution with this. Please help me on this. NOTE: All profile changes will be lost at the end of the session. 1 *libname ia 'U19K.CAPS.SAS'; 2 3 /*Data declaration*/ 4 data work.staff; 5 infile 'U19K.CAPS.SAS (RAWDATA1)'; 6 input LastName $ 1-10 FirstName $ 11- 20 7 JobTitle $ 21-23 Salary 24- 28 8 BirthDat $ 29-37 Gender $ 38 9 run; 10 11 /*Basic "format" statement*/ 12 /*assign range of values to a variable and use it*/ 13 /*'$' should be used for a alphanumeric manipulation*/ NOTE: The infile 'U19K.CAPS.SAS(RAWDATA1)' is: Dsname=U19K.CAPS.SAS (RAWDATA1), Unit=3390,Volume=XTD007,Disp=SHR,Blksize=6160, Lrecl=80,Recfm=FB NOTE: 20 records were read from the infile 'U19K.CAPS.SAS (RAWDATA1)'. NOTE: The data set WORK.STAFF has 20 observations and 7 variables. NOTE: The DATA statement used 0.01 CPU seconds and 7537K. NOTE: The address space has used a maximum of 3676K below the line and 15196K above the line. 14 proc format; 15 value Salrange low- 10000='Below' 16 10001- 20000='Medium' 17 20001- High='Above'; NOTE: Format SALRANGE has been output. 18 value $Gender F='Female' 19 M='Male'; NOTE: Format Ă…GENDER has been output. 20 run; NOTE: The PROCEDURE FORMAT used 0.00 CPU seconds and 7523K. NOTE: The address space has used a maximum of 3676K below the line and 15196K above the line. 21 22 /*ODS-Output delivery system to create html file*/ 23 ods listing close; 24 ods html file='C:\Documents and Settings\u19k\Desktop\html1.html'; NOTE: Writing HTML Body file: C:\Documents and Settings\u19k\Desktop\html1.html ERROR: Invalid file, C:\DOCUMENTS AND SETTINGS\U19K\DESKTOP\HTML1.HTML. WARNING: No body file. HTML output will not be created. 25 26 /*Basic "label" statement*/ 27 proc print data=work.staff split=''; 28 label LastName='Last Name' 29 FirstName='First Name' 30 JobTitle='Job Title' 31 Salary='Annual Salary'; 32 format Salary Salrange. Gender $Gender.; 33 var LastName FirstName JobTitle Salary Gender; 34 title 'Employee database'; 35 run; WARNING: No output destinations active. NOTE: The PROCEDURE PRINT used 0.00 CPU seconds and 10275K. NOTE: The address space has used a maximum of 3676K below the line and 15196K above the line. 36 37 /*ODS-html closing*/ 38 ods html close; 39 ods listing;