Turning off message lights - mass turn off?

I know I can do it one at a time, but one at a time does me no good if there are a few hundred with lights on and I don't know which ones are in this state. I need to turn them all off system-wide, if possible. I've never seen a way to do this though. Is there a way?

Build a script clr amw all XXXX.

You mean something that could be run via a Windows command prompt that would telnet in and run this command over and over again hitting every ext I specify?

import through asa

ASA only allows 'Add' 'Change' or 'Remove' commands for import...there's no option to allow the 'Clear' command unless you've found some way to do it. Please elaborate.

scripts that will clear all "lighted" amw and give you a log for all extensions that had a light on or off. This can be done with access to "go tcm" which is an Avaya services tool.

You don't have permissions to do this. You could only run a script that does clear amw all xxxx for each programmed extension.

A great teacher, does not provide answers, but methods to teach others "How and where to find the answers"

bsh

36 years Bell, AT&T, Lucent, Avaya
Tier 3 for 26 years and counting

Ok, but where in ASA do you do this? I've looked around and I don't see where to do it. Can you briefly describe the process???

In ASA, copy your string into the "report" (Menu/ System/Advanced/Report). The string being: clear amw all xxxx;clear amw all xxxx;clear amw all xxxx etc... The report field has a field limitations... however you can run them in batches. Also truncate the command "cl am al xxxx;" to fit more in. I've been able to easily process thousands extensions using this method including turning off the MWI's. You also get a report when it's done.

To get the string formatted correctly Use an export to get a list of extensions... format accordingly with excel and notepad using copy paste and replace.

good luck

Wildcard

How about running that as an audit in AUDIX or Modular Messaging... it is one command. It will go out and reconcile those that should be off.

Thanks.

We're using Microsoft Unified Messaging for voice mail and I've not seen an option in there to force a sync of the lights.

Wildcard....do you recall about how many you can paste into a single job? I'll break them up into batches that are within whatever limit it has. I probably have less than a 1,000 to do.

I use ASA 5.2.13 sp 5.02...(i know if varies depending on version) it has at least a couple of thousand characters. What I do is when I copy, I note the last entry and ensure it gets copied in the report field. If it's not the last entry in the report field, I note the last entry and that's my next starting point. I usually do around 250 commands at a time.

Ensure you have no typo's as that will stop the report.

Wildcard

One last thing. I'm having trouble finding the exact concatenate formula to combine the rows in excel to end up with a single line that I can paste into ASA. Any advice? I can use =CONCATENATE(B1&B2) to combine B1 and B2...and continue it with B3, B4, etc, etc but that's a lot of manual typing. I'm trying to find a command that specifies a range of rows to avoid all the typing. How did you do it? I tried : (colon), but it's not working either.

Enter =CONCATENATE(

Then click call B1, hold down the Ctrl key and click, B2, B3, B4, B5, etc.

Then end the formula with ) and hit enter.

- Stinney

Quoting only proves you know how to cut and paste.

That does work...but it's a whoooooole lot of clicking when you've got a thousand to do.

No doubt there is a better way... but here's how I do it.

