Convert Nortel CCMS Scripting to a Vector

[TelecomTony]

Hello,

I am looking to convert a call flow from a Nortel CCMS script to CM 7 using VDN and Vectors. I am using a month check in the Nortel system to play different announcements depending on the month using call variables. So for the month of Jan, I will play announcements 1, 2 and 3. For the month of Feb I will play announcements 3, 4 and 1. Is there any way to do this using VDN, vectors and variables?

Here is the script I am using in the Nortel CCMS system in case is helps.

where month of year equals
value January: execute month1
value February: execute month2
value March: execute month3
value April: execute month4
value May: execute month5
value June: execute month6
value July: execute month7
value August: execute month8
value September: execute month9
value October: execute month10
value November: execute month11
value December: execute month12
default: execute month1
end where

Section month1

ASSIGN 12043 TO ran_1
ASSIGN 12031 TO ran_2
ASSIGN 12025 TO ran_3
ASSIGN 12025 TO ran_4
ASSIGN 12025 TO ran_5
execute queue_time


Section month2

ASSIGN 12041 TO ran_1
ASSIGN 12043 TO ran_2
ASSIGN 12053 TO ran_3
ASSIGN 12047 TO ran_4
ASSIGN 12047 TO ran_5
execute queue_time

Section month3

ASSIGN 12025 TO ran_1
ASSIGN 12035 TO ran_2
ASSIGN 12045 TO ran_3
ASSIGN 12045 TO ran_4
ASSIGN 12045 TO ran_5
execute queue_time

Section month4

ASSIGN 12035 TO ran_1
ASSIGN 12045 TO ran_2
ASSIGN 12053 TO ran_3
ASSIGN 12053 TO ran_4
ASSIGN 12053 TO ran_5
execute queue_time

Section month5

ASSIGN 12025 TO ran_1
ASSIGN 12047 TO ran_2
ASSIGN 12051 TO ran_3
ASSIGN 12051 TO ran_4
ASSIGN 12051 TO ran_5
execute queue_time

Section month6

ASSIGN 12041 TO ran_1
ASSIGN 12047 TO ran_2
ASSIGN 12049 TO ran_3
ASSIGN 12049 TO ran_4
ASSIGN 12049 TO ran_5
execute queue_time


Section month7

ASSIGN 12051 TO ran_1
ASSIGN 12053 TO ran_2
ASSIGN 12047 TO ran_3
ASSIGN 12047 TO ran_4
ASSIGN 12047 TO ran_5
execute queue_time


Section month8

ASSIGN 12047 TO ran_1
ASSIGN 12051 TO ran_2
ASSIGN 12049 TO ran_3
ASSIGN 12049 TO ran_4
ASSIGN 12049 TO ran_5
execute queue_time


Section month9

ASSIGN 12041 TO ran_1
ASSIGN 12049 TO ran_2
ASSIGN 12055 TO ran_3
ASSIGN 12055 TO ran_4
ASSIGN 12055 TO ran_5
execute queue_time

Section month10

ASSIGN 12031 TO ran_1
ASSIGN 12035 TO ran_2
ASSIGN 12055 TO ran_3
ASSIGN 12055 TO ran_4
ASSIGN 12055 TO ran_5
execute queue_time

Section month11

ASSIGN 12035 TO ran_1
ASSIGN 12047 TO ran_2
ASSIGN 12055 TO ran_3
ASSIGN 12055 TO ran_4
ASSIGN 12055 TO ran_5
execute queue_time

Section month12

ASSIGN 12031 TO ran_1
ASSIGN 12041 TO ran_2
ASSIGN 12043 TO ran_3
ASSIGN 12055 TO ran_4
ASSIGN 12055 TO ran_5
execute queue_time

section queue_time

assign PW_Support to skillset_sk

IF OUT OF SERVICE skillset_sk THEN
EXECUTE Closed
ELSE
QUEUE TO SKILLSET skillset_sk
END IF


ASSIGN ((EXPECTED WAIT TIME skillset_sk + 30)/60) TO expwait_rounded_mins_cv
If expwait_rounded_mins_cv > 20 then
wait 2
ASSIGN 12065 TO ran_6
GIVE IVR interruptible mmail WITH TREATMENT ran_6
/* Open Voice Session
play prompt voice segment PositionInQueue number position in queue skillset_sk
End Voice Session */
else
If expwait_rounded_mins_cv > 15 then
wait 2
ASSIGN 12063 TO ran_6
GIVE IVR interruptible mmail WITH TREATMENT ran_6
/* Open Voice Session
play prompt voice segment PositionInQueue number position in queue skillset_sk
End Voice Session */
else
If expwait_rounded_mins_cv > 10 then
wait 2
ASSIGN 12061 TO ran_6
GIVE IVR interruptible mmail WITH TREATMENT ran_6
else
If expwait_rounded_mins_cv > 5 then
wait 2
ASSIGN 12059 TO ran_6
GIVE IVR interruptible mmail WITH TREATMENT ran_6
end if
end if
end if
end if

Section Business

WAIT 2
GIVE IVR interruptible mmail WITH TREATMENT ran_1
WAIT 2
GIVE MUSIC 25
WAIT 45
GIVE IVR interruptible mmail WITH TREATMENT ran_2
WAIT 45
GIVE IVR interruptible mmail WITH TREATMENT ran_3
WAIT 45
GIVE IVR interruptible mmail WITH TREATMENT ran_4
WAIT 2

SECTION check_loop

IF NOT QUEUED THEN
IF OUT OF SERVICE skillset_sk THEN
EXECUTE Closed
ELSE
QUEUE TO SKILLSET skillset_sk
WAIT 2
END IF
END IF
WAIT 45
GIVE IVR interruptible mmail WITH TREATMENT ran_5
WAIT 2
EXECUTE check_loop

SECTION Closed
ROUTE CALL 6470

thanks

Tony