Re: Move data to a location prior to a given (based) address

[Jon Perryman]

On Tue, 10 Feb 2026 17:41:22 -0500, David Clark <dlcl...@winsupply.com> wrote:

>IF    TXTREQU,EQ,C'S'    IF IN SCRIPTING MODE
> SHI  R10,2               POINT TO SCRIPTING PARM AREA
> MVC  TXTSRETN,HOLDRETN   SAVE STRING RETURN CODE
> AHI  R10,2               POINT TO LEGACY LENGTH AND STRING
>ENDIF                    ENDIF

The correct solution is to code a second  DSECT instead of ORG.

NAME USING TXT,TXTNEW
      MVC  NAME.TXTSRETN,HOLDRETN
      DROP NAME

Anyone making changes will get an error for TXTSRETN when not used correctly.