[Gauthier]

More Clean Up of Old Code

in datBookCreatorProperties
replace

' GLOBAL VARIABLES
Function cUDEF() As Integer
    cUNDEF = 0
End Function
Function cEPUB() As Integer
    cEPUB = 1
End Function
Function cIMP() As Integer
    cIMP = 2
End Function
Function cLIT() As Integer
    cLIT = 3
End Function
Function cLRF() As Integer
    cLRF = 4
End Function
Function cMOBI() As Integer
    cMOBI = 5
End Function
Function cPDB() As Integer
    cPDB = 6
End Function
Function cPDF() As Integer
    cPDF = 7
End Function

With

' GLOBAL VARIABLES
Public Const cUDEF As Integer = 0
Public Const cEPUB As Integer = 1
Public Const cIMP As Integer = 2
Public Const cLIT As Integer = 3
Public Const cLRF As Integer = 4
Public Const cMOBI As Integer = 5
Public Const cPDB As Integer = 6
Public Const cPDF As Integer = 7

Same goes for the devices

'Devices
Public Const cDEFAULT As Integer = 0
Public Const cSONY As Integer = 1
Public Const cMSREADER As Integer = 2
Public Const cMOBIPOCKET As Integer = 3
Public Const cHANLINV3 As Integer = 4
Public Const cCYBOOKG3 As Integer = 5
Public Const cKINDLE As Integer = 6
Public Const cSONYLND As Integer = 7
Public Const cKINDLEDX As Integer = 8