You are asking how to implement a solution but you have not told us what
problem you are trying to solve. What is the real issue with this program
accessing data in page 0?
-Original Message-
From: IBM Mainframe Assembler List On Behalf
Of syama prasad
Sent: Monday, March 27, 2023
I assume your desired result is x'3456700f'.
You know F, the location of the first character of the string. You know L,
the length of the string. You know D, the number of decimal digits desired
in the result. You can build a constant array of packed values 10, 100,
1000, etc.
Determine if a
Look up the DOUBLE character-valued built-in function in your Assembler
Language Reference. The description specifically mentions this situation. It
is in chapter 9 in my very old reference.
-Original Message-
From: IBM Mainframe Assembler List On Behalf
Of paul schuster
Sent:
Given the value of DBLWD1, the only thing that does not make sense is your
expectation.
Have you checked the value in R15 to determine if TIMEUSED executed
successfully?
> -Original Message-
> From: IBM Mainframe Assembler List
> On Behalf Of Brian Westerman
> Sent: Saturday,
Can you show us the code that does the looking?
> -Original Message-
> From: IBM Mainframe Assembler List
> On Behalf Of Richard Kuebbing
> Sent: Wednesday, July 24, 2019 8:24 AM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: old code failing
>
> A subroutine written long ago appears
Did you assemble the module with the TEST parameter as described in the
previous paragraph?
> -Original Message-
> From: IBM Mainframe Assembler List
> On Behalf Of Janko Kalinic
> Sent: Monday, March 11, 2019 7:47 AM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: TSO TEST EQUATE
>
>
According to John Ehrman's "Assembler Language Programming for IBM System zT
Servers Version 2.00," the CUSE instruction searches only for matches at the
same offset. In the case you describe, it would not find a match unless the
second string was "is" so that the word you are looking for is
The length of the request is 15 characters, not 16. You have told BPXWDYN that
the X'00' is part of the request.
> -Original Message-
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> l...@listserv.uga.edu] On Behalf Of David Staudacher
> Sent: Sunday, December 24, 2017 3:52 AM
Am I missing something or are the arguments for disabling dynamic allocation
nearly a clone of the old arguments for restricting AMASPZAP?
Since the X'F0' fill character should have done what you wanted, you need to
show us what you did with it. We need the relevant parts of the program
source, the original contents of the two operand areas, and the final contents
of the pattern area.
> -Original Message-
> From: IBM
Where did the $ come from?
> -Original Message-
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> l...@listserv.uga.edu] On Behalf Of Steve Thompson
> Sent: Wednesday, November 01, 2017 2:44 PM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: Re: edmk instruction
>
> Does the
According to the 2004 POO (SA22-7832-03), which I believe predates z9, you can:
Simulate an LA to clear the high half contents of a register with ICMH
Rx,15,=XL4(00) or NG Rx,=XL8()
Simulate an LA to increment the count in the high half with AG
Rx,=XL8(1)
Simulate
Some issues are easier to deal with by non-technical methods. Publicizing the
paragraph that precedes the code might demonstrate the desirability of
following the rules to all but the most obnoxious.
Has your legal team considered the possibility of industrial sabotage? It
would be pretty
If asterisks will only appear in the first position of a field, you could
use a TRT instruction to determine if (and where) an asterisk appears. If
one does appear, the position would let you "calculate" which field it
appears in so you can move the corresponding data into the compare operand.
If
Wouldn't it be a lot faster just to test it with a trivial example?
> -Original Message-
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> l...@listserv.uga.edu] On Behalf Of Joe Reichman
> Sent: Thursday, September 15, 2016 4:12 PM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject:
The LIBMAC option will cause the assembler to embed the library macros you call
in the input stream (and listing). See the HLASM Programmer's Guide. From
there, you should be able to cut and paste what you need.
If the offending statement is an assembler or machine instruction (as opposed
to
In an assembler program, you can use LINK, XCTL, or ATTACH. Using LOAD and
CALL should also work. You will need to insure the DD names the
disassembler needs have been allocated appropriately.
> -Original Message-
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
>
> -Original Message-
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> l...@listserv.uga.edu] On Behalf Of Peter Relson
> Sent: Saturday, July 02, 2016 6:02 AM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: Re: CSRSIIDF Question
>
> >Because some of the return codes indicate
> -Original Message-
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> l...@listserv.uga.edu] On Behalf Of Peter Relson
> Sent: Friday, July 01, 2016 5:21 AM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: CSRSIIDF Question
>
> >Question: is it incorrect to rely on the presence
Since a COD upgrade is "one event" that alters the field, it seems reasonable
to conclude that there are other events that also alter the field. Your code
may be making a false assumption.
Does your program check the return code after calling the CSRSI service?
The Knowledge Center (at
The fact that a G00V00 DSN has rolled off and been uncatalogued need not
mean that the tape has expired. Even specifying delete in the GDG base
definition has minimal effect on a tape dataset.
If memory serves, there are multiple CA-1 options and at least one CA-1
utility program that deal with
> -Original Message-
> From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
> l...@listserv.uga.edu] On Behalf Of Scott Ford
> Sent: Friday, October 02, 2015 10:58 AM
> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
> Subject: Branch table
>
> All:
>
> I am building a branch table like this:
>
>
Are you referring to the hex wrench used to open the cabinet doors or the
one used to put the CPU in maintenance mode?
-Original Message-
From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
l...@listserv.uga.edu] On Behalf Of glen herrmannsfeldt
Sent: Wednesday, March 11, 2015 2:33
CVTRAC points to something called the access control CVT.When RACF is
the security product, it points to the RCVT (RACF Data Areas). RACF has a
four character eye catcher at the beginning plus two areas with version
information (RCVTVERS and RCVTVRMN). I expect the other security products
do
What is the desired difference to either the assembler or your object code
between
DS 0CL133
And
DS 11 * 0CL133 if that were allowed?
In what way does 11 instances of nothing differ from 1instance or no
instance?
-Original Message-
From: IBM Mainframe Assembler List
Which of the currently available macro-language facilities support
computations and comparisons on non-self-defining terms?
-Original Message-
From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
l...@listserv.uga.edu] On Behalf Of John Gilmore
Sent: Monday, August 18, 2014 11:31 AM
When you find a macro construct that handles non-self-defining terms
properly, let us know.
-Original Message-
From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
l...@listserv.uga.edu] On Behalf Of Peter Hunkeler
Sent: Monday, August 18, 2014 1:18 PM
To:
In the code below, the LARL instruction is commented out. What is in R14
since that is where the MVC deposited your eyecatcher.
-Original Message-
From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
l...@listserv.uga.edu] On Behalf Of essteam
Sent: Sunday, August 17, 2014 2:18 PM
If I understand correctly, you have a work area of known length and a macro
that will build code. You want an assembly trick what will confirm the
length of the generated code fits or lets you know if it doesn't.
Two approaches come to mind
1 - At the point where the macro generates the first
Subject: Re: How to assign length of generated instructions to macro
variable?
On 2014-08-16, at 12:16, retired mainframer wrote:
DS 0AL(MACRO_PARM_SPECIFYING_LENGTH-(ENSYSNDX-
STSYSNDX)+1)
Is there a limit on the value that may be assigned as the length
attribute of a symbol? (ISTR
On 7/7/2014 3:53 PM, Robert A. Rosenberg wrote:
OOPS. I might have it backwards but my principle still stands. There
only ambiguous time stamp is the switch day when the 1AM hour can
occur twice. On that day when you see get to 1:59AM and roll back to
1:00AM again (and thus see timestamps in
, retired mainframer wrote:
::
:: :: -Original Message-
:: :: From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
:: :: l...@listserv.uga.edu] On Behalf Of Paul Gilmartin
:: :: Sent: Saturday, June 07, 2014 11:46 AM
:: :: To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
:: :: Subject: Re: ADRDSSU VTOC
Bob quoted the JCL manual. So yes, DUMMY is usable with QSAM.
The issue however is what is IEBCOPY's requirement. My manual says SYSUT2
must reside on a device that supports QSAM, such as (but not limited to)
DASD or tape. Since a DUMMY dataset does not reside on a device, it fails
that test.
, retired mainframer wrote:
::
:: Bob quoted the JCL manual. So yes, DUMMY is usable with QSAM.
::
:: The issue however is what is IEBCOPY's requirement. My manual says
:: SYSUT2
:: must reside on a device that supports QSAM, such as (but not limited
:: to)
:: DASD or tape. Since a DUMMY
:: Sent: Tuesday, June 03, 2014 1:30 PM
:: To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
:: Subject: Re: ADRDSSU VTOC -- also IEBCOPY
::
:: On 2014-06-03 14:10, retired mainframer wrote:
:: Why don't you show us the job that built the archive and the job that
:: tried
:: to read it.
::
:: :: -Original
Why don't you show us the job that built the archive and the job that tried
to read it.
:: -Original Message-
:: From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
:: l...@listserv.uga.edu] On Behalf Of Paul Gilmartin
:: Sent: Tuesday, June 03, 2014 9:10 AM
:: To:
Run an ADRDSSU RESTORE job and specify TYPRUN=NORUN as a JCL parm.
:: -Original Message-
:: From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
:: l...@listserv.uga.edu] On Behalf Of Gibson, Vincent
:: Sent: Monday, June 02, 2014 12:28 PM
:: To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
::
Obviously your data must be sorted for the question to be relevant. Is it
already sorted or is the cost of sorting it part of the difference?
If your search target is uniformly distributed against the key, then on
average a linear search will require 1750 iterations of your compare loop.
A
My copy of Cannatello is dated 1999. A lot has changed in 14 years. And
the index shows more than a few pages dealing with the PC instruction and PC
routines. I didn't think water cooled machines were still supported.
:: -Original Message-
:: From: IBM Mainframe Assembler List
If you make your APARMLST a Y type instead of an H type, that will solve the
syntax problem. H types must be self-defining while Y and A types can
involve computations. (Remember to change the single quotes to
parentheses.)
:: -Original Message-
:: From: IBM Mainframe Assembler List
The byte count at the front of the parm must be halfword aligned. AL2 will
not align it. Y will.
:: -Original Message-
:: From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
:: l...@listserv.uga.edu] On Behalf Of Fred Rodgers
:: Sent: Tuesday, October 02, 2012 11:09 AM
:: To:
Since z/OS and its predecessors have been object code only for decades, how
is anyone young supposed to be familiar with internal architectures?
:: -Original Message-
:: From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
:: l...@listserv.uga.edu] On Behalf Of Robert Shimizu
:: Sent:
:: -Original Message-
:: From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
:: l...@listserv.uga.edu] On Behalf Of Tony Harminc
:: Sent: Friday, February 24, 2012 2:56 PM
:: To: ASSEMBLER-LIST@LISTSERV.UGA.EDU
:: Subject: Re: Program FLIH
snip
:: It seems to me that, apart from the
During edit, I use rarely used characters like ¢ (the cent sign) as a place
holder and just before saving I issue C ALL ¢ x'15 to produce the desired
hex value.
:: -Original Message-
:: From: IBM Mainframe Assembler List [mailto:ASSEMBLER-
:: l...@listserv.uga.edu] On Behalf Of McKown,
44 matches
Mail list logo
