View previous topic :: View next topic
|
Author |
Message |
MSTP
New User
Joined: 21 Jun 2007 Posts: 30 Location: Baltimore
|
|
|
|
Hi
I have a 2 fields in a file as below
WS-DBLPK 1 2 P 0
WS-DBLK 3 4 B
which I want to move into out file of 2 fields one is 3 bytes and 9 bytes of numeric .So that when the move happened I can go to the file and read them.I am doing a st move but it is not working.Pl help
thanks
Prasad |
|
Back to top |
|
|
Douglas Wilder
Active User
Joined: 28 Nov 2006 Posts: 305 Location: Deerfield IL
|
|
|
|
Quote: |
it is not working. |
What is happening? Abend, wrong results, no results, ...
How are your output fields defined?
Could you go into edit on the input file turn hex on and show us some of the input. Do the same on the output file.
We are willing to help, but we need more information in order to help you. |
|
Back to top |
|
|
MSTP
New User
Joined: 21 Jun 2007 Posts: 30 Location: Baltimore
|
|
|
|
Below is the input and output values.Pgm is not abending but wrong results.
I/P
----+-
-----
....þ0
00038F
0C05E0
-----
....þ0
00038F
0C05E0
-----
....þ0
00038F
0C05E0
-----
....þ0
00038F
0C05E0
-----
....þ0
00038F
0C05E0
-----
O/P File details
OUT-IND1 1 01 A
OUT-BLPK 2 03 N
OUT-BLK 5 09 N
----+----1---
----+----F---
----+----1---
------------
C.. ..þ0
C004038F44444
30C005E000000
------------
P.. ..þ0
D004038F44444
70C005E000000
------------
C.. ..þ0
C004038F44444
30C005E000000
------------
P.. ..þ0
D004038F44444
70C005E000000
------------
C.. .+.ç
C004041444444
30C00E4800000
------------
P.. .+.ç
D004041444444
70C00E4800000
------------ |
|
Back to top |
|
|
Douglas Wilder
Active User
Joined: 28 Nov 2006 Posts: 305 Location: Deerfield IL
|
|
|
|
Code: |
OUT-BLPK = WS-DBLPK
OUT-BLK = WS-DBLK |
Works for me.
Code: |
000003510000
000003510000
000003510000
000003510000 |
|
|
Back to top |
|
|
MSTP
New User
Joined: 21 Jun 2007 Posts: 30 Location: Baltimore
|
|
|
|
thanks it worked . I was using MOVE statement but '=' works don't know why. |
|
Back to top |
|
|
Douglas Wilder
Active User
Joined: 28 Nov 2006 Posts: 305 Location: Deerfield IL
|
|
|
|
"Move" does a character move (no type conversion).
"Assignment '=' evaluates the expression and assigns the value, including type conversion if needed.
Usually the assignment operator will do what you want and "Move" is not needed. |
|
Back to top |
|
|
|