ZETRON 748, Техническое руководство

Страница: 91 / 259

Programming
025-9368H 77
; ASPECT SCRIPT FILE TO DOWNLOAD DATABASE FILES FROM 7XX BASED PRODUCTS
; THIS SCRIPT SENDS THE PHONE NUMBER FOLLOWED BY PASSWORD IN DTMF
; THE CALLING MODEM IS PUT INTO ANSWER MODE
DEFINE TELEPHONE_NUMBER “ATDT8206363,,,,,R^M”
DEFINE UNIT_PASSWORD “12749^M”
PROC MAIN
EMULATE ANSI
;SET TERMINAL TO ANSI
SET PROTOCOL XMODEM ;SET DATA TRANSFER PROTOCOL TO XMODEM
SET RELAXED OFF ;SET XMODEM TIMING TO NORMAL
SET PORT COM2 ;SET COM PORT TO COM2
SET BAUDRATE 2400 ;SET BAUD RATE TO 2400
SET DATABITS 8 ;SET NUMBER OF DATA BITS TO 8
SET PARITY NONE ;SET PARITY TO NONE
SET STOPBITS 1 ;SET NUMBER OF STOP BITS TO 1
TRANSMIT “ATZ^M” ;RESET MODEM
WAITFOR “OK^M^J”
TRANSMIT “ATX1^M”
;SET TO BLIND DIAL
WAITFOR “OK^M^J”
TRANSMIT “ATB0^M”
;SET TO CCITT MODE
WAITFOR “OK^M^J”
TRANSMIT TELEPHONE_NUMBER
;SEND PHONE NUMBER
WAITFOR “CONNECT 2400^M^J” ;WAIT FOR MODEM TO CONNECT
TRANSMIT “^M” ;SEND <CR> TO MODEL 748
WAITFOR “ENTER PASSWORD ===>“ ;WAIT FOR PASSWORD STRING FROM MODEL 748
TRANSMIT UNIT_PASSWORD ;SEND DATA TRANSFER PASSWORD
WAITFOR “^F” ;RECEIVE <ACK> FROM MODEL 748
TRANSMIT “30^M” ;SEND “DOWNLOAD ANI BILLING” COMMAND
GETFILE XMODEM “BILLING.ANI” ;RECEIVE ANI USER BILLING DATABASE
WAITFOR “OK^M^J” ;WAIT FOR “OK” FROM MODEL 748
TRANSMIT “31^M” ;SEND “DOWNLOAD RP USER DATABSE” COMMAND
GETFILE XMODEM “BILLING.RPT” ;RECEIVE RP USER BILLING DATABASE
WAITFOR “OK^M^J” ;WAIT FOR “OK” FROM MODEL 748
TRANSMIT “32^M” ;SEND “DOWNLOAD CALL DETAIL” COMMAND
GETFILE XMODEM “BILLING.CD” ;RECEIVE CALL DETAIL DATABASE
WAITFOR “OK^M^J” ;WAIT FOR “OK” FROM MODEL 748
TRANSMIT “43^M” ;TRANSMIT “CLEAR ANI BILLING” COMMAND
WAITFOR “OK^M^J” ;WAIT FOR “OK” FROM MODEL 748
TRANSMIT “44^M” ;TRANSMIT “CLEAR RP BILLING” COMMAND
WAITFOR “OK^M^J” ;WAIT FOR “OK” FROM MODEL 748
TRANSMIT “45^M” ; TRANSMIT “CLEAR CALL DETAIL” COMMAND
WAITFOR “OK^M^J” ;WAIT FOR “OK” FROM MODEL 748
TRANSMIT “99^M” ;SEND “GOODBYE” COMMAND
HANGUP ;HANGUP LINE
ENDPROC