EDMK is used when you want a "floating" (just before the first significant digit) dollar sign or similar. You back up R1 by 1 and that is where your dollar sign goes.
I think there are ED and EDMK examples in the PoOp, no? Read them carefully. Read them very carefully. ED and EDMK are powerful but there is a price in complexity for that power. Pay attention to that fill character and "significance." Charles -----Original Message----- From: IBM Mainframe Assembler List [mailto:[email protected]] On Behalf Of Steve Thompson Sent: Wednesday, November 1, 2017 2:44 PM To: [email protected] Subject: Re: edmk instruction Does the customer really want something like 00000$10245670 ? Because with EDMK and the mask you have specified that is pretty much how this is going to work (as least the first three looks I took at this trying to figure out why the edit mask was written the way it is). Regards, Steve Thompson On 11/01/2017 03:29 PM, Sokolsky, Hayim Z. wrote: > Just a try of the top of my head ... > > MVC OUTPUT(15),=X'F0202020202020202020202020202120' > EDMK OUTPUT(15),NUMBER > > > The first character in the output field is the "fill" character. In this case > it's a C'0'. So even though all the x'20' characters prior to the x'21' get > replaced by fill, it's zero anyhow. The only difference between ED and EDMK > is pointing R1 to the first significant digit. > > > Hayim Sokolsky > Director, Senior Mainframe Security Architect Security Architecture > and Technology Technology Risk Management DTCC Tampa > Direct: +1 813 470-2177 | [email protected] > > > > Visit us at www.dtcc.com or follow us on Twitter @The_DTCC and on LinkedIn. > To learn about career opportunities at DTCC, please visit dtcc.com/careers. > > Classification: DTCC Public (WHITE) > > The views I have expressed in this email are my own personal views, and are > not endorsed or supported by, and do not necessarily express or reflect, the > views, positions or strategies of my employer. > -----Original Message----- > From: IBM Mainframe Assembler List [mailto:[email protected]] > On Behalf Of Greg Gray > Sent: Wednesday, November 01, 2017 15:07 > To: [email protected] > Subject: edmk instruction > > 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? > DTCC DISCLAIMER: This email and any files transmitted with it are > confidential and intended solely for the use of the individual or entity to > whom they are addressed. If you have received this email in error, please > notify us immediately and delete the email and any attachments from your > system. The recipient should check this email and any attachments for the > presence of viruses. The company accepts no liability for any damage caused > by any virus transmitted by this email. >
