Automatic Variable Insertion

Hello . I have many messages, where one or more variables need to be inserted into a WTO with MF=L For Example: MB$015 WTO 'MB$015 - Locating Subsystem ',MF=L MB$016 WTO 'MB$016 - SubSystem Not Found ',MF=L . I typically code something like this: MVC MB$015+32(04),SSINAME

Re: the BEAR (was: New z16 Instructions)

. If the POP manual is not available, where can one find the new instructions ? -- Original Message -- From: Martin Trübner To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: the BEAR (was: New z16 Instructions) Date: Sun, 17 Apr 2022 10:12:07 +0200 Dave, what would LBEAR do other t

Question about RACROUTE REQUEST=AUTH|FASTAUTH processing

... Hello, . I'm not a RACF person, I do understand some basic security principles. Regarding a RACROUTE REQUEST=AUTH and RACROUTE REQUEST=FASTAUTH. . I am able to issue both of the above RAROUTE macros against a facility profile with individual users. However when a individual is part of a Gro

CDZ2 Instruction

. Anyone familiar with or hreard of a CDZ2 or CDT2 Assembler instruction ? A GOOGLE search did not provide any fruitful information. Why would an application receive a 0C7 Abend on a CDZ2 or CDT2 instruction . Paul D'Angelo

A question about an Authorizing PC Service Routine

. Hello . I discovered this program and found it interesting. When invoked from a Non Authorized program it will switch the calling routine into supervisor state. . This is the complete PC Service Routine. * LCLC &CSECT

A Tale of Interleaving WTO messages

. . Jim Mulder wrote, >When you do a WTO with LINKAGE=BRANCH, the request is added >to a message queue which is serviced asynchronously by a TCB >in the CONSOLE address, which issues WTO LINKAGE=SVC for >each queued message. So you should have no expectations >about the delivery ordering betw

A Tale of Interleaving WTO messages

Hello, . I need to understand why messages written to the JOB LOG, are *NOT* displayed in the order they were issued. , Scenrio 1 10.39.38 DRIVER - Invoking Name/Token S

Determining AR or Primary Mode

Hello . Im looking for an assembler instruction that informs me if I'm in AR or primary mode. . Im on a z/OS 2,1 system- I thought there was an instruction that would test for AR Mode or Primary Mode. . I read the TAR (test Access) instruction and I don't see how that instruction would determin

Scholarly Articles Evaluation Report Was Case Study: IBM SYSTEM/360/37 0 ARCHITECTURE (1987)

Hello..I stumbled into a Scholarly Articles Web Page containing two IBM Evaluation Reports one for MVS/XA and another for MVS/ESA https://scholar.google.com/scholar?q=IBM+Region-Control-task&hl=en&as_sdt=0&as_vis=1&oi=scholart National Computer Security Center Final Evaluation Report Internationa

Is there another Problem with IBMLINK

Im opening a new case in IBMLINK.When I submit the case IBMLINK issues a message that a field is requiredThe Field in question is either the Product Release Number or contractBoth of which has been entered/provided,..Anyone else experiencing any issue with PMR cases ?.Paul D'Angelo

Questionable Instructions in Obtaining EAX documentation

Hi,.I tried posting this at IBM-MAIN, however I am experiencing problems with that site, so I decided to post here. . I need some clarification with some instructions being used in an example from SA23-1394-30 Im referring to: MVS Programming Extended addressability Guide SA23-1394-30 Page 38-39 F

Re: Circular Queue Handling in Assembler

-- Original Message -- From: Jon To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Circular Queue Handling in Assembler Date: Fri, 2 Aug 2019 17:29:24 -0400 >> How is PLO a use case for a multi-tasking circular queue? > Because it can do a pair fo compare and swap operations as an

Re: Poll

