🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: bit.listserv.asm370
Article #192

Re: Shifting memory to the right

#192
From: Robert A. Rosenberg
Date: Tue, 11 Oct 2005 03:35
12 lines
2446 bytes
At 08:31 -0500 on 10/10/2005, David P. de Jongh wrote about Re:
Shifting memory to the right:

>MVCIN (a) is no longer supported and (b) moved data in reverse order, so
>C'ABCDE' would be moved as C'EDCBA'.  Very useful if you put a card in the
>reader backwards, I'm sure, but I for one could never think of a real use
>for it.

As to usage, I use it all the time when I want to locate the last
non-blank in a record. Just do a MVCIN to a workarea and then use a
TRT to find the first non-blank. The offset from the end of the
workarea is the offset in the original record.
Technical Details
Message-ID: <p0623090dbf70e25d7448@[192.168.1.11]>
Path: arc1-ca.pugleaf.net!g2news1.google.com!news3.google.com!news.glorb.com!newsfeed.news2me.com!newsfeed2.easynews.com!newsfeed1.easynews.com!easynews.com!easynews!sn-xit-03!sn-xit-08!sn-xit-14!supernews.com!149.173.6.116.MISMATCH!foggy!vm.sas.com!rarpsl.com!asm
References: <003301c5cd9e$ec189cd0$0100a8c0@davidantecp4>

Show Full Headers
Complete Article Headers
X-Google-Thread: fcdcb,3e46d196c2b56e33
X-Google-Attributes: gidfcdcb,public
X-Google-Language: ENGLISH,ASCII-7-bit
Path: arc1-ca.pugleaf.net!g2news1.google.com!news3.google.com!news.glorb.com!newsfeed.news2me.com!newsfeed2.easynews.com!newsfeed1.easynews.com!easynews.com!easynews!sn-xit-03!sn-xit-08!sn-xit-14!supernews.com!149.173.6.116.MISMATCH!foggy!vm.sas.com!rarpsl.com!asm
From: "Robert A. Rosenberg" <asm@rarpsl.com>
Newsgroups: bit.listserv.asm370
Subject: Re: Shifting memory to the right
Date: Mon, 10 Oct 2005 23:35:17 -0400
Organization: SAS Inc.
Lines: 12
Sender: IBM Mainframe Assembler List <ASSEMBLER-LIST@LISTSERV.UGA.EDU>
Message-ID: <p0623090dbf70e25d7448@[192.168.1.11]>
References: <003301c5cd9e$ec189cd0$0100a8c0@davidantecp4>
NNTP-Posting-Host: mozart.unx.sas.com
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
X-Trace: foggy.unx.sas.com 1129002563 22879 10.19.150.41 (11 Oct 2005 03:49:23 GMT)
X-Complaints-To: usenet@unx.sas.com
NNTP-Posting-Date: Tue, 11 Oct 2005 03:49:23 +0000 (UTC)
Comments: Gated by NETNEWS@VM.SAS.COM
Return-Path: <owner-assembler-list@LISTSERV.UGA.EDU>
X-Mailer: Eudora for Mac OS X 6.2.3 (MacOS 10.3)
X-AntiAbuse: This header was added to track abuse,
             please include it with any abuse report
X-AntiAbuse: Primary Hostname - server70.totalchoicehosting.com
X-AntiAbuse: Original Domain - listserv.uga.edu
X-AntiAbuse: Originator/Caller UID/GID - [0 0] / [47 12]
X-AntiAbuse: Sender Address Domain - rarpsl.com
Approved-By: "Robert A. Rosenberg" <asm@RARPSL.COM>
In-Reply-To: <003301c5cd9e$ec189cd0$0100a8c0@davidantecp4>
Return-Path: owner-assembler-list@LISTSERV.UGA.EDU
X-OriginalArrivalTime: 11 Oct 2005 03:49:21.0632 (UTC)
                       FILETIME=[C39C2600:01C5CE16]
Originator: daemon@mozart.unx.sas.com