Guys:
I have a field in a RACF parameter list ...CMDBUFL ..this is the length of the
command buffer.
It looks like it is x'F8' which is 248 ..bytes. I need to calculate the total
length of CMDBUFD which is
the incoming buffer. I have a issue with a large amount of userids being passed
to our exit..like this
CONNECT (id id id id id id id) GROUP(grpid)
or
CONNECT id GROUP(grpid)
I want be able to logically inside me code to decide do i have one id or many..
I assume ( i know bad word ):
LA R8,CMDBUFD+7
LA R7,TEMPUSR
LOOP DS 0H
CLI 0(r8),C' '
BNE CHKPAR
LA R8,1(R8)
B LOOP
CHKPAR DS 0H
CLI 0(R8),C'('
BE BUMP8
MOVEIT DS 0H
CLI 0(R8),C')'
BE STORID
MVC 0(1,R7),0(R8)
LA R7,1(R7)
LA R8,1(R8)
B MOVEIT
STORID DS 0H
MVC USERID,TEMPUSR
USERID DS CL8
TEMPUSR DS CL8
This is fine for this:
CONNECT id GROUP(xxxxxxx)
But with more than one i know I have an issue so i want to address it by
capturing all the ids..
I have figured that out ...the length is bugging me. I know i missed something
and need another
pair of good , younger eyes..
Regards,
Scott J Ford
Software Engineer
http://www.identityforge.com/
