Re: [External Sender] Re: Changing BRANCH to JUMP...
Not in this case. When multiple macros are included from a single copybook, there is no indication in that section of the listing as to from where such macros came. Yes, it has the name(s) of the macro but not where it came from. In my case, the copy code also had PRINT OFF around it. The following is that section of the listing. BIT Macro and Copy Code Source Summary Page 20 Con SourceVolumeMembers HLASM R6.0 2024/05/28 11.41 PRIMARY INPUT AND ELSE ENDIFIF JK JNK WEND WEXIT WHILEWLOOP L1 DAP.PROD IDD031IF WHILE L6 PRD1.MACLIB DOSRESRETURN SAVE Sincerely, Dave Clark -- int.ext: 91078 direct: (937) 531-6378 home: (937) 751-3300 Winsupply Group Services 3110 Kettering Boulevard Dayton, Ohio 45439 USA (937) 294-5331 On Fri, May 24, 2024 at 9:30 PM Ed Jaffe < 17285f33d197-dmarc-requ...@listserv.uga.edu> wrote: > On 5/24/2024 8:58 AM, David Clark wrote: > > Can't find that macro, either. Now what? ;-) > > The "Macro and Copy Code Source Summary" on the HLASM listing shows from > which library every macro and copy code member was read. > > -- > Phoenix Software International > Edward E. Jaffe > 831 Parkview Drive North > El Segundo, CA 90245 > https://www.phoenixsoftware.com/ > > > > > This e-mail message, including any attachments, appended messages and the > information contained therein, is for the sole use of the intended > recipient(s). If you are not an intended recipient or have otherwise > received this email message in error, any use, dissemination, distribution, > review, storage or copying of this e-mail message and the information > contained therein is strictly prohibited. If you are not an intended > recipient, please contact the sender by reply e-mail and destroy all copies > of this email message and do not otherwise utilize or retain this email > message or any or all of the information contained therein. Although this > email message and any attachments or appended messages are believed to be > free of any virus or other defect that might affect any computer system > into > which it is received and opened, it is the responsibility of the recipient > to ensure that it is virus free and no responsibility is accepted by the > sender for any loss or damage arising in any way from its opening or use. >
Re: [External Sender] Re: Changing BRANCH to JUMP...
On 5/24/2024 8:58 AM, David Clark wrote: Can't find that macro, either. Now what? ;-) The "Macro and Copy Code Source Summary" on the HLASM listing shows from which library every macro and copy code member was read. -- Phoenix Software International Edward E. Jaffe 831 Parkview Drive North El Segundo, CA 90245 https://www.phoenixsoftware.com/ This e-mail message, including any attachments, appended messages and the information contained therein, is for the sole use of the intended recipient(s). If you are not an intended recipient or have otherwise received this email message in error, any use, dissemination, distribution, review, storage or copying of this e-mail message and the information contained therein is strictly prohibited. If you are not an intended recipient, please contact the sender by reply e-mail and destroy all copies of this email message and do not otherwise utilize or retain this email message or any or all of the information contained therein. Although this email message and any attachments or appended messages are believed to be free of any virus or other defect that might affect any computer system into which it is received and opened, it is the responsibility of the recipient to ensure that it is virus free and no responsibility is accepted by the sender for any loss or damage arising in any way from its opening or use.
Re: Changing BRANCH to JUMP...
I would assume that your BK is BC 3, in which case the appropriate translation in BRC 3. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 עַם יִשְׂרָאֵל חַי נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר From: IBM Mainframe Assembler List on behalf of Martin Trübner <1237eee49f7e-dmarc-requ...@listserv.uga.edu> Sent: Friday, May 24, 2024 11:34 AM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Changing BRANCH to JUMP... Dave, BK never existed- could this be an inhouse macro? What is the condition that is in the corresponding 47instruction? or- how would you code the nn in this: BC nn,label Martin On 24.05.24 17:16, David Clark wrote: > Some time back I changed my logical construct macro sets to use > the relative forms of branching. That has been working fine as I > reassemble things. But today I came across one that failed to resolve > successfully--but I can't find anything about it in the manuals I have. It > was a branch on carry (BK) mnemonic and, apparently, JK is not recognized > as such. I presume this is one of the exceptions to simply replacing B > with J? Help?!? ;-) > > Sincerely, > > Dave Clark > -- > int.ext: 91078 > direct: (937) 531-6378 > home: (937) 751-3300 > > Winsupply Group Services > 3110 Kettering Boulevard > Dayton, Ohio 45439 USA > (937) 294-5331
Re: [External Sender] Re: Changing BRANCH to JUMP...
Nevermind... I found them both in a copybook for my IF/THEN/ELSE/ENDIF logical construct set. I missed them when I went though initially to change over to relative jump instructions. Fixing them now. Thanks for listening. ;-) Sincerely, Dave Clark -- int.ext: 91078 direct: (937) 531-6378 home: (937) 751-3300 Winsupply Group Services 3110 Kettering Boulevard Dayton, Ohio 45439 USA (937) 294-5331 On Fri, May 24, 2024 at 11:58 AM David Clark wrote: > Thanks, Martin. The existing code that has worked for years and years > looked like this. > > IF R8,(K,ALR),R8 > MVI 0(R9),C'1' > ENDIF > > That generated assembled code that looked like this. > > 787 ALR R8,R8 > 788 BNK ELSE0017 > 789+ BC12,ELSE0017 branch on no carry > > So, you're correct that it appears to be a macro -- but I can't find any > such macro on my system. For fun, I also tried the positive condition and > it generated assembled code that looked like this. > > 787 ALR R8,R8 > 788 BKELSE0017 > 789+ BC3,ELSE0017 branch on carry > > Can't find that macro, either. Now what? ;-) > > Sincerely, > > Dave Clark > -- > int.ext: 91078 > direct: (937) 531-6378 > home: (937) 751-3300 > > Winsupply Group Services > 3110 Kettering Boulevard > Dayton, Ohio 45439 USA > (937) 294-5331 > > > On Fri, May 24, 2024 at 11:34 AM Martin Trübner < > 1237eee49f7e-dmarc-requ...@listserv.uga.edu> wrote: > >> Dave, >> >> >> BK never existed- could this be an inhouse macro? >> >> >> What is the condition that is in the corresponding 47instruction? >> >> >> or- how would you code the nn in this: BC nn,label >> >> >> Martin >> >> On 24.05.24 17:16, David Clark wrote: >> > Some time back I changed my logical construct macro sets to use >> > the relative forms of branching. That has been working fine as I >> > reassemble things. But today I came across one that failed to resolve >> > successfully--but I can't find anything about it in the manuals I >> have. It >> > was a branch on carry (BK) mnemonic and, apparently, JK is not >> recognized >> > as such. I presume this is one of the exceptions to simply replacing B >> > with J? Help?!? ;-) >> > >> > Sincerely, >> > >> > Dave Clark >> > -- >> > int.ext: 91078 >> > direct: (937) 531-6378 >> > home: (937) 751-3300 >> > >> > Winsupply Group Services >> > 3110 Kettering Boulevard >> > Dayton, Ohio 45439 USA >> > (937) 294-5331 >> >
Re: [External Sender] Re: Changing BRANCH to JUMP...
Thanks, Martin. The existing code that has worked for years and years looked like this. IF R8,(K,ALR),R8 MVI 0(R9),C'1' ENDIF That generated assembled code that looked like this. 787 ALR R8,R8 788 BNK ELSE0017 789+ BC12,ELSE0017 branch on no carry So, you're correct that it appears to be a macro -- but I can't find any such macro on my system. For fun, I also tried the positive condition and it generated assembled code that looked like this. 787 ALR R8,R8 788 BKELSE0017 789+ BC3,ELSE0017 branch on carry Can't find that macro, either. Now what? ;-) Sincerely, Dave Clark -- int.ext: 91078 direct: (937) 531-6378 home: (937) 751-3300 Winsupply Group Services 3110 Kettering Boulevard Dayton, Ohio 45439 USA (937) 294-5331 On Fri, May 24, 2024 at 11:34 AM Martin Trübner < 1237eee49f7e-dmarc-requ...@listserv.uga.edu> wrote: > Dave, > > > BK never existed- could this be an inhouse macro? > > > What is the condition that is in the corresponding 47instruction? > > > or- how would you code the nn in this: BC nn,label > > > Martin > > On 24.05.24 17:16, David Clark wrote: > > Some time back I changed my logical construct macro sets to use > > the relative forms of branching. That has been working fine as I > > reassemble things. But today I came across one that failed to resolve > > successfully--but I can't find anything about it in the manuals I have. > It > > was a branch on carry (BK) mnemonic and, apparently, JK is not recognized > > as such. I presume this is one of the exceptions to simply replacing B > > with J? Help?!? ;-) > > > > Sincerely, > > > > Dave Clark > > -- > > int.ext: 91078 > > direct: (937) 531-6378 > > home: (937) 751-3300 > > > > Winsupply Group Services > > 3110 Kettering Boulevard > > Dayton, Ohio 45439 USA > > (937) 294-5331 >
Re: Changing BRANCH to JUMP...
Dave, BK never existed- could this be an inhouse macro? What is the condition that is in the corresponding 47instruction? or- how would you code the nn in this: BC nn,label Martin On 24.05.24 17:16, David Clark wrote: Some time back I changed my logical construct macro sets to use the relative forms of branching. That has been working fine as I reassemble things. But today I came across one that failed to resolve successfully--but I can't find anything about it in the manuals I have. It was a branch on carry (BK) mnemonic and, apparently, JK is not recognized as such. I presume this is one of the exceptions to simply replacing B with J? Help?!? ;-) Sincerely, Dave Clark -- int.ext: 91078 direct: (937) 531-6378 home: (937) 751-3300 Winsupply Group Services 3110 Kettering Boulevard Dayton, Ohio 45439 USA (937) 294-5331
Changing BRANCH to JUMP...
Some time back I changed my logical construct macro sets to use the relative forms of branching. That has been working fine as I reassemble things. But today I came across one that failed to resolve successfully--but I can't find anything about it in the manuals I have. It was a branch on carry (BK) mnemonic and, apparently, JK is not recognized as such. I presume this is one of the exceptions to simply replacing B with J? Help?!? ;-) Sincerely, Dave Clark -- int.ext: 91078 direct: (937) 531-6378 home: (937) 751-3300 Winsupply Group Services 3110 Kettering Boulevard Dayton, Ohio 45439 USA (937) 294-5331
