See below: On Wed, Nov 8, 2017 at 7:09 AM, Robin Vowels <[email protected]> wrote: > From: "Steve Smith" <[email protected]> > Sent: Thursday, November 02, 2017 6:30 AM > > > Yes, probably thousands have. "No success" is rather vague. > >> MVC CL15,x'f0f0202020202020202020202020202020' >> ED CL15,PL7 > > > Haven't checked, but you might need a X'21' character as well or > instead of the second X'F0'
I did check. The second x'F0' is to pad the length up to 15 characters, per OP's spec. Using '0' as the pad character is something of a special case; but it fits the question asked. > >> UNPK CL15,PL7 would also accomplish this task, as you're not really >> using any of ED's power. > > > You'll also need to zap the least significant byte to produce a zone code of > X'F'. > Only if UNPK is used. ED/EDMK will take care of it. > On Wed, Nov 1, 2017 at 3:07 PM, Greg Gray <[email protected]> wrote: >> >> I have a field PL7 that contains a number (dollar amount) and I have to >> output that amount into a CL15 output field. The customer would like for >> the remaining characters other than the digits for the amount to be zeros, >> i.e., 000000000012391. I am trying to code a EDMK pattern with no success, >> has anyone ever completed such a task? > -- sas