4 Pops -- Original Message -- From: Phil Smith III To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Poll Date: Mon, 16 Sep 2019 15:50:13 -0400 Principles of Operation-how do you refer to it? (NOT including case-let's not make this any more complicated than it is already!) 1) Po

Circular Queue Handling in Assembler

Hi, . I have a program which obtains a Memory Chunk, which is carved into a queue of 256 byte fixed length entries. I could have used a Data space. . In 31 Bit storage is the control information for the 64Bit Memory Chunk queue. The 31 Bit storage control structure has the beginning address of t

Help With IBM-MAIN

Hi, I seem to be having a problem with IBM MAIN. Every time I respond to a post, it is returned to me from mailer-dae...@smtpout01.dca.untd.com Unfortunately, your mail was not delivered to the following address:: Sorry, I couldn't find any host named listserv.ua.edu. (#5.1.2) . . Is there An A

Test

No need to respond, test

Best practice using Conditional Assembly

Hi,.I construct a table using a set of Macros. The macro supports four different TYPE fuctions. I can have a TYPE=INITIAL, TYPE=ENTRY, TYPE=FINAL, and TYPE=DSECT. . TYPE=INITIAL basically sets up pointers to the first entry, last entry, and a count of the number of entries. . TYPE=ENTRY describes

Re: Getting the Last Condition code

Condition code EXTERNAL == Branch (or Jump) on condition :) > -Original Message- > From: IBM Mainframe Assembler List [mailto:ASSEMBLER- > l...@listserv.uga.edu] On Behalf Of esst...@juno.com > Sent: Thursday, Dec

Re: Getting the Last Condition code

2018 22:14:40 GMT "esst...@juno.com" wrote: :>Hi,I seeem to recall am instruction that returned the last/current condition code. Does any one Know the name of this instruction or its OP code ? :>. :>. :>Paul D'Angelo :>. :>. -- Binyamin Dissen http://www.dis

Getting the Last Condition code

Hi,I seeem to recall am instruction that returned the last/current condition code. Does any one Know the name of this instruction or its OP code ? . . Paul D'Angelo . .

Address Space TCB Structure

. Many Years ago I attended an MVS/XA structure and logic class. . In that class there were diagrams of the TCB Structure for Started Task, Batch Jobs, and TSO logon address space. I'm talking about the address space TCB structure (Region Control Task, Dump Services, STC Control, etc.). . Are the

Curosity Question About ESTA and MSTA

Is this possible ? A hypothetical scenario - A Long Running Started Task issues an Extract Stacked State Instruction (ESTA) using code zero. LA R2,00 ESTA R0,R2 . Code zero returns the PKM, SASN, EAX, and PASN of the Started Task. The Started Task provides the EAX to other jobs. . A Problem Pr

BAKR Instruction

Hi, . Question About the BAKR Instruction . . I thought I understood the BAKR instruction. . I load the address of a load module into Register 15 Then I issue a BAKR R14,R15 . My understanding is that a Linkage stack entry is created And The PSW would be updated with the Address in R15 (operand 2)

SDWA - SDWACMPC conversion

Hi, As usual, I'm looking into some old ESTAE code. More specifically the System Diagnostic Work area. Does anyone have any sample code to share which interprets and converts the two 12-Bit codes of SDWACMPC into a displayable format ? . I'm trying to keep the size of the module small and would p

LT Instruction After Compare And Swap

Hi I don't remember where I found this snipet of code. LHI R1,-1create lock (0x) LHI R0,0 create expected lock (0) LOOP CS R0,R1,LOCK If Lock = 0 * Store R1 into LOCK BRZ DONE We Got The Lock *

Question about CPUs

Hi, . Im not an MVS SYSPROG nor a hardware person, I am a CICS SYS Prog. . I always thought that CPUS (engines) were physical hardware. Is this not true anymore ? . The other day in a meeting I heard the term Logical/Virtual CPU. Never Heard that term. . . What exactly is a Logical/Virtual CPU ?

Table Searchig with a Mask

Hi everyone I would like some help in reducing the number of instructions required to search a table. The table is in no particular order, so a Binary Search may not be appropriate here. . . I will try to explain this. . I have a structure with X number of fields For this example lets assume: ST

Question About Coding for a Failing Program

Hi, . I am revitalizing an AAR routine and I want to get the name of the Failing Program. My understanding - The SDWA contains the Name of a Failing Program if the unit of-work is in Problem state. . If the unit-of-work is in Supervisor State the SDWA contains the Address Of the PRB (SDWARBAD) . W

OT CONVTOD Help

Should this be a topic for SHARE ? A Share presentation discussing time/date manipulation STCK, STCKE, CONVTOD, etc. ? -- Original Message -- From: Paul Gilmartin <0014e0e4a59b-dmarc-requ...@listserv.uga.edu> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: CONVTOD Help Date:

Re: Not Understanding 0C4-03B

