Re: Convert *signed* EBCDIC to packed decimal

2020-06-03 Thread Dan Greiner
In an interview in the "Communications of the ACM" (volume 30, number 4, April 1987), two of the original instruction-set architects — Andris Padegs and Richard Case — weighed in on EDIT and EDIT AND MARK. The interviewer, Alfred Spector, asked: "Did you ever add instructions to help justify t

Re: z/OS HLASM: EQU for statement labels

2020-06-03 Thread Robin Vowels
From: "Seymour J Metz" To: Sent: Wednesday, June 03, 2020 7:00 AM Paging? The conventional wisdom has always been to stay within one base register, The XPL compiler used multiple base registers. so for systems with 4K pages that isn't an issue. I tend to use LOCTR so that constants aren't

Re: Convert *signed* EBCDIC to packed decimal

2020-06-03 Thread Tony Harminc
On Wed, 3 Jun 2020 at 16:26, Doug Wegscheid wrote: > > I'm getting reacquanted with s/370 assembler after a 40 years hiatus. > I'm working through some examples from my Kacmar book, and need to convert > from a character string to a packed decimal. PACK almost works, except it > does not handle

Re: Convert *signed* EBCDIC to packed decimal

2020-06-03 Thread Charles Mills
The original architects were good enough to give us ED/EDMK but failed to provide UNEDIT. Charles -Original Message- From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On Behalf Of Mike Shaw Sent: Wednesday, June 3, 2020 1:54 PM To: ASSEMBLER-LIST@LISTSERV.UGA.

Re: Convert *signed* EBCDIC to packed decimal

2020-06-03 Thread Doug Wegscheid
nope, not z15. s/370 (MVS 3.8J/Hercules). Thanks for the details, that confirms what I was thinking... On Wednesday, June 3, 2020, 5:18:31 PM EDT, MELVYN MALTZ <072265160664-dmarc-requ...@listserv.uga.edu> wrote: Hi Doug, By s/370 I hope you mean z15...there are a few new instructi

Re: Convert *signed* EBCDIC to packed decimal

2020-06-03 Thread MELVYN MALTZ
Hi Doug, By s/370 I hope you mean z15...there are a few new instructions :-) I would recommend getting z390, a free Assembler emulator, go here www.z390.org You get me for free as a mentor as well :-) Contact me directly, not through this forum To your problem... Yes, you do need to scan for

Re: Convert *signed* EBCDIC to packed decimal

2020-06-03 Thread Doug Wegscheid
I was pretty sure PACK wasn't gonna work by itself. I don't need exhaustive error checking; I suspect some TRT magic will help me find the signs, I remember if one of them was a '-', turn the sign characters into zeros, PACK, negate if necessary. Can't believe I did this everyday (though I alm

Re: Convert *signed* EBCDIC to packed decimal

2020-06-03 Thread Mike Shaw
"... or am I going to have to scan for the sign characters myself, remove them, pack the result, and flip the sign if it was negative? You do have to detect and handle leading plus/minus signs in EBCDIC strings yourself. PACK won't do it. Mike Shaw MVS/QuickRef Support Group Chicago-Soft, Ltd.

Re: Convert *signed* EBCDIC to packed decimal

2020-06-03 Thread Kerry Liles
Something to think about is whether the possible negative or even positive sign is lowed on the front or the back of the string. Likewise for commas and decimal point (or variants of those decorators if you take into account the locale (eg: France, Quebec etc). I've written routines to scan for suc

Convert *signed* EBCDIC to packed decimal

2020-06-03 Thread Doug Wegscheid
I'm getting reacquanted with s/370 assembler after a 40 years hiatus. I'm working through some examples from my Kacmar book, and need to convert from a character string to a packed decimal. PACK almost works, except it does not handle a leading (or any) plus or minus signed. Is there a *simple* w

Re: z/390 Assembler and START statement.

2020-06-03 Thread Schmitt, Michael
It works for me with HLASM R6.0, and is as Charles Mills said: it changes the location counter value reported in the listing. I wouldn’t think it would change the relative address in the object? Because then your entry point would be greater than the CSECT size. Without the expression: Loc

Re: z/390 Assembler and START statement.

2020-06-03 Thread Binyamin Dissen
Looks like support is missing. On Wed, 3 Jun 2020 12:06:04 -0400 Dan Greiner wrote: :>Seymour: I agree that it's not worth fixing. However, its been nearly 50 years since I used a START statement, and I just wanted to double-check my sanity (I might be catching a case of Covidiocy.) :> :>Binya

Re: z/390 Assembler and START statement.

2020-06-03 Thread Dan Greiner
Seymour: I agree that it's not worth fixing. However, its been nearly 50 years since I used a START statement, and I just wanted to double-check my sanity (I might be catching a case of Covidiocy.) Binyamin: I added " DC A(*)" as the first statement, and it shows a location of zero. The ESD rep

Re: z/OS HLASM: EQU for statement labels

2020-06-03 Thread Gary Weinhold
Pot, kettle On 2020-06-03 11:18 a.m., Seymour J Metz wrote: O my. Are you subscribing to some arcane definition of Basic Assembler Language that requires hand-punching cards on a Jacquard loom or something? No. RYFM. I'd suggest that it appears you've never actually supported code using CMS

Re: z/OS HLASM: EQU for statement labels

2020-06-03 Thread Seymour J Metz
> O my. Are you subscribing to some arcane definition of Basic Assembler > Language that requires hand-punching cards on a Jacquard loom or something? No. RYFM. > I'd suggest that it appears you've never actually supported code using CMS > UPDATE, ROTF,LMAO! I'd suggest that you haven't a clu

Re: z/OS HLASM: EQU for statement labels

2020-06-03 Thread Phil Smith III
Metz scrawled: >> (not writing much BAL any more). >I doubt that you ever were, or that you've even seen it. O my. Are you subscribing to some arcane definition of Basic Assembler Language that requires hand-punching cards on a Jacquard loom or something? Give me a break. >> I was taught not t

Re: Returning bool and similar values from subroutines (was z/OS HLASM: EQU for statement labels)

2020-06-03 Thread Gary Weinhold
I was referring to CP routines calling other CP routines.  It's true that the CC also had to be set correctly when redispatching the code running in a virtual machine after intercepting a privileged operation. On 2020-06-02 10:54 p.m., Paul Gilmartin wrote (snipped): On 2020-06-02, at 19:37:25,

Re: z/390 Assembler and START statement.

2020-06-03 Thread Charles Mills
I remember START and it definitely worked once upon a time. Here's what it was good for: In DOS/360 there was only a single address space containing the supervisor (nucleus) and three partitions (regions). Only the first or lowest partition, called BG, was "full function" and that is where most

Re: z/390 Assembler and START statement.

2020-06-03 Thread Binyamin Dissen
What would DCA(*) shows? What does the ESD report show? On Wed, 3 Jun 2020 01:56:46 -0400 Dan Greiner wrote: :>According to the HLASM Language Reference manual (SC26-4940), the START statement may be used to create the first control section in an assembly and define an expre