Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Nortel DMS 10 capture and edit

Status
Not open for further replies.

COTech

Technical User
Feb 4, 2004
1
US
I use Procomm Plus 4.7 to communicate with a Nortel DMS 10 telephone switch. Years ago I used a DOS program called Cross Talk to capture data from my switch,edit it,and send it back in the same format as captured. Is there a way with ProComm that I can do the same.
I have written several scripts in ProComm to do something simular but it is very time consuming to edit each line with the transmit and wait for commands.
In Cross Talk I could set it to send a CR at the end of each capturd line and to look for a certain response before sending the next line. This was set for the whole capture.
 
There's not an "out of the box" way to do this within Procomm. It seems to me that you could write a script to capture data to a file, pop up the file in a text editor to make any edits, and send the file back line by line, as long as the data and prompts are relatively constant. However, that's about the only option I can think of.


aspect@aspectscripting.com
 
Hello,

It's been awhile since I worked on the DMS-10; but it sounds like you're Dumping an OVLY and then wanting to perform an Update to Certain Data in the PC and then Transmit it back to the DMS-10.

Let me know. I'll be back working on the DMS-10's in a Month or so and I may need to do what you're doing.

Hank
 
I am a DMS-10 tec. have been using PCPLUS DOS ver. for over 10+ years now. You can do just about any task if you work at it. I keep 12 old PII 400 working so that I don't have to conv. 5+ megs of scrips to the windows ver. You can do more with 4.7 windows ver. then I do with the dos vers. I have scrips as big as 110k.
Give so info on what you are trying to do good change I have a scrip. to do It.
 
Attached is a short script I put together to read the contents of a text file (or space delimited spreadsheet script.prn) into a DMS 100. Should be pretty much the same.

The script.prn file is basically just a text file that is read into the switch one line at a time, and responds to prompts for y or n acknowledgement.

You can dump the data out to a text file or spreadsheet, make changes, and read it back in with this.

The advantage of this over reading a file in through the 'send file' method, is it reacts to prompts, and creates an error log for certain types of errors...

Oh, and one thing I need to add. This can read in commands as well as data, for example:

quit all
edit sf_test
bottom
delete
file sfdev

(For anyone familiar with the DMS and Store File.)

Code:
string sLine
integer iLen


proc main

when target 0 "DMO REJECTED" MATCHCASE call test suspend
when target 1 "ENTER Y TO CONFIRM" MATCHCASE call test1 
when target 2 "***  ERROR - INCONSISTENT DATA  ***" MATCHCASE call test suspend
when target 3 "NO COMMAND IN LINE" call test2 suspend
when target 4 "***  ERROR  ***" call test3 suspend


if isfile "C:\script.prn"

   fopen 1 "c:\script.prn" READWRITE TEXT            ;Open our data file
   fopen 2 "c:\error.txt" readwrite text
   while not feof 1                       ;While the file still has data
      	fgets 1 sLine                       ;Read a line of data
      	
  	strlen sLine iLen
   	if iLen < 3
   		exitwhile
   	endif
   	transmit sLine
   	transmit "^m"
   	waitfor ">" forever  	
   	waitquiet 1

   endwhile
fclose 1
fclose 2


endif

endproc



proc test
	waitfor ">" forever
	fputs 2 sLine  	
	transmit "n^m"
	waitfor ">" forever
	;transmit "^m"
	when target 1 resume reset

endproc

proc test1
	waitfor ">" forever
	transmit "y^m"
	waitfor ">" forever
	;transmit "^m"
endproc

proc test2
	fputs 2 sLine
	when target 1 resume reset
endproc

proc test3
	waitfor ">" forever
	transmit "abort^m"
	waitfor ">" forever
	when target 1 resume reset
endproc




proc testdialog


dialogbox 0 8 20 264 169 66 "Error" 
   pushbutton 1 45 80 164 35 "Okay" cancel
   text 2 16 5 232 59 sLine left 
enddialog 


endproc
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top