loads 31 bits, therefore the high-order word is zeroed. Remove it. -Original Message- From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On Behalf Of esst...@juno.com Sent: 28 August 2016 23:25 To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Not Understanding 0C4-03B I

Re: Not Understanding 0C4-03B

bits, therefore the high-order word is zeroed. Remove it. -Original Message- From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On Behalf Of esst...@juno.com Sent: 28 August 2016 23:25 To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Not Understanding 0C4-03B I would like

Not Understanding 0C4-03B

I would like to convert a Data space to use a Memory Chunk and 64 Bit Addressing. Program is invoked in AMODE 31 and RMODE ANY . When I try to move some control information to the beginning of the memory chunk I incur a 0C4-03B Abend . *

Re: Would ISGQUERY be the proper macro/service

I posted tis question on bothe lists -- Original Message -- From: mar...@pi-sysprog.de To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Would ISGQUERY be the proper macro/service Date: Mon, 15 Feb 2016 14:49:24 +0100 Mark, is there a specific reason you posted this on the assemb

Re: Would ISGQUERY be the proper macro/service

riginal Message- From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On Behalf Of esst...@juno.com Sent: 13 February 2016 16:56 To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Would ISGQUERY be the proper macro/service . I have a Started Task (STC), and sometimes a batch

Would ISGQUERY be the proper macro/service

. I have a Started Task (STC), and sometimes a batch job will hold a VSAM dataset needed by this STC. This prevents the STC from properly re-opening the dataset. . Share Options are 2,3 and Transactional VSAM (RLS) is not an option. . . Im looking for a macro or callable service that will allow th

Using a Static IEFSSVTI

Im on a z/OS 1.7 system and exploring the use of IEFSSVTI. No real assignemnent Yet, more of an educational exercise. I have the following STATIC Table. * * ***Static SSVTI *** *

LOADING An AMODE64 Program

Im posting he results of my sampe program for loading a 64BIT Amode program and invoking it via BSSM. . The Driving program is AMODE31 RMODE ANY The program that is loaded was Linked Edit as AMODE 64 and RMODE ANY. . I wanted to accomplish two methods of invoking the same 64BIT AMODE program. T

Re: LOADING An AMODE64 Program

Im in the process of issuing two commands from the same program. I have a 31 Bit AMODE program that will LINK to the AMODE64 Bit module and then upon return I will LOAD the AMODE64 Bit Module and BSSM to it. Ill post the results later this week. Paul -- Original Message -- From:

Re: LOADING An AMODE64 Program

Andreas and Bob Thank You Let me see if I understand this After the load I would issue the following Rx - GeneralPurpose Registers Gx - 64Bit Registers After the Load STR0,FWD LLGTR G15,R0 STG G15,PROG64@ . . PROG64@ DC 2A(0) FWD DC A(0) . . * To Invoke the 64Amode Module LARL R1,STR

Re: LOADING An AMODE64 Program

0 -0400 Since LLGTR supplies 33 zero-bits at the high-order end and that OILL supplies a one-bit at the low-order end, I'd say no. Add, not replace. Bob On 8/8/2015 4:17 PM, esst...@juno.com wrote: > Bob Rutledge wrote >> In order to have BASSM switch to 64-bit addressing,

Re: LOADING An AMODE64 Program

To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: LOADING An AMODE64 Program Date: Sat, 8 Aug 2015 12:11:12 -0400 On 8/8/2015 10:29 AM, esst...@juno.com wrote: > I want to load a program that has AMODE 64 from a Program with AMODE 31. > . > . I looked at David Bonds Share Session 8158

LOADING An AMODE64 Program

I want to load a program that has AMODE 64 from a Program with AMODE 31. . . I looked at David Bonds Share Session 8158 - August. 2003 64-Bit z/OS Assembler Coding. . It was very informative. . . So I issue a Load for PROG64 which has AMODE 64, from a program with AMODE 31. *

Re: *+n branches

I admit I am in the minority here. For a single instruction I have no problems with a B *+4 But thats just my Opinion -- Original Message -- From: Dougie Lawson To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: *+n branches Date: Thu, 2 Jul 2015 21:30:00 +0100 On 2 July 2015 at 2

An Interesting Technique

I stumbled across a small routine whose function is to issue a STIMER and return to the caler, when the Time Limit Expires. What I found interesting was the way this routine saved the return code. . . STIMER WAIT,DINTVL=WAITTIME.Wait till the end LR13,SAVE+4.Return to

