redsjacketsfan
Technical User
Read the post from John/BSLD and ACE on the MDR 200 and CLID retrieval.
Below is the mdr2000.col script portion w/CLID
; Retrieve the Calling Line ID from the call.
let CheckPos = pos('D', M2KData$, FALSE)
if CheckPos <> 0 then
begin
loop
let M2KTemp$ = copy(M2KData$, 1, CheckPos-1)
let M2KTemp$ = M2KTemp$ + copy(M2KData$, CheckPos+1, 255)
let M2KData$ = M2KTemp$
let M2KChar$ = copy(M2KData$, CheckPos, 1)
if (M2KChar$ < '0') or (M2KChar$ > '9') then Exit
let CLID$ = CLID$ + M2KChar$
endloop
end
John or Ace when you say change the MDR2000 string, is the above what you are talking about, or something else. If it is can you tell me what I would change?
BTW I do get the CLID when I do a trace on a call. I just don't get it on the OTM reports.
Thank you in advance
Below is the mdr2000.col script portion w/CLID
; Retrieve the Calling Line ID from the call.
let CheckPos = pos('D', M2KData$, FALSE)
if CheckPos <> 0 then
begin
loop
let M2KTemp$ = copy(M2KData$, 1, CheckPos-1)
let M2KTemp$ = M2KTemp$ + copy(M2KData$, CheckPos+1, 255)
let M2KData$ = M2KTemp$
let M2KChar$ = copy(M2KData$, CheckPos, 1)
if (M2KChar$ < '0') or (M2KChar$ > '9') then Exit
let CLID$ = CLID$ + M2KChar$
endloop
end
John or Ace when you say change the MDR2000 string, is the above what you are talking about, or something else. If it is can you tell me what I would change?
BTW I do get the CLID when I do a trace on a call. I just don't get it on the OTM reports.
Thank you in advance