Aspect script needed to import 200 Nortel sets 1

[mrclean613]

Greetings - I have an TN import file of 200 Nortel 3904 sets that I need to import into a differant 81C switch. I realize I just need to change the TN's to reflect the new TN's then use Aspect script file to import into the new 81C. Does anyone have a sample script file?

MrClean

 

[johnpoole]

if you have a script to build a single phone, that is what i usually start with to import. bring the script up in word and do a mail merge. i've added several 1000 without a problem. if you need a script to begain with, let us know.

john poole
bellsouth business
columbia,sc

 

[mrclean613]

Yeah - first off, I'll need a script to work off of. Like I mentioned, I have the downloaded 200 sets in an excel sheet dumped from the old location. I want to retain their entire profile but change their TN's and DES. I'm real green on this "mail merge" format. Isn't there a script that will read from the excel sheet and populate the data?

Thanks for the support!
MrClean

 

[johnpoole]

here's a very routine script for adding one set,

proc main
   transmit "NEW^M"
   waitfor "TYPE: "
   transmit "2616^M"
   waitfor "TN "
   transmit "
   waitfor "CUST "   
   transmit "0^M"
   waitfor "AOM  "
   transmit "^M"
   waitfor "FDN  "
   transmit "3301^M"
   waitfor "TGAR "
   transmit "^M"
   waitfor "LDN  "
   transmit "^M"
   
   waitfor "SSU  "
   transmit "^M"
   waitfor "SCPW "
   transmit "^M"
   waitfor "SGRP "
   transmit "^M"
   waitfor "CLS  "
   transmit "LNA MWA FNA IRA HTA TDD  "
   waitfor "HUNT "
   transmit "3301^M"
   ;waitfor "LHK  "
   ;transmit "^M"
   waitfor "SCI  "
   transmit "^M"
   waitfor "PLEV "
   transmit "^M"
   waitfor "FCAR "
   transmit "^M"
   waitfor "AST  "
   transmit "^M"
   waitfor "IAPG "
   transmit "^M"
   waitfor "MLWU_LANG "
   transmit "^M"
   waitfor "DNDR "
   transmit "^M"
   ;waitfor "KEY "
   ;transmit "0 MCR 1962^M"
   ;waitfor "  MARP "
   ;transmit "YES^M"
   ;waitfor "  CPND "
   ;transmit "^M"
   ;waitfor "  VMB "
   ;transmit "^M"
   ;waitfor "KEY "
   ;transmit "1 MCR 1962^M"
   ;waitfor "  MARP "
   ;transmit "^M"
   ;waitfor "  CPND "
   ;transmit "^M"
   ;waitfor "  VMB "
   ;transmit "^M"
   waitfor "KEY "
   transmit "2 AO6^M"
   waitfor "KEY "
   transmit "3 TRN^M"
   waitfor "KEY "
   transmit "4 CFW 16^M"
   waitfor "KEY "
   transmit "8 ADL^M"
   waitfor "KEY "
   transmit "9 ADL^M"
   waitfor "KEY "
   transmit "10 ADL^M"
   waitfor "KEY "
   transmit "11 ADL^M"
   waitfor "KEY "
   transmit "12 ADL^M"
   waitfor "KEY "
   transmit "13 ADL^M"
   waitfor "KEY "
   transmit "14 MWK 3301^M"
   waitfor "KEY "
   transmit "^M"

endproc

i use that type of script to merge with my excel to build those phones, depending on the number i may sort by type and add all the 2616's on a single pass, or all the analogs, etc.. with 200 digitals, i would run that as a single script.. the 1st time you work through it, you may not save a lot of time, but after a few trials, you'll save way more time then it takes to burn a script. i can add a few thousand in a day, plus they go in perfect, and you can add acd sets via a script, it's uses the new command

john poole
bellsouth business
columbia,sc

 

[Jaccodo]

Here is an example script how to change sets from an input file. Just change the chg part into the part johnpoole posted and convert the excel into csv and sit back and watch how the script does your work.

GRTZ Jacco!


Proc main
string tnb
string dnb

integer count
string szline
fopen 0 "xxx.csv" read

while not feof 0
SZLINE = ";"
fgets 0 szline

strtok tnb szline ";" 1 ;colums in the csv file
strtok dnb szline ";" 1 ;colums in the csv file


transmit "chg^M"
waitfor "TYPE: "
transmit "2616^M"
waitfor "TN "
transmit tnb
transmit "^M"
waitfor "ECHG "
transmit "yes^M"
waitfor "ITEM "
transmit "fdn 8571^M"
waitfor "ITEM "
transmit "cls cfta htd^M"
waitfor "ITEM "
transmit "hunt x^M"
waitfor "ITEM "
transmit "efd 8571^M"
waitfor "ITEM "
transmit "eht 8570^M"
waitfor "ITEM "
transmit "^M"
waitfor "REQ: "


count += 1
endwhile
fclose 0
fclose 1
call main
endproc

 

[johnpoole]

clean script, but do not post phone numbers or emails on this forum.

john poole
bellsouth business
columbia,sc