Locating RACF release in Assembler

Hi, In TSO diaalogue manager I can obtain the Release of RACF and determine if it is present in the System , as opposed to ACF2 and TopSecret. I can ue the &SYSRACF and &SYSLRACF to obtain this information. . . Is there a way to determine What External Security Product is installed and what re

Re: Can Someone Point Out My error Here

JNE - not be taken. There is No Pruning of instructions These 5 instructions are executed as written . . -- Original Message -- From: Bob Rutledge To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Can Someone Point Out My error Here Date: Sun, 17 Aug 2014 17:40:55 -0400 esst

Re: Can Someone Point Out My error Here

and i was confused also. That is why I wanted to see all the code. On Aug 17, 2014 2:22 PM, "esst...@juno.com" wrote: > STATIC EYE is a Constant in memory ANd If You look at the COde > It is compared to 00(R1) the JNE was not taken. > That why im confused > > -- Ori

Re: Can Someone Point Out My error Here

14:12:22 -0700 Provided code does not show how anchor1 is populated. Sample code does not show what static_eye points to. Please provide all code. On Aug 17, 2014 1:28 PM, "esst...@juno.com" wrote: > Im executing 5 Instructions and then I force an Abend. > I load the address o

Re: Can Someone Point Out My error Here

? From: IBM Mainframe Assembler List [ASSEMBLER-LIST@LISTSERV.UGA.EDU] on behalf of esst...@juno.com [esst...@juno.com] Sent: Sunday, August 17, 2014 4:24 PM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Can Someone Point Out My error Here Im executing 5 Instructions and then I

Can Someone Point Out My error Here

Im executing 5 Instructions and then I force an Abend. I load the address of a storage area into Register 1 nd verify it by the presence of an eye-catcher. After executing the 5 instructions below; I expect the area Labeled "LOCLCOMM" to contain a copy of the eye-catcher that Register 1 is pointi

Re: WAVV2010 Presentation

:34 GMT "esst...@juno.com" wrote: :>I discovered a presentation from 2010 :>WAVV 2010 :>KEY15 vs KEY0 :>Author unknown :> :>This presentation provided some source code which I found intresting. :>MODESET KEY=ZEROSwitch To Key 0

Re: WAVV2010 Presentation

Martin wrote >For CICS it is in use to allow CICS to switch from non->privileged key (90) to >privileged key (80 in z/OS or any other >in z/VSE). So you are saying this technique is viable for z/OS. Wasnt sure what this sequence of instructions was trying to accomplish ORG *-32

Re: WAVV2010 Presentation

that WAVV is a z/VSE, z/VM And LINUX conference. I do know the author of the presentation and he runs z/VSE. So I'm sure what you see there applies to z/VSE and not necessarily to z/OS. Chuck Arney Arney Computer Systems zosdebug.com > On Aug 6, 2014, at 7:48 AM, "esst...@juno.com&qu

Re: WAVV2010 Presentation

presentation? Lizette > -Original Message- > From: IBM Mainframe Assembler List [mailto:ASSEMBLER- > l...@listserv.uga.edu] On Behalf Of esst...@juno.com > Sent: Wednesday, August 06, 2014 5:49 AM > To: ASSEMBLER-LIST@LISTSERV.UGA.EDU > Subject: WAVV2010 Presentation &

WAVV2010 Presentation

I discovered a presentation from 2010 WAVV 2010 KEY15 vs KEY0 Author unknown This presentation provided some source code which I found intresting. MODESET KEY=ZEROSwitch To Key 09000 MODESET MODE=SUPSwitch To Supervisor State

MACRO Usage

I needed to use a register to specify the ETEADDR specification in a ETDEF TYPE=SET,ETEADR=(3) macro. . . I did not see any documentation explicitly stating that a Register can be used as a valid parameter for ETEADR=. I have been successful in specifying a register in the macro, but have not te

A Unusual Opportunity

If Anyone is intertesd you may contact me off list. I don't have much specifics. A NY based company is under new management. The direction is to remove all Assembler from there mainframe software inventory. The problem is they have a 20+ year subssystem that is ligntening quick and cant eaily b

Re: Common Storage

