ca.portal.admin

Re:Re: [IDMSVENDOR-L] need help with ADS: source

Discussion created by ca.portal.admin on Aug 18, 2010
MOVE 'OOAK' TO OOAK-KEY-012.
OBTAIN CALC OOAK-012
ALLOWING ('0000' THRU '9999').
OBTAIN FIRST ATTRIBUTE-093 WITHIN DDLDML
ALLOWING ('0000' THRU '9999').
OBTAIN LAST CLASS-092 WITHIN DDLDML
ALLOWING ('0000' THRU '9999').
OBTAIN FIRST DEST-028 WITHIN DDLDML
ALLOWING ('0000' THRU '9999').
OBTAIN FIRST MAP-098 WITHIN DDLDML
ALLOWING ('0000' THRU '9999').
OBTAIN LAST PROG-051 WITHIN DDLDML
ALLOWING ('0000' THRU '9999').
OBTAIN FIRST S-010 WITHIN DDLDML
ALLOWING ('0000' THRU '9999').
OBTAIN LAST SS-026 WITHIN DDLDML
ALLOWING ('0000' THRU '9999').
OBTAIN FIRST SYS-041 WITHIN DDLDML
ALLOWING ('0000' THRU '9999').
OBTAIN LAST USER-047 WITHIN DDLDML
ALLOWING ('0000' THRU '9999').
MOVE 0 TO COUNTER.
OBTAIN FIRST INQ-058 WITHIN DDLDML
ALLOWING ('0000').
WHILE (COUNTER LT 999)
OBTAIN NEXT INQ-058 WITHIN DDLDML
ALLOWING ('0000' '0307').
ADD +1 TO COUNTER.
END.
LEAVE.

The information transmitted is intended only for the person or entity to
which it is addressed and may contain CONFIDENTIAL material. If you
receive this material/information in error, please contact the sender
and delete or destroy the material/information.



The information transmitted is intended only for the person or entity to which it is addressed and may contain CONFIDENTIAL material. If you receive this material/information in error, please contact the sender and delete or destroy the material/information.
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Re: EXTERNAL:IDMS/Intertest DC999999L
"Thanks all,=20

Seems like it was a libraray contatination problem. My developer
replied, after he neglected to tell me Intertest was working again, was:
""I did nothing. Well I made a correction to my JCL member (had a JCL
continuation error because I was commenting and un-commenting a PARM
repeatedly). But no real explanation as to why it started working...""

Thanks again,


Dick

Richard Pierce
(617) 973-8911
richard.pierce@state.ma.us

Outcomes