I would run one of the dis-assemblers on it and see how complicated it is. It might be extremely easy or impossible.

Ed

On Jun 22, 2006, at 10:37 AM, Charles Mills wrote:

will ... be enough to satisfy my client's requirements?

Hard to say from this distance.

I can tell you that

- almost no non-trivial older program ever becomes purely 31-bit. Your
client may be happy if your result is "mostly 31-bit" or "as 31-bit as
reasonably possible."
- I think it's worth a shot to see if it will run 31-bit, either both A & R = 31, or just A=31, R=24. Sometimes you win these things on blind luck. There is nothing about an older program that necessarily means it will not
run AMODE 31.

Charles



-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Stephen M. Wiegand
Sent: Thursday, June 22, 2006 7:01 AM
To: [email protected]
Subject: Old Hashing Routine


My client has instructed me to modify some modules so that they run
above the line.  This was a no brainer until I ran across a call to
module BQKDPRS in several of the modules.  This is an old (1970's)
hashing routine for encrypting and decrypting a pin
number.  Naturally the client only has the object code and, since it
is so old, it can only run below the line.  So my questions are:

1.  Is there another routine that does the same thing as BQKDPRS but
can run above the line?

2.  If there isn't, will specifying DATA(31) for the compile options
of the Cobol programs calling BQKDPRS and Binder options of
Amode(31), Rmode(Any) be enough to satisfy my client's requirements?

Thanks.

Steve Wiegand

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to