Martin wrote > >Have you considered key 9. Key nine is the free_for_all storage >when the >"storage protection override" bit is on. > That is an interesting approach This also gets back to your first statement >While this is more an MVS question (because: Common say subpool >241 ...) > Wel

Common Storage

I know this has been discussed before ... I need to obtain storage from Common say subpool 241 .. I also need non-authorized programs to fetch(access this storage) but not store (update) tis common storage. Can someone suggest an appropriate storage key ? . . Paul D'Angelo

Re: Program Call Vs SVC

Rob Scott wrote > Task and ASID level resource manager routines to handle >both "client gone > while SUSPENDed" and "server gone >unexpectedly" situations . . Rob could you elaborate on the bullet above ... Are You suggesting that the PC Service Provider be notified when the client has abended wh

ASMA038S

Im having some diffuctlywith three DSECTS IEFSSOBH IEFSSCM IEFJSSIB Im getting ASMA038S on the Assembly ASMA038S Operand value falls outside of current section/LOCTR .. . . The code looks like this: * SSOB IEFSSOBH SSOBGN EQU * * SSCM SSCM DSECT

Re: ASMA034E

sters around the macro call... or I moved the macro call to another place, where I have base register addressibility (the first 4 k of a subroutine). Kind regards Bernd Am 19.04.2014 20:35, schrieb esst...@juno.com: > hello > > I know this topic has been discussed before.. > Im on

ASMA034E

hello I know this topic has been discussed before.. Im on a Z/OS 1.7 system with HLASM R5.0 ... Im trying to maintain the concept of "Baseless Code" in some programs, I keep running into some macros on Z/os 1.7 that use BAL R15,*+20 . . And as such i receive message ** ASMA034E Operand *+20 beyo

Another Article On Lagging Mainframe Skills

I thought I would share this with everyone. Watch the URL wrap http://www.informationweek.com/infrastructure/networking/mainframe-brain-drain-raises-seri ous-concern/d/d-id/1127720

Re: Call For Sample Code RADIX13/RADIX55

John Ehrman wrote >Can you provide an example of a couple >of typical sets of 8 (non-hex?) input bytes and what you expect >as the >corresponding 4 (non-hex??) output bytes ? Thanks For Responding: The In put to this routine is Max 8 Characters, consisting of Upper Case Alpha and Numeric (0-9).

The Future Of the ITSO

* The Future Of the ITSO ' According to an IBM friend of mine. . . The ITSO is a giant cost center for IBM. ITSO funding is drying up. IBM will eventually diminish REDBOOK publishing due to cutbacks, lack of funding, and the lack of experienced Z specialists. IBM plans to replace this vo

Call For Sample Code RADIX13/RADIX55

Can someone provide me with sample code that uses RADIX13 or Modulo55. My Modulo55 code is burried in a storage locker which I wont be able to get to until March. By RADIX13 or Module 55 I mean the conversion routine that takes for example 8 Characters (non-hex) as input and converts them to 4

Re: MultiTasking question

> Then it will probably also need to be passed a flag which can be tested to > see if it is time to shutdown or continue processing. > > The main task can post the shutdown flag at the appropriate time. Once > shutdown its posted, the subtask winds up its processing, posts the > completion ECB an

Re: Some Help with Conditional Assembly

27;s not any solid reason why a bare number couldn't > be a valid address. > > sas > > On 11/2/2013 11:39, esst...@juno.com wrote: > > I have a simple macro > > > > AMOVE &L=LENGTH,&S=SOURCE,&T=Target > > L R15,&L

Re: Some Help with Conditional Assembly

