Interested to Buy Any Domain ? << Click Here >> for more details...
how to display comp3 variables reply soon ?
- 4 Answers
- 11589 Views
- Patni, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / fjord
01 ws-a pic s9(5) comp-3 value 12345.
01 ws-b pic s9(5).
Procedure division.
move ws-a to ws-b
display ws-b upon terminal.
| Is This Answer Correct ? | 16 Yes | 0 No |
Answer / chandra
SELECT ACCT-FILE ASSIGN TO UT01.
01 A pic s9(5)comp-3 value 12345.
01 ACC-REC.
02 B pic s9(5)comp-3.
02 FILLER X(77).
PD.
OPEN ACCT-FILE.
MOVE A TO B.
WRITE ACC-REC.
BROWSE THE FILE AND WRITE HEX ON IN THE COMMAND PROMPT THEN
PRESS ENTER....IT WILL SHOW U THE COMP-3 VALUE.....
| Is This Answer Correct ? | 7 Yes | 4 No |
Answer / lovely.surendra
just use a another ws-variable and then move the value of
COMP variable into it,
now u can do any activitity with this ws-variable.
| Is This Answer Correct ? | 3 Yes | 0 No |
Answer / sachin
you can also do this using the jcl sort
inrec = (1,4,pd,m4)
| Is This Answer Correct ? | 0 Yes | 1 No |
Can 88 level variable be declared in FD section..?
What are the different data types available in COBOL?
How to traceback if I am getting SOC7 or SOC4 abend? List down the steps
how can count the number of character in feild ?? suppose for instance i have a feild with value ' rajesh sarkar' then how can v count the number of characters whitout spaces...........
what is label record is standard or omitted in file description of data division?
give the examples of strings in cobol
Hi All, how is sign is stored in S9(17) comp-3 variable. Answer with an Example will be of great help.
what is a load module ?
How many times the loop runs here 01 a pic 9(2) value 1. perform para1 until a=10 move 1 to a. stop run. para1: move 10 to a.
When can the USING phrase be included in the call statement ?
What does MAXCC 3 means? It is used in one my codes.
Will the variable POS in the following code have a value of 2 or not? 01 POS PIC S9(4) COMP VALUE 2. 01 FIRST-NAME PIC X(10) VALUE 'ABC'. 01 LAST-NAME PIC X(10) VALUE 'XYZ'. 01 NAME PIC X(20) VALUE SPACES. STRING FIRST-NAME DELIMITED BY SPACES ' ' DELIMITED BY SIZE LAST-NAME DELIMITED BY SPACES INTO NAME WITH POINTER POS
COBOL 
