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.
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Re: IDMS/Intertest DC999999L
"Sill answer,

Don't know, but I'll check. Seems to me that the module is an Intertest =
module, (some of their messages start with CAMR...)

Dick

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

Outcomes