I obviously did not explain this wellm despite some coding errors.. I was hoping the Macro itself would test the value of the parameter and then generate the proper instruction. For Example: couldnt I use several TYPE attrinute AIF (T'&L EQ 'A').DOLOAD A-type Address AIF (T'&L EQ 'N

Some Help with Conditional Assembly

I have a simple macro AMOVE &L=LENGTH,&S=SOURCE,&T=Target L R15,&L .Length Of Move ... ... MVCL Ra,Rb MEXIT MEND In a Macro I wish to generate 3 different instructions depending on the value supplied for &L. If I specify AMOVE L

Re: 3 job openings for mainframe Assembler/C programmers, dump readers

I think dump reading is a matter of understanding control blocks. I dont believe some one can teach debugging, it evolves over years of examing and analyizing dumps. It always helps to have the source code. just mt 2 cents Paul D'Angelo -- Original Message -- From: Don V Nielsen

Re: Question About storing a Value in a Macro

If someone knows an easier way, I would love to learn it. To me, the above is simple and well known. There is another way, using the TROT, but that I consider it to be a bother. Too much setup, and a problem if ETF-2 (Extended Translate Facility 2) is not available on the hardware. OK, It's

Question About storing a Value in a Macro

I have simple Macro with three positional parameters: SRVRCONN &C,&T,&G The Macro generation is as follows: .A020ANOP DC CL20'&C'.Name DC AL4(&T) .Generated Token DC A(&G-DSSCNTL) .Offset IP List Ad

Re: Shifting The High Order Bits

Thanks To all who responded MVZ and its counterpart MVN are two instructions I havent used un many Years. I went back and Looked at POPs. havent had a need to use them, untill now. Thanks Again Paul

Shifting The High Order Bits

Hi, does anyone have a routine, or event know an instruction that would shift the high order bits of "n" bytes either 8 bits of 4 bits to the left as a unit: for example X 'D48199838840F2F96bF2F0F1F340' D89884FF64 41938029B20130 then shift the high order bits to the left 89884FF640 41938

Re: AW: Curosity Question About TCTL

oint or terminate. -Ursprüngliche Nachricht- Von: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] Im Auftrag von esst...@juno.com Gesendet: Freitag, 22. Februar 2013 17:31 An: ASSEMBLER-LIST@LISTSERV.UGA.EDU Betreff: Curosity Question About TCTL I was reading about Scheduling SR

Curosity Question About TCTL

I was reading about Scheduling SRBs using IEAMSCHD and discovered the TCTL macro. The TCTL (transfer control) macro allows an SRB routine to exit from its processing and to pass control to a task with minimal system overhead. When an SRB specifies RESUME RETURN=N, control transfers to the resum

Re: DSPSERV with SCOPE=?

I prefer to determine the SCOPE specification at execution time. -- Original Message -- From: John Gilmore To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: DSPSERV with SCOPE=? Date: Sat, 9 Feb 2013 15:40:37 -0500 The obvious question is that of the binding time of this requireme

Re: DSPSERV with SCOPE=?

- From: "Robert A. Rosenberg" To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: DSPSERV with SCOPE=? Date: Sat, 9 Feb 2013 15:32:25 -0500 At 15:53 + on 02/09/2013, esst...@juno.com wrote about DSPSERV with SCOPE=?: >I would like to develope a single routine which is passed >par

DSPSERV with SCOPE=?

When creating a dataspace I want to know if there are any recommendations for making the SCOPE=SINGLE|ALL|COMMON a variable. I would like to develope a single routine which is passed parameters, but the SCOPE= parameter does not seem to allow a parameter to be passed. For Example: DSPSE

STORAGE OBTAIN with ALET