1.) Get a list of extensions in question via an export report and open delimited style in Excel. Put the extensions in column B.
2.) In excel column A enter cl am al (clear amw all)and copy it all the way down to the end of the extension list.
3.) In excel column C enter ; and copy it all the way down to the end of the extension list.
4.) Now you have cl am al xxxx ;
5.) Copy all cells top to bottom of all three columns A B C
6.) Open notepad and paste information
7.) In notepad highlight the empty space between cl am all and xxxx and copy it. Then click Edit and Replace. in the Find what field right click and past the empty space that you just copied. in the Replace with field hit the space bar to add a space. then click replace button a couple of times, if it correctly worked on the first line then hit replace all.
8. Now do the same with the "space ;" in the Find what field and replace with ";" replacing with "no space ;".
9. Now its formatted correctly (cl am al xxxx.. However to use the command stacking technique they need to be one after another (cl am al xxxx;cl am al xxxx. This is the part that is painful... go to the end of the top entry and hit delete, then hit end, then delete and over and over... ensuring you don't delete a character or alter the format (the report will fail if you do). You can get in a rhythm and stack all the commands fairly quickly.

Wildcard

OK, so sorry for the long post here that's a little off topic:

In a new spreadsheet in cell A1 enter B and copy and paste down as many rows of data you have in your other sheet that you want to concatenate.

In cell B1 enter 1, in B2 enter 2. Highlight these 2 cells and use the Autofill feature to click and drag this to the last row of the Bs in column 1. (autofill feature is the little black dot in the bottom left of the highlighted cells) This should incremenet by 1s.

In C1 enter: =A1&B1&"&"

In C2 enter: =C1&A2&B2&"&"

Copy this to the last row.

Edit the formula in the last cell in column C and remove the &"&"

Copy this last cell's formula and paste special as value right back into the same cell.

Press F2 and highlight all the data in the cell and copy the string. (DO NOT JUST SELECT THE CELL AND COPY, it won't work that way) you have to go into the cell and select the entire string in the text edit line)

Go back to your other spreadsheet and select the cell you want to put the formula in, enter = then paste the string you copied and press enter.




- Stinney

Quoting only proves you know how to cut and paste.

I found a pretty simple way to do this. Well, actually, I gave this to our intern as a challenge and in 5 minutes he had a solution ;-)

He used a macro in Excel to do it. It now allows a range to work. We had to hit Alt F11 to bring up the Microsoft Visual Basic editor and do something in there with the text below. I think he had an idea of what he wanted to do, but he found the test needed below, online somewhere. I'll see if he can type of the exact steps and post them here...or if I can remember all the steps I'll do it myself. Thanks for your help guys.



Option Explicit

Function ConcRange(Substrings As Range, Optional Delim As String = "", _
Optional AsDisplayed As Boolean = False, Optional SkipBlanks As Boolean = False)

' Concatenates a range of cells, using an optional delimiter. The concatenated
' strings may be either actual values (AsDisplayed=False) or displayed values.
' If NoBlanks=True, blanks cells or cells that evaluate to a zero-length string
' are skipped in the concatenation

' Substrings: the range of cells whose values/text you want to concatenate. May be
' from a row, a column, or a "rectangular" range (1+ rows, 1+ columns)

' Delimiter: the optional separator you want inserted between each item to be
' concatenated. By default, the function will use a zero-length string as the
' delimiter (which is what Excel's CONCATENATE function does), but you can specify
' your own character(s). (The Delimiter can be more than one character)

' AsDisplayed: for numeric values (includes currency but not dates), this controls
' whether the real value of the cell is used for concatenation, or the formatted
' displayed value. Note for how dates are handled: if AsDisplayed is FALSE or omitted,
' dates will show up using whatever format you have selected in your regional settings
' for displaying dates. If AsDisplayed=TRUE, dates will use the formatted displayed
' value

' SkipBlanks: Indicates whether the function should ignore blank cells (or cells with
' nothing but spaces) in the Substrings range when it performs the concatenation.
' If NoBlanks=FALSE or is omitted, the function includes blank cells in the
' concatenation. In the examples above, where NoBlanks=False, you will see "extra"
' delimiters in cases where the Substrings range has blank cells (or cells with only
' spaces)

Dim CLL As Range

For Each CLL In Substrings.Cells
If Not (SkipBlanks And Trim(CLL) = "") Then
ConcRange = ConcRange & Delim & IIf(AsDisplayed, Trim(CLL.Text), Trim(CLL.Value))
End If
Next CLL

ConcRange = Mid$(ConcRange, Len(Delim) + 1)

End Function

Ok, here's the process:

1. Open excel file that you want to edit.
2. Press Alt F11.
3. Click ‘Insert’, then ‘Module’
4. Paste in the text below and click Save as .xlsm (Macro enabled workbook).
5. Back in the spreadsheet, click a cell where you want to put the formula and type =ConcRange
6. Now select the first cell you want to start with.
7. Hold down Shift and go down to the last cell in the range you want and click that cell.
8. Lastly, put a ) to complete the formula. Now all these cells in the multiple rows are joined together.

The text to place in the module is this:

Option Explicit

Function ConcRange(Substrings As Range, Optional Delim As String = "", _
Optional AsDisplayed As Boolean = False, Optional SkipBlanks As Boolean = False)

' Concatenates a range of cells, using an optional delimiter. The concatenated
' strings may be either actual values (AsDisplayed=False) or displayed values.
' If NoBlanks=True, blanks cells or cells that evaluate to a zero-length string
' are skipped in the concatenation

' Substrings: the range of cells whose values/text you want to concatenate. May be
' from a row, a column, or a "rectangular" range (1+ rows, 1+ columns)

' Delimiter: the optional separator you want inserted between each item to be
' concatenated. By default, the function will use a zero-length string as the
' delimiter (which is what Excel's CONCATENATE function does), but you can specify
' your own character(s). (The Delimiter can be more than one character)

' AsDisplayed: for numeric values (includes currency but not dates), this controls
' whether the real value of the cell is used for concatenation, or the formatted
' displayed value. Note for how dates are handled: if AsDisplayed is FALSE or omitted,
' dates will show up using whatever format you have selected in your regional settings
' for displaying dates. If AsDisplayed=TRUE, dates will use the formatted displayed
' value

' SkipBlanks: Indicates whether the function should ignore blank cells (or cells with
' nothing but spaces) in the Substrings range when it performs the concatenation.
' If NoBlanks=FALSE or is omitted, the function includes blank cells in the
' concatenation. In the examples above, where NoBlanks=False, you will see "extra"
' delimiters in cases where the Substrings range has blank cells (or cells with only
' spaces)

Dim CLL As Range

For Each CLL In Substrings.Cells
If Not (SkipBlanks And Trim(CLL) = "") Then
ConcRange = ConcRange & Delim & IIf(AsDisplayed, Trim(CLL.Text), Trim(CLL.Value))
End If
Next CLL

ConcRange = Mid$(ConcRange, Len(Delim) + 1)

End Function