|
View previous topic :: View next topic
|
| Author |
Message |
Amsar
New User
.jpg)
Joined: 26 Sep 2008
Posts: 84
Location: Chennai
|
|
|
|
Hi All,
I have varable ws-var PIC x(8). I am moving value 'SSDMTR' in this varable but some junk value is getting in variable in last two bytes. I have initalize the variable with spaces. Value it displaying in sysout is SSDMTR ¼. ¼ is it a LOW-VALUE?
I have tried with inspect replacing all low-value by spaces still this value i am getting this value SSDMTR ¼.
Please let us know me your suggestion.
Thanks,
Amsar |
|
| Back to top |
|
 |
Robert Sample
Global Moderator
Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA
|
|
|
|
My handy-dandy z/Architecture Reference Summary, SA22-7871, indicates that the symbol is hex B7 in EBCDIC, which is a far cry from LOW-VALUES (hex 00).
What does the MOVE statement look like -- and what are the DATA DIVISION definitions of the sending and receiving fields? There's more than one possible cause for what you're seeing, so fixing it at the source is the preferred solution. |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
|
|
|
|
Hello,
Suggest you look at the "input" with HEX ON and post what you find. |
|
| Back to top |
|
|
Amsar
New User
Joined: 26 Sep 2008
Posts: 84
Location: Chennai
|
|
|
|
Hi dick
The value in hex format is as below
| Code: |
Command ===> Scroll ===> PAGE
****** ***************************** Top of Data ******************************
000001 SDMTR ¼
4ECDED0B0444444444444444444444444444444444444444444444444444444444444444
024439170000000000000000000000000000000000000000000000000000000000000000
------------------------------------------------------------------------------
****** **************************** Bottom of Data **************************** |
|
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
|
|
|
|
Hello,
Well, x'01B7' is decimal 439. Does 439 have any special meaining?
What are these input records? Is that 8-byte value the key to some file or table?
I'm not so sure that it should just be discarded. . . |
|
| Back to top |
|
|
William Thompson
Global Moderator
Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ
|
|
|
|
| Robert Sample wrote: |
| What does the MOVE statement look like -- and what are the DATA DIVISION definitions of the sending and receiving fields? |
|
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
Robert Sample wrote/requested:
| Quote: |
| What does the MOVE statement look like -- and what are the DATA DIVISION definitions of the sending and receiving fields? |
Amsar,
stop showing us things that have lead you to a point where you can not solve your own problem.
not only have you not provided the requested info,
you have shown us
<SPACE>SDMTRx'01b7'
from some kind of abbreviated screen display
when your goal was SSDMTR.
not only do you have unwanted characters following your desired data,
you are missing the first character, also.
start by explaining what this screen display is,
then provide the info that Robert requested.
Until you provide us with some info, you are stuck with the problem. |
|
| Back to top |
|
|
|
|