Im reading the MVS Extended Addressability Guide for z/OS. In the chapter Using Access Registers, is a small section titled "Obtaining Storage Outside the Primary Address Space" They way I interpreted this section - A Sever Address Space Could provide its SPACE Token to Other User Address Spaces (

Re: 64Bit Addressing and CALL

First Thanks to al who responded. I see I need to read more. An I understand that CSRSI can only be called in 31/24 bit mode. If I understand Peter Relsons response. Lets says the program to be called is capable of Handling 64 Bit addresses. My program would need to execute a sequence of Instruct

64Bit Addressing and CALL

I have a program that loads CSRSI, It obtains Storage for the response area, and invokes CSRSI via a Call I wanted to replace the STORAGE MACRO with IAVR64 So I believe the program could be re-wriiten as follows: * LOAD EP=CSRSI Load CSRSI Function STR0,CS

Re: Address Space STOKEN

Peter Relson wrote >There is danger in extracting, without proper serialization, the STOKEN of >any address space that is not your home, not your primary, not your >secondary address space. >From the code that I ave seen, btaining the SPACE Token was Always In the >HOME=PRIMARY=SECONDARY Address

Address Space STOKEN

If I need to obtain the Space Token for the current address space, I usually use an ALESERV Macro with the EXTRACTH parameter. * Method 1 ALESERV EXTRACTH,STOKEN=ASTOKEN ASTOKEN DS D I have seen Older Assembler Code which chains through Control Blocks PSA -> ASCB -> ASSB *

Re: Curosity Question

M and The MEGA Life and Health Insurance Company.SM > -Original Message- > From: IBM Mainframe Assembler List [mailto:ASSEMBLER- > l...@listserv.uga.edu] On Behalf Of esst...@juno.com > Sent: Thursday, November 01, 2012 9:25 AM > To: ASSEMBLER-LIST@LISTSERV.UGA.EDU > Subje

Re: Curosity Question

John Gilmore Not being a matchamtician, what exactly do you mean by clustering. -- Original Message -- From: John Gilmore To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Curosity Question Date: Thu, 1 Nov 2012 12:09:20 -0500 Perhaps you are being dense. However named, this is

Re: Curosity Question

slate table. A-Z + 0-9 = 36 possible characters. Chuck Arney Arney Computer Systems -Original Message- From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On Behalf Of esst...@juno.com Sent: Thursday, November 01, 2012 8:49 AM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Su

Re: Curosity Question

t: Re: Curosity Question Date: Thu, 1 Nov 2012 15:03:51 +0100 On 1 November 2012 14:48, esst...@juno.com wrote: > Im not sure I understand the significance of the F'36' (BASENUM). > Can someone explain the significance of using a F'36' bsing used to divide > into a

Curosity Question

Im providing some snipets of code which is used to derive a CICS Terminal ID from an address in storage. The Starting address resides above the line (31-bit). In the CALCID Routine below: The code snipet derives the Termid from the lower order 3 bytes of the storage address by dividing a F'36'

Re: IHAXMD & IHAIETB

305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On Behalf Of esst...@juno.com Sent: 16 October 2012 15:18 To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: IHAXMD & IHAIETB Thanks I wi

Re: IHAXMD & IHAIETB

Thanks I will try to locat it -- Original Message -- From: Roland Schiradin To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: IHAXMD & IHAIETB Date: Mon, 15 Oct 2012 16:41:14 +0200 You might look at SHOWzOS. CBT-Tape FILE#492. Regards Roland Zitat von "esst...@juno.com

IHAXMD & IHAIETB

Im trying to re-create a program I wrote 20 years ago. It displayed all the Program Call (PC) Numbers, the Owning ASID, Associated PC Routine and PC Routine address. I remember correctly the PSA pointed to the CVT and The SVT. The CVT had a field called CVTXSFT The SVT had a field called SVTXMD

Re: Shutting Down a TCB in a STIMERM WAIT

August 2012 11:38, esst...@juno.com wrote: > I need some help in properly shutting down a Task (TCB) that is in a STIMERM > WAIT. > > STIMERM SET,ID=JID,TOD=JEXPIRAY,WAIT=YES > POST REFESH_ECB > > JID DS F ID RETURNED > JEXPIRA

Shutting Down a TCB in a STIMERM WAIT

I need some help in properly shutting down a Task (TCB) that is in a STIMERM WAIT. STIMERM SET,ID=JID,TOD=JEXPIRAY,WAIT=YES POST REFESH_ECB JID DS F ID RETURNED JEXPIRAY DC X'F1F5F0F0F0F0F0F0'EXPIRATION TIME OF DAY In the Above snipet of code

Re: SYSTEM COMPLETION CODE=201

ance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM > -Original Message- > From: IBM Mainframe Assembler List [mailto:ASSEMBLER- > l...@listserv.uga.edu] On Behalf Of esst...@juno.com > Sent: T

SYSTEM COMPLETION CODE=201

SYSTEM COMPLETION CODE=201 Im getting a System Completion code of 201 on the first Invocation of a WAIT macro. Im waitig on a list of events with only 1 ECB required to be posted. I looked up the 201 Abend Code. I am In Key 8 with AMODE 31, the ECBS are not corrupted. After the Job is initialize

Return Code Print

Many many years ago, a Famous Assembler Programmer at Prodigy Services (Fread Veasley) gave me this routine to externalize a Return Code. I have been using it for some time and I cant recall Having a problem with it. I thought I would share it.

Re: Attributes Test In Macros

Thanks For the responses -- Original Message -- From: Paul Gilmartin To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Attributes Test In Macros Date: Sat, 4 Aug 2012 12:45:18 -0600 On Aug 4, 2012, at 11:12, John Gilmore wrote: > Dan Skomsky suggests the statement > > | A

  1   2   >