Wednesday, January 25, 2006

NEC 2400 IPX PMS integration

To move the PMS output from a serial port to the LAN see ASYDL.

ASYDL, SYS 1, INDEX 897, bit 0 = 1
ASYDL, SYS 1, INDEX 897, bit 4 = 0

Bit 4 is used for ACK/NAK control and is invalid when integrating with a Flagler / LMS system. Your results may vary.

Ethereal running on a hub card port is very revealing when troubleshooting conversation for the first time. L records and responses can be viewed in clear text.

Monday, January 23, 2006

Adaptec 2400 RAID drive zap

Before you can introduce a used drive into a RAID array, you need to remove the meta data regarding the previous array from that drive. The scenario is you have an old server with old drives in a RAID5 array, one fails, and you can only acquire refurbished exact replacement drives.

When using an Adaptech 2400 (maybe other) SCSI / RAID controller, you can do this at the BIOS / SMOR level.

Highlight the new refurbished drive, and press ALT-F10-Z. You will mysteriously now have a "Zap drive" option available on the Action menu. Choose to zap it and it can now be used to rebuild the existing degraded array.

Saturday, January 07, 2006

Excel VBA, SQL Stored Procedures and Michelob Light

There is no difference between how Excel VBA passes parameters to stored procedures and any other VB based app.

Michelob Light on Saturday night will make me forget to leave a SPACE after the procedure name before the close quote though.

SQL="SP_MyStoredProc " & data1 & "," & data2 & ";" will work.
SQL="SP_MyStoredProc" & data1 & "," & data2 & ";" will not.

For future reference, stolen from Patrick Molloy, Microsoft Excel MVP, here's some basic Excel and SQL stuff to drink to:

Option Explicit
Property Get MyDatabase() As String
MyDatabase = ControlsA1
End Property
Property Get MyServer() As String
MyServer = ControlsA2
End Property

Sub LoadFromSQL()
Dim RST As ADODB.Recordset
Dim db As Connection
Dim SQL As String
Dim i As Long
Set db = New Connection
db.CursorLocation = adUseClient
db.Open "PROVIDER=MSDASQL;driver={SQL Server};server=" & MyServer & ";uid=;pwd=;database=" & MyDatabase & ";"
Set RST = New Recordset
RST.Open SQL, db, adOpenStatic, adLockOptimistic
' prepare active sheet
With RST
For i = 0 To .Fields.Count - 1
Cells(1, i + 1).Value = .Fields(i).Name
End With
Range("A2").CopyFromRecordset RST
Set RST = Nothing
Set db = Nothing
End Sub

Thursday, January 05, 2006

ADIX IX-12IPKTD and IP-SUB notes

For those of you with access to it, the best document I could find is at the Iwatsu dealer site Engineering Bulletins 2003 PN 108234.

The quickly forgoten notes are below:
IX-8IPSUB default address:
IX-8IPSUB default user / pw: manage / 4192
IX-12IPKTD default address:
IX-12IPKTD default user / pw: manage / 4192
IX-12IPKTD LCD access: MENU for 5 seconds down to DISTRIBUTOR DATA
IX-8IPSUB / IX-12IPKTD default ports usage:


Wednesday, January 04, 2006

DTMF tone frequencies

For those of you wondering, here are the frequency combinations. For those of you who have no idea what this means, it probably will never help you. Feel free to move along.