http://itknowledgeexchange.techtarget.com/itanswers/how-to-pass-zoned-decimal-parameter-to-a-program-from-the-command-line/ Sun, 26 May 2013 01:40:27 +0000 hourly 1 http://itknowledgeexchange.techtarget.com/itanswers/how-to-pass-zoned-decimal-parameter-to-a-program-from-the-command-line/#comment-108858 bvining Wed, 27 Jun 2012 23:15:09 +0000 http://itknowledgeexchange.techtarget.com/itanswers/how-to-pass-zoned-decimal-parameter-to-a-program-from-the-command-line/#comment-108858 Continuing the example of ’0001′, if you wanted a negative value you need to replace the right most digit with the appropriate character value. Representing a value of 0001- would be done by passing ’000J’.  If the last digit is a 2 then replace the 2 with a K, 3 with L, 4 with M, and so on to 9 being R. So passing a negative 1234 would be done as ’123M’.
A bit more on the details, zoned decimal values of 1 thru 9 are stored, in EBCDIC, as x’F1′ thru x’F9′. To represent a negative value you change the “left” nibble of the last digit to ‘D’. x’D1′ is EBCDIC character J, x’D2′ is K,… and x’D9′ is R. Other values can be used, but these are the preferred representations.

]]> http://itknowledgeexchange.techtarget.com/itanswers/how-to-pass-zoned-decimal-parameter-to-a-program-from-the-command-line/#comment-108850 TomLiotta Wed, 27 Jun 2012 19:44:38 +0000 http://itknowledgeexchange.techtarget.com/itanswers/how-to-pass-zoned-decimal-parameter-to-a-program-from-the-command-line/#comment-108850 Zoned-decimal is just a series of character digits. Because they are “characters”, they must be quoted to prevent the command prompter from passing them as packed digits. You must include leading zeros if the quoted value has fewer digits than the length of the field.As mentioned, negative values require some special handling to account for the negative sign.Tom

]]> http://itknowledgeexchange.techtarget.com/itanswers/how-to-pass-zoned-decimal-parameter-to-a-program-from-the-command-line/#comment-108847 philpl1jb Wed, 27 Jun 2012 14:28:27 +0000 http://itknowledgeexchange.techtarget.com/itanswers/how-to-pass-zoned-decimal-parameter-to-a-program-from-the-command-line/#comment-108847 and call pgm parm(’0001′) would call pgm with a zoned (4,2) value of .01
but negative values ….

]]> http://itknowledgeexchange.techtarget.com/itanswers/how-to-pass-zoned-decimal-parameter-to-a-program-from-the-command-line/#comment-108840 BigKat Wed, 27 Jun 2012 11:41:50 +0000 http://itknowledgeexchange.techtarget.com/itanswers/how-to-pass-zoned-decimal-parameter-to-a-program-from-the-command-line/#comment-108840 just put quotes around it and include any leading zeros
call pgm parm(’0001′) would call pgm with a zoned (4,0) value of 1.

]]>