As you have coded it, FLD4 is outside of the USING for Area1 (Fld4 starts at the 6K boundary). The USING for Area1 only covers the first 4K, so you would need a second base register in the USING for Area1 if you want to use Fld4 as the base for Area2.
USING Area2,Fld2 should work just fine, bit not Fld3 or Fld4 without a second Area1 base reg. HTH Peter -----Original Message----- From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On Behalf Of Robert Ngan Sent: Thursday, February 20, 2014 1:54 PM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Error with dependant USING beyond 4096 bytes I'm trying to use a dependant USING for an area beyond 4096 bytes from the base register, but the USING is generating a "ASMA307E No active USING for operand" error. The Language Reference manual states for "Dependant USING" on page 227: address is a simply relocatable expression that represents an implicit address within the | range of an active USING instruction. The range of an active USING is | considered to be that which is valid for generating 12-bit or 20-bit | displacements. so it should work. However there are revision bars so maybe our system is missing maintenance. Does the following assemble cleanly for anyone on the list? TEST TITLE 'Dependant USING beyond 4K' TEST RSECT USING TEST,12 USING (Area1,Area1+Area1Len),11 EJECT , Display USING map USING Area2,Fld4 LLH 0,Yonder1 LAY 1,Yonder2 LTORG , Area1 DSECT Fld1 DS XL2048 Fld2 DS XL2048 Fld3 DS XL2048 Fld4 DS XL2048 Area1Len EQU *-Area1 Area2 DSECT Yonder1 DS H Yonder2 DS 0X END Robert Ngan CSC Financial Services Group This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system.
