I assume your query is directed to me, the original poster. The assembler subroutines are being used for some fairly basic processing that simply isn't available in COBOL (or wasn't at the time the assembler routines were written): - calling of a few basic macros (POST, STIMER [STIMER not used under CICS though!]) - A routine to "expand" each bit to a byte (x'F0' or x'F1') and to "unexpand" same - A routine to get the address of a working-storage area - A routine to perform an XOR operation
- EBCDIC/ASCII translation - A basic compression routine - A "base 94" conversion routine - Some other things that probably should have been done in COBOL but were done in assembler for reasons unknown to me... Frank >________________________________ > From: Robert A. Rosenberg <hal9...@panix.com> >To: IBM-MAIN@LISTSERV.UA.EDU >Sent: Sunday, July 22, 2012 9:34 PM >Subject: Re: re-entrant modules and the binder > >At 09:13 -0700 on 07/22/2012, Charles Mills wrote about Re: >re-entrant modules and the binder: > >> > and it finds many but not quite all of them. >> >>Basically, it finds >> >>ST 1,FOO where FOO is defined in the CSECT something like >> >>FOO DC F'0' >> >>but it does not find things like the following construct that IBM macros are >>or were fond of >> >>CNOP 0,4 >>BAL 1,*+8 >>DC F'0' >>ST 2,0(0,1) >> >>In the first case it "knows" that FOO is in a code section but in the latter >>it only knows that R1 is pointing "somewhere." >> >>Charles > >Since these modules are intended for use with CICS, most of the IBM >macros that would fool the RENT Check are going to be ones that >should not be being used in the first place. For example, doing I/O >(and thus using OPEN/CLOSE and I/O calls) is not something you are >supposed to do under CICS (you use the CICS not the OS support). What >is the the intent of the Assembler Routines? > >---------------------------------------------------------------------- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
