'------------------------------------------------------------------------------
'
' This code was generated by a tool.
' Mono Runtime Version: 4.0.30319.17020
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
'
'------------------------------------------------------------------------------
Option Explicit On
Option Strict On
'
'This source code was auto-generated by MonoXSD
'
Namespace Schemas
'''
_
Partial Public Class CICMMetadataType
Private developerField As String()
Private publisherField As String()
Private authorField As String()
Private performerField As String()
Private nameField As String
Private versionField As String
Private releaseTypeField As CICMMetadataTypeReleaseType
Private releaseTypeSpecifiedField As Boolean
Private releaseDateField As Date
Private releaseDateSpecifiedField As Boolean
Private barcodesField As BarcodeType()
Private partNumberField As String
Private serialNumberField As String
Private keywordsField As KeywordsType
Private magazineField As MagazineType()
Private bookField As BookType()
Private categoriesField As String()
Private subcategoriesField As String()
Private languagesField As LanguagesType
Private systemsField As String()
Private architecturesField As ArchitecturesType
Private requiredOperatingSystemsField As RequiredOperatingSystemsType
Private userManualField As UserManualType()
Private opticalDiscField As OpticalDiscType()
Private advertisementField As AdvertisementType()
Private linearMediaField As LinearMediaType()
'''
'''Developer of the set
'''
_
Public Property Developer() As String()
Get
Return Me.developerField
End Get
Set
Me.developerField = Value
End Set
End Property
'''
'''Publisher of the set
'''
_
Public Property Publisher() As String()
Get
Return Me.publisherField
End Get
Set
Me.publisherField = Value
End Set
End Property
'''
'''Author/writer of the set
'''
_
Public Property Author() As String()
Get
Return Me.authorField
End Get
Set
Me.authorField = Value
End Set
End Property
'''
'''Performer/narrator of the set
'''
_
Public Property Performer() As String()
Get
Return Me.performerField
End Get
Set
Me.performerField = Value
End Set
End Property
'''
'''Name of the set
'''
Public Property Name() As String
Get
Return Me.nameField
End Get
Set
Me.nameField = Value
End Set
End Property
'''
'''Version of the set if applicable
'''
'''
Public Property Version() As String
Get
Return Me.versionField
End Get
Set
Me.versionField = Value
End Set
End Property
'''
''' Kind of release: OEM, Bundle, Coverdisc, Retail, Demo
'''
'''
Public Property ReleaseType() As CICMMetadataTypeReleaseType
Get
Return Me.releaseTypeField
End Get
Set
Me.releaseTypeField = Value
End Set
End Property
'''
_
Public Overridable Property ReleaseTypeSpecified() As Boolean
Get
Return Me.releaseTypeSpecifiedField
End Get
Set
Me.releaseTypeSpecifiedField = Value
End Set
End Property
'''
'''Date of release in YYYY-MM-DD
'''
_
Public Property ReleaseDate() As Date
Get
Return Me.releaseDateField
End Get
Set
Me.releaseDateField = Value
End Set
End Property
'''
_
Public Overridable Property ReleaseDateSpecified() As Boolean
Get
Return Me.releaseDateSpecifiedField
End Get
Set
Me.releaseDateSpecifiedField = Value
End Set
End Property
'''
_
Public Property Barcodes() As BarcodeType()
Get
Return Me.barcodesField
End Get
Set
Me.barcodesField = Value
End Set
End Property
'''
'''Manufacturer part no. or SKU
'''
Public Property PartNumber() As String
Get
Return Me.partNumberField
End Get
Set
Me.partNumberField = Value
End Set
End Property
'''
'''Manufacturer serial no., not to be confused with software registration serial number
'''
'''
Public Property SerialNumber() As String
Get
Return Me.serialNumberField
End Get
Set
Me.serialNumberField = Value
End Set
End Property
'''
'''Keywords
'''
Public Property Keywords() As KeywordsType
Get
Return Me.keywordsField
End Get
Set
Me.keywordsField = Value
End Set
End Property
'''
'''Magazine on this set
'''
_
Public Property Magazine() As MagazineType()
Get
Return Me.magazineField
End Get
Set
Me.magazineField = Value
End Set
End Property
'''
'''Books on this set
'''
_
Public Property Book() As BookType()
Get
Return Me.bookField
End Get
Set
Me.bookField = Value
End Set
End Property
'''
_
Public Property Categories() As String()
Get
Return Me.categoriesField
End Get
Set
Me.categoriesField = Value
End Set
End Property
'''
_
Public Property Subcategories() As String()
Get
Return Me.subcategoriesField
End Get
Set
Me.subcategoriesField = Value
End Set
End Property
'''
'''Languages this set comes in
'''
Public Property Languages() As LanguagesType
Get
Return Me.languagesField
End Get
Set
Me.languagesField = Value
End Set
End Property
'''
_
Public Property Systems() As String()
Get
Return Me.systemsField
End Get
Set
Me.systemsField = Value
End Set
End Property
'''
'''CPU architectures this set is designed to run on, if it includes software
'''
'''
Public Property Architectures() As ArchitecturesType
Get
Return Me.architecturesField
End Get
Set
Me.architecturesField = Value
End Set
End Property
'''
'''Required operating systems and versions this set runs on, if it includes software
'''
'''
Public Property RequiredOperatingSystems() As RequiredOperatingSystemsType
Get
Return Me.requiredOperatingSystemsField
End Get
Set
Me.requiredOperatingSystemsField = Value
End Set
End Property
'''
'''User manual/guide, installation manual/guide and any applicable entity
'''
'''
_
Public Property UserManual() As UserManualType()
Get
Return Me.userManualField
End Get
Set
Me.userManualField = Value
End Set
End Property
'''
'''Optical discs this set contains
'''
'''
_
Public Property OpticalDisc() As OpticalDiscType()
Get
Return Me.opticalDiscField
End Get
Set
Me.opticalDiscField = Value
End Set
End Property
'''
'''Advertisement
'''
_
Public Property Advertisement() As AdvertisementType()
Get
Return Me.advertisementField
End Get
Set
Me.advertisementField = Value
End Set
End Property
'''
'''Linear media (flash, ram, rom, cartridges)
'''
_
Public Property LinearMedia() As LinearMediaType()
Get
Return Me.linearMediaField
End Get
Set
Me.linearMediaField = Value
End Set
End Property
End Class
'''
_
Public Enum CICMMetadataTypeReleaseType
'''
Retail
'''
Bundle
'''
Coverdisc
'''
Subscription
'''
Demo
'''
OEM
End Enum
'''
_
Partial Public Class BarcodeType
Private typeField As BarcodeTypeType
Private valueField As String
'''
_
Public Property type() As BarcodeTypeType
Get
Return Me.typeField
End Get
Set
Me.typeField = Value
End Set
End Property
'''
_
Public Property Value() As String
Get
Return Me.valueField
End Get
Set
Me.valueField = Value
End Set
End Property
End Class
'''
_
Public Enum BarcodeTypeType
'''
aztec
'''
codabar
'''
code11
'''
code128
'''
code39
'''
code93
'''
cpcbinary
'''
ezcode
'''
fim
'''
itf
'''
itf14
'''
ean13
'''
ean8
'''
maxicode
'''
isbn
'''
isrc
'''
msi
'''
tof
'''
shotcode
'''
rm4scc
'''
qr
'''
ean5
'''
ean2
'''
_
qr1
'''
postnet
'''
postbar
'''
plessey
'''
pharmacode
'''
pdf417
'''
patchcode
End Enum
'''
_
Partial Public Class KeywordsType
Private keywordField As String
'''
'''Keywords
'''
Public Property Keyword() As String
Get
Return Me.keywordField
End Get
Set
Me.keywordField = Value
End Set
End Property
End Class
'''
_
Partial Public Class MagazineType
Private barcodesField1 As BarcodeType()
Private coverField As CoverType
Private nameField1 As String
Private editorialField As String
Private publicationDateField As Date
Private publicationDateSpecifiedField As Boolean
Private numberField As Integer
Private numberSpecifiedField As Boolean
Private languageField As LanguagesType
Private pagesField As Integer
Private pagesSpecifiedField As Boolean
Private pageSizeField As String
Private scanField As ScanType
'''
_
Public Property Barcodes() As BarcodeType()
Get
Return Me.barcodesField1
End Get
Set
Me.barcodesField1 = Value
End Set
End Property
'''
'''Cover of this magazine
'''
Public Property Cover() As CoverType
Get
Return Me.coverField
End Get
Set
Me.coverField = Value
End Set
End Property
'''
'''Name of this magazine
'''
Public Property Name() As String
Get
Return Me.nameField1
End Get
Set
Me.nameField1 = Value
End Set
End Property
'''
'''Editorial of this magazine
'''
Public Property Editorial() As String
Get
Return Me.editorialField
End Get
Set
Me.editorialField = Value
End Set
End Property
'''
'''Publication date of this magazine
'''
'''
_
Public Property PublicationDate() As Date
Get
Return Me.publicationDateField
End Get
Set
Me.publicationDateField = Value
End Set
End Property
'''
_
Public Overridable Property PublicationDateSpecified() As Boolean
Get
Return Me.publicationDateSpecifiedField
End Get
Set
Me.publicationDateSpecifiedField = Value
End Set
End Property
'''
'''Sequential number of this magazine
'''
'''
Public Property Number() As Integer
Get
Return Me.numberField
End Get
Set
Me.numberField = Value
End Set
End Property
'''
_
Public Overridable Property NumberSpecified() As Boolean
Get
Return Me.numberSpecifiedField
End Get
Set
Me.numberSpecifiedField = Value
End Set
End Property
'''
'''Languages this magazine is written in
'''
'''
Public Property Language() As LanguagesType
Get
Return Me.languageField
End Get
Set
Me.languageField = Value
End Set
End Property
'''
'''Pages of this magazine, including cover and back
'''
'''
Public Property Pages() As Integer
Get
Return Me.pagesField
End Get
Set
Me.pagesField = Value
End Set
End Property
'''
_
Public Overridable Property PagesSpecified() As Boolean
Get
Return Me.pagesSpecifiedField
End Get
Set
Me.pagesSpecifiedField = Value
End Set
End Property
'''
'''Page size of this magazine, standard or in WxH milimeters
'''
'''
Public Property PageSize() As String
Get
Return Me.pageSizeField
End Get
Set
Me.pageSizeField = Value
End Set
End Property
'''
'''Scan of this magazine
'''
Public Property Scan() As ScanType
Get
Return Me.scanField
End Get
Set
Me.scanField = Value
End Set
End Property
End Class
'''
_
Partial Public Class CoverType
Private fileField As FileType
Private checksumsField As ChecksumType()
Private thumbnailField As Byte()
'''
'''Cover file
'''
Public Property File() As FileType
Get
Return Me.fileField
End Get
Set
Me.fileField = Value
End Set
End Property
'''
_
Public Property Checksums() As ChecksumType()
Get
Return Me.checksumsField
End Get
Set
Me.checksumsField = Value
End Set
End Property
'''
'''Base64 of JPEG thumbnail
'''
Public Property Thumbnail() As Byte()
Get
Return Me.thumbnailField
End Get
Set
Me.thumbnailField = Value
End Set
End Property
End Class
'''
'''File
'''
_
Partial Public Class FileType
Private formatField As String
Private valueField1 As String
'''
_
Public Property format() As String
Get
Return Me.formatField
End Get
Set
Me.formatField = Value
End Set
End Property
'''
_
Public Property Value() As String
Get
Return Me.valueField1
End Get
Set
Me.valueField1 = Value
End Set
End Property
End Class
'''
_
Partial Public Class ChecksumType
Private typeField1 As ChecksumTypeType
Private valueField2 As String
'''
_
Public Property type() As ChecksumTypeType
Get
Return Me.typeField1
End Get
Set
Me.typeField1 = Value
End Set
End Property
'''
_
Public Property Value() As String
Get
Return Me.valueField2
End Get
Set
Me.valueField2 = Value
End Set
End Property
End Class
'''
_
Public Enum ChecksumTypeType
'''
fletcher16
'''
fletcher32
'''
adler32
'''
crc16
'''
crc16ccitt
'''
crc32
'''
crc64
'''
md4
'''
md5
'''
dm6
'''
ripemd128
'''
ripemd160
'''
ripemed320
'''
sha1
'''
sha224
'''
sha256
'''
sha384
'''
sha512
'''
sha3
'''
skein
'''
snefru
'''
blake256
'''
blake512
'''
tiger
'''
whirlpool
'''
spamsum
End Enum
'''
_
Partial Public Class LanguagesType
Private languageField1 As LanguagesTypeLanguage
'''
''' Languages included in the set, ISO 3-letter code
'''
'''
Public Property Language() As LanguagesTypeLanguage
Get
Return Me.languageField1
End Get
Set
Me.languageField1 = Value
End Set
End Property
End Class
'''
_
Public Enum LanguagesTypeLanguage
'''
aar
'''
abk
'''
ace
'''
ach
'''
ada
'''
ady
'''
afa
'''
afh
'''
afr
'''
ain
'''
aka
'''
akk
'''
alb
'''
ale
'''
alg
'''
alt
'''
amh
'''
ang
'''
anp
'''
apa
'''
ara
'''
arc
'''
arg
'''
arm
'''
arn
'''
arp
'''
art
'''
arw
'''
asm
'''
ast
'''
ath
'''
aus
'''
ava
'''
ave
'''
awa
'''
aym
'''
aze
'''
bad
'''
bai
'''
bak
'''
bal
'''
bam
'''
ban
'''
baq
'''
bas
'''
bat
'''
bej
'''
bel
'''
bem
'''
ben
'''
ber
'''
bho
'''
bih
'''
bik
'''
bin
'''
bis
'''
bla
'''
bnt
'''
bos
'''
bra
'''
bre
'''
btk
'''
bua
'''
bug
'''
bul
'''
bur
'''
byn
'''
cad
'''
cai
'''
car
'''
cat
'''
cau
'''
ceb
'''
cel
'''
cha
'''
chb
'''
che
'''
chg
'''
chi
'''
chk
'''
chm
'''
chn
'''
cho
'''
chp
'''
chr
'''
chu
'''
chv
'''
chy
'''
cmc
'''
cop
'''
cor
'''
cos
'''
cpe
'''
cpf
'''
cpp
'''
cre
'''
crh
'''
crp
'''
csb
'''
cus
'''
cze
'''
dak
'''
dan
'''
dar
'''
day
'''
del
'''
den
'''
dgr
'''
din
'''
div
'''
doi
'''
dra
'''
dsb
'''
dua
'''
dum
'''
dut
'''
dyu
'''
dzo
'''
efi
'''
egy
'''
eka
'''
elx
'''
eng
'''
enm
'''
epo
'''
est
'''
ewe
'''
ewo
'''
fan
'''
fao
'''
fat
'''
fij
'''
fil
'''
fin
'''
fiu
'''
fon
'''
fre
'''
frm
'''
fro
'''
frr
'''
frs
'''
fry
'''
ful
'''
fur
'''
gaa
'''
gay
'''
gba
'''
gem
'''
geo
'''
ger
'''
gez
'''
gil
'''
gla
'''
gle
'''
glg
'''
glv
'''
gmh
'''
goh
'''
gon
'''
gor
'''
got
'''
grb
'''
grc
'''
gre
'''
grn
'''
gsw
'''
guj
'''
gwi
'''
hai
'''
hat
'''
hau
'''
haw
'''
heb
'''
her
'''
hil
'''
him
'''
hin
'''
hit
'''
hmn
'''
hmo
'''
hrv
'''
hsb
'''
hun
'''
hup
'''
iba
'''
ibo
'''
ice
'''
ido
'''
iii
'''
ijo
'''
iku
'''
ile
'''
ilo
'''
ina
'''
inc
'''
ind
'''
ine
'''
inh
'''
ipk
'''
ira
'''
iro
'''
ita
'''
jav
'''
jbo
'''
jpn
'''
jpr
'''
jrb
'''
kaa
'''
kab
'''
kac
'''
kal
'''
kam
'''
kan
'''
kar
'''
kas
'''
kau
'''
kaw
'''
kaz
'''
kbd
'''
kha
'''
khi
'''
khm
'''
kho
'''
kik
'''
kin
'''
kir
'''
kmb
'''
kok
'''
kom
'''
kon
'''
kor
'''
kos
'''
kpe
'''
krc
'''
krl
'''
kro
'''
kru
'''
kua
'''
kum
'''
kur
'''
kut
'''
lad
'''
lah
'''
lam
'''
lao
'''
lat
'''
lav
'''
lez
'''
lim
'''
lin
'''
lit
'''
lol
'''
loz
'''
ltz
'''
lua
'''
lub
'''
lug
'''
lui
'''
lun
'''
luo
'''
lus
'''
mac
'''
mad
'''
mag
'''
mah
'''
mai
'''
mak
'''
mal
'''
man
'''
mao
'''
map
'''
mar
'''
mas
'''
may
'''
mdf
'''
mdr
'''
men
'''
mga
'''
mic
'''
min
'''
mis
'''
mkh
'''
mlg
'''
mlt
'''
mnc
'''
mni
'''
mno
'''
moh
'''
mon
'''
mos
'''
mul
'''
mun
'''
mus
'''
mwl
'''
mwr
'''
myn
'''
myv
'''
nah
'''
nai
'''
nap
'''
nau
'''
nav
'''
nbl
'''
nde
'''
ndo
'''
nds
'''
nep
'''
new
'''
nia
'''
nic
'''
niu
'''
nno
'''
nob
'''
nog
'''
non
'''
nor
'''
nqo
'''
nso
'''
nub
'''
nwc
'''
nya
'''
nym
'''
nyn
'''
nyo
'''
nzi
'''
oci
'''
oji
'''
ori
'''
orm
'''
osa
'''
oss
'''
ota
'''
oto
'''
paa
'''
pag
'''
pal
'''
pam
'''
pan
'''
pap
'''
pau
'''
peo
'''
per
'''
phi
'''
phn
'''
pli
'''
pol
'''
pon
'''
por
'''
pra
'''
pro
'''
pus
'''
_
qaaqtz
'''
que
'''
raj
'''
rap
'''
rar
'''
roa
'''
roh
'''
rom
'''
rum
'''
run
'''
rup
'''
rus
'''
sad
'''
sag
'''
sah
'''
sai
'''
sal
'''
sam
'''
san
'''
sas
'''
sat
'''
scn
'''
sco
'''
sel
'''
sem
'''
sga
'''
sgn
'''
shn
'''
sid
'''
sin
'''
sio
'''
sit
'''
sla
'''
slo
'''
slv
'''
sma
'''
sme
'''
smi
'''
smj
'''
smn
'''
smo
'''
sms
'''
sna
'''
snd
'''
snk
'''
sog
'''
som
'''
son
'''
sot
'''
spa
'''
srd
'''
srn
'''
srp
'''
srr
'''
ssa
'''
ssw
'''
suk
'''
sun
'''
sus
'''
sux
'''
swa
'''
swe
'''
syc
'''
syr
'''
tah
'''
tai
'''
tam
'''
tat
'''
tel
'''
tem
'''
ter
'''
tet
'''
tgk
'''
tgl
'''
tha
'''
tib
'''
tig
'''
tir
'''
tiv
'''
tkl
'''
tlh
'''
tli
'''
tmh
'''
tog
'''
ton
'''
tpi
'''
tsi
'''
tsn
'''
tso
'''
tuk
'''
tum
'''
tup
'''
tur
'''
tut
'''
tvl
'''
twi
'''
tyv
'''
udm
'''
uga
'''
uig
'''
ukr
'''
umb
'''
und
'''
urd
'''
uzb
'''
vai
'''
ven
'''
vie
'''
vol
'''
vot
'''
wak
'''
wal
'''
war
'''
was
'''
wel
'''
wen
'''
wln
'''
wol
'''
xal
'''
xho
'''
yao
'''
yap
'''
yid
'''
yor
'''
ypk
'''
zap
'''
zbl
'''
zen
'''
zgh
'''
zha
'''
znd
'''
zul
'''
zun
'''
zxx
'''
zza
End Enum
'''
_
Partial Public Class ScanType
Private fileField1 As FileType
Private checksumsField1 As ChecksumType()
Private scannerField As ScannerType()
Private scanProcessingField As ScanProcessingType()
Private oCRField As OCRType()
'''
'''File containing the scan
'''
Public Property File() As FileType
Get
Return Me.fileField1
End Get
Set
Me.fileField1 = Value
End Set
End Property
'''
_
Public Property Checksums() As ChecksumType()
Get
Return Me.checksumsField1
End Get
Set
Me.checksumsField1 = Value
End Set
End Property
'''
'''Information about scanning
'''
_
Public Property Scanner() As ScannerType()
Get
Return Me.scannerField
End Get
Set
Me.scannerField = Value
End Set
End Property
'''
'''Information about any scan processing done
'''
'''
_
Public Property ScanProcessing() As ScanProcessingType()
Get
Return Me.scanProcessingField
End Get
Set
Me.scanProcessingField = Value
End Set
End Property
'''
'''Information about OCR
'''
_
Public Property OCR() As OCRType()
Get
Return Me.oCRField
End Get
Set
Me.oCRField = Value
End Set
End Property
End Class
'''
'''Information about scanning
'''
_
Partial Public Class ScannerType
Private authorField1 As String
Private manufacturerField As String
Private modelField As String
Private serialField As String
Private softwareField As String
Private softwareVersionField As String
'''
'''Who scanned it?
'''
Public Property Author() As String
Get
Return Me.authorField1
End Get
Set
Me.authorField1 = Value
End Set
End Property
'''
'''Who built the scanner
'''
Public Property Manufacturer() As String
Get
Return Me.manufacturerField
End Get
Set
Me.manufacturerField = Value
End Set
End Property
'''
'''Scanner model
'''
Public Property Model() As String
Get
Return Me.modelField
End Get
Set
Me.modelField = Value
End Set
End Property
'''
'''Scanner serial number
'''
Public Property Serial() As String
Get
Return Me.serialField
End Get
Set
Me.serialField = Value
End Set
End Property
'''
'''Software used for scanning
'''
Public Property Software() As String
Get
Return Me.softwareField
End Get
Set
Me.softwareField = Value
End Set
End Property
'''
'''Software version
'''
Public Property SoftwareVersion() As String
Get
Return Me.softwareVersionField
End Get
Set
Me.softwareVersionField = Value
End Set
End Property
End Class
'''
'''Information about any scan processing done
'''
'''
_
Partial Public Class ScanProcessingType
Private authorField2 As String
Private softwareField1 As String
Private softwareVersionField1 As String
'''
'''Who processed it?
'''
Public Property Author() As String
Get
Return Me.authorField2
End Get
Set
Me.authorField2 = Value
End Set
End Property
'''
'''Software used for processing
'''
Public Property Software() As String
Get
Return Me.softwareField1
End Get
Set
Me.softwareField1 = Value
End Set
End Property
'''
'''Software version
'''
Public Property SoftwareVersion() As String
Get
Return Me.softwareVersionField1
End Get
Set
Me.softwareVersionField1 = Value
End Set
End Property
End Class
'''
_
Partial Public Class OCRType
Private authorField3 As String
Private softwareField2 As String
Private softwareVersionField2 As String
Private languageField2 As LanguagesType
'''
'''Who did the OCR
'''
Public Property Author() As String
Get
Return Me.authorField3
End Get
Set
Me.authorField3 = Value
End Set
End Property
'''
'''Using what software
'''
Public Property Software() As String
Get
Return Me.softwareField2
End Get
Set
Me.softwareField2 = Value
End Set
End Property
'''
'''And the software version
'''
Public Property SoftwareVersion() As String
Get
Return Me.softwareVersionField2
End Get
Set
Me.softwareVersionField2 = Value
End Set
End Property
'''
'''OCR applied for which languages
'''
'''
Public Property Language() As LanguagesType
Get
Return Me.languageField2
End Get
Set
Me.languageField2 = Value
End Set
End Property
End Class
'''
_
Partial Public Class BookType
Private barcodesField2 As BarcodeType()
Private coverField1 As CoverType
Private nameField2 As String
Private editorialField1 As String
Private authorField4 As String
Private publicationDateField1 As Date
Private publicationDateSpecifiedField1 As Boolean
Private languageField3 As LanguagesType
Private pagesField1 As Integer
Private pagesSpecifiedField1 As Boolean
Private pageSizeField1 As String
Private scanField1 As ScanType
'''
_
Public Property Barcodes() As BarcodeType()
Get
Return Me.barcodesField2
End Get
Set
Me.barcodesField2 = Value
End Set
End Property
'''
'''Book cover
'''
Public Property Cover() As CoverType
Get
Return Me.coverField1
End Get
Set
Me.coverField1 = Value
End Set
End Property
'''
'''Book name
'''
Public Property Name() As String
Get
Return Me.nameField2
End Get
Set
Me.nameField2 = Value
End Set
End Property
'''
'''Book publisher
'''
Public Property Editorial() As String
Get
Return Me.editorialField1
End Get
Set
Me.editorialField1 = Value
End Set
End Property
'''
'''Book author
'''
Public Property Author() As String
Get
Return Me.authorField4
End Get
Set
Me.authorField4 = Value
End Set
End Property
'''
'''Book's publication date
'''
_
Public Property PublicationDate() As Date
Get
Return Me.publicationDateField1
End Get
Set
Me.publicationDateField1 = Value
End Set
End Property
'''
_
Public Overridable Property PublicationDateSpecified() As Boolean
Get
Return Me.publicationDateSpecifiedField1
End Get
Set
Me.publicationDateSpecifiedField1 = Value
End Set
End Property
'''
'''Book language
'''
Public Property Language() As LanguagesType
Get
Return Me.languageField3
End Get
Set
Me.languageField3 = Value
End Set
End Property
'''
'''Book pages
'''
Public Property Pages() As Integer
Get
Return Me.pagesField1
End Get
Set
Me.pagesField1 = Value
End Set
End Property
'''
_
Public Overridable Property PagesSpecified() As Boolean
Get
Return Me.pagesSpecifiedField1
End Get
Set
Me.pagesSpecifiedField1 = Value
End Set
End Property
'''
'''Magazine page size in WxH milimeters
'''
'''
Public Property PageSize() As String
Get
Return Me.pageSizeField1
End Get
Set
Me.pageSizeField1 = Value
End Set
End Property
'''
'''Scan of the book
'''
Public Property Scan() As ScanType
Get
Return Me.scanField1
End Get
Set
Me.scanField1 = Value
End Set
End Property
End Class
'''
'''CPU architectures this set is intended to be run on
'''
'''
_
Partial Public Class ArchitecturesType
Private architectureField As ArchitecturesTypeArchitecture
'''
Public Property Architecture() As ArchitecturesTypeArchitecture
Get
Return Me.architectureField
End Get
Set
Me.architectureField = Value
End Set
End Property
End Class
'''
_
Public Enum ArchitecturesTypeArchitecture
'''
i86
'''
ia32
'''
ia64
'''
amd64
'''
_
Item4004
'''
_
Item4040
'''
_
Item8080
'''
_
Item8008
'''
_
Item8085
'''
_
Item8051
'''
i860
'''
i960
'''
apx432
'''
m68k
'''
ppc
'''
ppc64
'''
x32
'''
sparc
'''
sparc64
'''
arm
'''
aarch64
'''
avr
'''
pic
'''
msp430
'''
z80
'''
_
Item65816
'''
sh
'''
sh1
'''
sh2
'''
sh3
'''
sh5
'''
sh4
'''
m6800
'''
_
Item6502
'''
axp
'''
parisc
'''
mips32
'''
mips64
'''
s360
'''
s370
'''
esa390
'''
zarch
'''
pdp11
'''
vax
'''
power
End Enum
'''
_
Partial Public Class RequiredOperatingSystemsType
Private requiredOperatingSystemField As RequiredOperatingSystemType
'''
Public Property RequiredOperatingSystem() As RequiredOperatingSystemType
Get
Return Me.requiredOperatingSystemField
End Get
Set
Me.requiredOperatingSystemField = Value
End Set
End Property
End Class
'''
_
Partial Public Class RequiredOperatingSystemType
Private nameField3 As String
Private versionField1 As String
'''
'''Minimal supported operating system
'''
'''
Public Property Name() As String
Get
Return Me.nameField3
End Get
Set
Me.nameField3 = Value
End Set
End Property
'''
Public Property Version() As String
Get
Return Me.versionField1
End Get
Set
Me.versionField1 = Value
End Set
End Property
End Class
'''
'''User manual or user guide accompanying this set. Can be more than one.
'''
'''
_
Partial Public Class UserManualType
Private languageField4 As LanguagesType
Private pagesField2 As Integer
Private pageSizeField2 As String
Private scanField2 As ScanType
'''
'''Language of the user manual
'''
Public Property Language() As LanguagesType
Get
Return Me.languageField4
End Get
Set
Me.languageField4 = Value
End Set
End Property
'''
'''Pages of the user manual
'''
Public Property Pages() As Integer
Get
Return Me.pagesField2
End Get
Set
Me.pagesField2 = Value
End Set
End Property
'''
'''Paper size in standard name or in WxH milimeters
'''
'''
Public Property PageSize() As String
Get
Return Me.pageSizeField2
End Get
Set
Me.pageSizeField2 = Value
End Set
End Property
'''
'''User manual scanning
'''
Public Property Scan() As ScanType
Get
Return Me.scanField2
End Get
Set
Me.scanField2 = Value
End Set
End Property
End Class
'''
_
Partial Public Class OpticalDiscType
Private imageField As ImageType
Private sizeField As Long
Private sequenceField As SequenceType
Private layersField As LayersType
Private checksumsField2 As ChecksumType()
Private ringCodeField As LayeredTextType()
Private masteringSIDField As LayeredTextType()
Private toolstampField As LayeredTextType()
Private mouldSIDField As LayeredTextType()
Private mouldTextField As LayeredTextType()
Private discTypeField As String
Private discSubTypeField As String
Private offsetField1 As Integer
Private offsetSpecifiedField1 As Boolean
Private tracksField As Integer()
Private sessionsField As Integer
Private copyProtectionField As String
Private dimensionsField As DimensionsType
Private caseField As CaseType
Private scansField1 As ScansType
Private pFIField As DumpType
Private dMIField As DumpType
Private cMIField As DumpType
Private bCAField As DumpType
Private aTIPField As DumpType
Private pMAField As DumpType
Private leadInField As BorderType()
Private leadOutField As BorderType()
Private xboxSecuritySectorsField As SecuritySectorsType()
Private pS3EncryptionField As PS3EncryptionType
Private trackField As TrackType()
Private dumpHardwareArrayField As DumpHardwareArrayType
'''
'''Image file, or image description file, plus format (cue, toc, etc, etc)
'''
'''
Public Property Image() As ImageType
Get
Return Me.imageField
End Get
Set
Me.imageField = Value
End Set
End Property
'''
'''Image file size
'''
Public Property Size() As Long
Get
Return Me.sizeField
End Get
Set
Me.sizeField = Value
End Set
End Property
'''
'''Sequence information about this disc
'''
'''
Public Property Sequence() As SequenceType
Get
Return Me.sequenceField
End Get
Set
Me.sequenceField = Value
End Set
End Property
'''
'''Layering type and sizes
'''
Public Property Layers() As LayersType
Get
Return Me.layersField
End Get
Set
Me.layersField = Value
End Set
End Property
'''
_
Public Property Checksums() As ChecksumType()
Get
Return Me.checksumsField2
End Get
Set
Me.checksumsField2 = Value
End Set
End Property
'''
'''Disc/side ring code
'''
_
Public Property RingCode() As LayeredTextType()
Get
Return Me.ringCodeField
End Get
Set
Me.ringCodeField = Value
End Set
End Property
'''
'''Disc/side mastering SID
'''
_
Public Property MasteringSID() As LayeredTextType()
Get
Return Me.masteringSIDField
End Get
Set
Me.masteringSIDField = Value
End Set
End Property
'''
'''Disc/side toolstamp
'''
_
Public Property Toolstamp() As LayeredTextType()
Get
Return Me.toolstampField
End Get
Set
Me.toolstampField = Value
End Set
End Property
'''
'''Disc/side mould SID
'''
_
Public Property MouldSID() As LayeredTextType()
Get
Return Me.mouldSIDField
End Get
Set
Me.mouldSIDField = Value
End Set
End Property
'''
'''Disc/side mould text
'''
_
Public Property MouldText() As LayeredTextType()
Get
Return Me.mouldTextField
End Get
Set
Me.mouldTextField = Value
End Set
End Property
'''
'''Disc type (CD, GD, SACD, DDCD, DVD, HDDVD, BD)
'''
'''
Public Property DiscType() As String
Get
Return Me.discTypeField
End Get
Set
Me.discTypeField = Value
End Set
End Property
'''
'''Disc subtype (CD-ROM, CD-DA, CD+G, etc)
'''
'''
Public Property DiscSubType() As String
Get
Return Me.discSubTypeField
End Get
Set
Me.discSubTypeField = Value
End Set
End Property
'''
'''Offset between subchannel servo and data sectors servo, in bytes
'''
'''
Public Property Offset() As Integer
Get
Return Me.offsetField1
End Get
Set
Me.offsetField1 = Value
End Set
End Property
'''
_
Public Overridable Property OffsetSpecified() As Boolean
Get
Return Me.offsetSpecifiedField1
End Get
Set
Me.offsetSpecifiedField1 = Value
End Set
End Property
'''
'''Tracks on this disc/side
'''
_
Public Property Tracks() As Integer()
Get
Return Me.tracksField
End Get
Set
Me.tracksField = Value
End Set
End Property
'''
'''Sessions on this disc/side
'''
Public Property Sessions() As Integer
Get
Return Me.sessionsField
End Get
Set
Me.sessionsField = Value
End Set
End Property
'''
'''Copy protection, if applicable
'''
Public Property CopyProtection() As String
Get
Return Me.copyProtectionField
End Get
Set
Me.copyProtectionField = Value
End Set
End Property
'''
'''Dimensions of the disc
'''
Public Property Dimensions() As DimensionsType
Get
Return Me.dimensionsField
End Get
Set
Me.dimensionsField = Value
End Set
End Property
'''
'''Case where the disk came from factory
'''
'''
Public Property Case() As CaseType
Get
Return Me.caseField
End Get
Set
Me.caseField = Value
End Set
End Property
'''
'''Disc scans
'''
Public Property Scans() As ScansType
Get
Return Me.scansField1
End Get
Set
Me.scansField1 = Value
End Set
End Property
'''
'''Physical Manufacturing Information (DVD and HD DVD)
'''
'''
Public Property PFI() As DumpType
Get
Return Me.pFIField
End Get
Set
Me.pFIField = Value
End Set
End Property
'''
'''Disc Manufacturing Information
'''
Public Property DMI() As DumpType
Get
Return Me.dMIField
End Get
Set
Me.dMIField = Value
End Set
End Property
'''
'''Lead-In Copyright Management Information
'''
'''
Public Property CMI() As DumpType
Get
Return Me.cMIField
End Get
Set
Me.cMIField = Value
End Set
End Property
'''
'''Burst Cutting Area
'''
Public Property BCA() As DumpType
Get
Return Me.bCAField
End Get
Set
Me.bCAField = Value
End Set
End Property
'''
'''Absolute Time In Pre-groove
'''
Public Property ATIP() As DumpType
Get
Return Me.aTIPField
End Get
Set
Me.aTIPField = Value
End Set
End Property
'''
'''PMA
'''
Public Property PMA() As DumpType
Get
Return Me.pMAField
End Get
Set
Me.pMAField = Value
End Set
End Property
'''
'''Lead-In, Border-In, or equivalent
'''
'''
_
Public Property LeadIn() As BorderType()
Get
Return Me.leadInField
End Get
Set
Me.leadInField = Value
End Set
End Property
'''
'''Lead-Out, Border-Out, or equivalent
'''
'''
_
Public Property LeadOut() As BorderType()
Get
Return Me.leadOutField
End Get
Set
Me.leadOutField = Value
End Set
End Property
'''
_
Public Property XboxSecuritySectors() As SecuritySectorsType()
Get
Return Me.xboxSecuritySectorsField
End Get
Set
Me.xboxSecuritySectorsField = Value
End Set
End Property
'''
'''PS3 Encryption Key
'''
Public Property PS3Encryption() As PS3EncryptionType
Get
Return Me.pS3EncryptionField
End Get
Set
Me.pS3EncryptionField = Value
End Set
End Property
'''
'''Array of disc tracks
'''
_
Public Property Track() As TrackType()
Get
Return Me.trackField
End Get
Set
Me.trackField = Value
End Set
End Property
'''
'''Array of drives used to dump disc
'''
'''
Public Property DumpHardwareArray() As DumpHardwareArrayType
Get
Return Me.dumpHardwareArrayField
End Get
Set
Me.dumpHardwareArrayField = Value
End Set
End Property
End Class
'''
'''File containing track dump, and format, binary, yranib, or audio/video container
'''
'''
_
Partial Public Class ImageType
Private formatField1 As String
Private offsetField As Long
Private offsetSpecifiedField As Boolean
Private valueField3 As String
'''
_
Public Property format() As String
Get
Return Me.formatField1
End Get
Set
Me.formatField1 = Value
End Set
End Property
'''
_
Public Property offset() As Long
Get
Return Me.offsetField
End Get
Set
Me.offsetField = Value
End Set
End Property
'''
_
Public Overridable Property offsetSpecified() As Boolean
Get
Return Me.offsetSpecifiedField
End Get
Set
Me.offsetSpecifiedField = Value
End Set
End Property
'''
_
Public Property Value() As String
Get
Return Me.valueField3
End Get
Set
Me.valueField3 = Value
End Set
End Property
End Class
'''
'''Sequence information about a disc
'''
'''
_
Partial Public Class SequenceType
Private discTitleField As String
Private discField As Integer
Private totalDiscsField As Integer
Private sideField As Integer
Private layerField As Integer
Private layerSpecifiedField As Boolean
'''
'''Sequence information about this disc
'''
'''
Public Property DiscTitle() As String
Get
Return Me.discTitleField
End Get
Set
Me.discTitleField = Value
End Set
End Property
'''
'''Disc title as printed in label
'''
Public Property Disc() As Integer
Get
Return Me.discField
End Get
Set
Me.discField = Value
End Set
End Property
'''
'''Total number of discs in this set
'''
'''
Public Property TotalDiscs() As Integer
Get
Return Me.totalDiscsField
End Get
Set
Me.totalDiscsField = Value
End Set
End Property
'''
'''Side of disc described by this field
'''
'''
Public Property Side() As Integer
Get
Return Me.sideField
End Get
Set
Me.sideField = Value
End Set
End Property
'''
'''On PTP layering, layer of disc described by this field, starting on 0
'''
'''
Public Property Layer() As Integer
Get
Return Me.layerField
End Get
Set
Me.layerField = Value
End Set
End Property
'''
_
Public Overridable Property LayerSpecified() As Boolean
Get
Return Me.layerSpecifiedField
End Get
Set
Me.layerSpecifiedField = Value
End Set
End Property
End Class
'''
_
Partial Public Class LayersType
Private typeField2 As LayersTypeType
Private typeSpecifiedField As Boolean
Private sectorsField As SectorsType()
'''
_
Public Property type() As LayersTypeType
Get
Return Me.typeField2
End Get
Set
Me.typeField2 = Value
End Set
End Property
'''
_
Public Overridable Property typeSpecified() As Boolean
Get
Return Me.typeSpecifiedField
End Get
Set
Me.typeSpecifiedField = Value
End Set
End Property
'''
'''Layering type and sizes
'''
_
Public Property Sectors() As SectorsType()
Get
Return Me.sectorsField
End Get
Set
Me.sectorsField = Value
End Set
End Property
End Class
'''
_
Public Enum LayersTypeType
'''
PTP
'''
OTP
End Enum
'''
_
Partial Public Class SectorsType
Private layerField1 As Integer
Private layerSpecifiedField1 As Boolean
Private valueField4 As Long
'''
_
Public Property layer() As Integer
Get
Return Me.layerField1
End Get
Set
Me.layerField1 = Value
End Set
End Property
'''
_
Public Overridable Property layerSpecified() As Boolean
Get
Return Me.layerSpecifiedField1
End Get
Set
Me.layerSpecifiedField1 = Value
End Set
End Property
'''
_
Public Property Value() As Long
Get
Return Me.valueField4
End Get
Set
Me.valueField4 = Value
End Set
End Property
End Class
'''
_
Partial Public Class LayeredTextType
Private layerField2 As Integer
Private layerSpecifiedField2 As Boolean
Private valueField5 As String
'''
_
Public Property layer() As Integer
Get
Return Me.layerField2
End Get
Set
Me.layerField2 = Value
End Set
End Property
'''
_
Public Overridable Property layerSpecified() As Boolean
Get
Return Me.layerSpecifiedField2
End Get
Set
Me.layerSpecifiedField2 = Value
End Set
End Property
'''
_
Public Property Value() As String
Get
Return Me.valueField5
End Get
Set
Me.valueField5 = Value
End Set
End Property
End Class
'''
'''Dimensions of media
'''
_
Partial Public Class DimensionsType
Private diameterField As Double
Private diameterSpecifiedField As Boolean
Private heightField As Double
Private heightSpecifiedField As Boolean
Private widthField As Double
Private widthSpecifiedField As Boolean
Private thicknessField As Double
'''
'''Diameter in milimeters for circular discs
'''
'''
Public Property Diameter() As Double
Get
Return Me.diameterField
End Get
Set
Me.diameterField = Value
End Set
End Property
'''
_
Public Overridable Property DiameterSpecified() As Boolean
Get
Return Me.diameterSpecifiedField
End Get
Set
Me.diameterSpecifiedField = Value
End Set
End Property
'''
'''Height in milimeters for non-circular disks
'''
'''
Public Property Height() As Double
Get
Return Me.heightField
End Get
Set
Me.heightField = Value
End Set
End Property
'''
_
Public Overridable Property HeightSpecified() As Boolean
Get
Return Me.heightSpecifiedField
End Get
Set
Me.heightSpecifiedField = Value
End Set
End Property
'''
'''Width in milimeters for non-circular disks
'''
'''
Public Property Width() As Double
Get
Return Me.widthField
End Get
Set
Me.widthField = Value
End Set
End Property
'''
_
Public Overridable Property WidthSpecified() As Boolean
Get
Return Me.widthSpecifiedField
End Get
Set
Me.widthSpecifiedField = Value
End Set
End Property
'''
'''Thickness in milimeters for non-circular disks
'''
'''
Public Property Thickness() As Double
Get
Return Me.thicknessField
End Get
Set
Me.thicknessField = Value
End Set
End Property
End Class
'''
_
Partial Public Class CaseType
Private caseType1Field As CaseTypeCaseType
Private scansField As ScansType
'''
'''Original case type: jewel, bigjewel, dvdcase, etc
'''
'''
_
Public Property CaseType1() As CaseTypeCaseType
Get
Return Me.caseType1Field
End Get
Set
Me.caseType1Field = Value
End Set
End Property
'''
Public Property Scans() As ScansType
Get
Return Me.scansField
End Get
Set
Me.scansField = Value
End Set
End Property
End Class
'''
_
Public Enum CaseTypeCaseType
'''
jewel
'''
bigjewel
'''
slimjewel
'''
sleeve
'''
qpack
'''
digisleeve
'''
discboxslider
'''
compacplus
'''
keepcase
'''
snapcase
'''
softcase
'''
ecopack
'''
liftlock
'''
spindle
'''
ps2case
'''
ps3case
'''
bluraykeepcase
'''
pscase
'''
dccase
'''
saturncase
'''
xboxcase
'''
saturnbigcase
'''
gccase
'''
wiicase
'''
unknown
End Enum
'''
_
Partial Public Class ScansType
Private caseScanField As CaseScanType
Private scanField4 As MediaScanType
'''
'''Case scans
'''
Public Property CaseScan() As CaseScanType
Get
Return Me.caseScanField
End Get
Set
Me.caseScanField = Value
End Set
End Property
'''
'''Disc scans
'''
Public Property Scan() As MediaScanType
Get
Return Me.scanField4
End Get
Set
Me.scanField4 = Value
End Set
End Property
End Class
'''
_
Partial Public Class CaseScanType
Private caseScanElementField As CaseScanTypeCaseScanElement
Private scanField3 As ScanType
'''
'''Scanned element: cover, back, inlay, etc
'''
'''
Public Property CaseScanElement() As CaseScanTypeCaseScanElement
Get
Return Me.caseScanElementField
End Get
Set
Me.caseScanElementField = Value
End Set
End Property
'''
'''Scanning information
'''
Public Property Scan() As ScanType
Get
Return Me.scanField3
End Get
Set
Me.scanField3 = Value
End Set
End Property
End Class
'''
_
Public Enum CaseScanTypeCaseScanElement
'''
sleeve
'''
inner
'''
inlay
'''
frontback
'''
frontfull
'''
boxfront
'''
boxback
'''
boxspine
'''
external
End Enum
'''
_
Partial Public Class MediaScanType
Private mediaScanElementField As MediaScanTypeMediaScanElement
Private scanField5 As ScanType
'''
''' Scanned element: up, down, label, data, etc
'''
'''
Public Property MediaScanElement() As MediaScanTypeMediaScanElement
Get
Return Me.mediaScanElementField
End Get
Set
Me.mediaScanElementField = Value
End Set
End Property
'''
'''Scan of disk part
'''
Public Property Scan() As ScanType
Get
Return Me.scanField5
End Get
Set
Me.scanField5 = Value
End Set
End Property
End Class
'''
_
Public Enum MediaScanTypeMediaScanElement
'''
up
'''
down
'''
front
'''
back
'''
left
'''
right
End Enum
'''
'''Information about dumped structure
'''
'''
_
Partial Public Class DumpType
Private imageField1 As String
Private sizeField1 As Integer
Private checksumsField3 As ChecksumType()
'''
'''File containing dump
'''
Public Property Image() As String
Get
Return Me.imageField1
End Get
Set
Me.imageField1 = Value
End Set
End Property
'''
'''Size of dump
'''
Public Property Size() As Integer
Get
Return Me.sizeField1
End Get
Set
Me.sizeField1 = Value
End Set
End Property
'''
_
Public Property Checksums() As ChecksumType()
Get
Return Me.checksumsField3
End Get
Set
Me.checksumsField3 = Value
End Set
End Property
End Class
'''
_
Partial Public Class BorderType
Private sessionField As Integer
Private sessionSpecifiedField As Boolean
Private imageField2 As String
Private sizeField2 As String
Private checksumsField4 As ChecksumType()
'''
_
Public Property session() As Integer
Get
Return Me.sessionField
End Get
Set
Me.sessionField = Value
End Set
End Property
'''
_
Public Overridable Property sessionSpecified() As Boolean
Get
Return Me.sessionSpecifiedField
End Get
Set
Me.sessionSpecifiedField = Value
End Set
End Property
'''
'''File containing border dump
'''
Public Property Image() As String
Get
Return Me.imageField2
End Get
Set
Me.imageField2 = Value
End Set
End Property
'''
'''Size of border dump
'''
Public Property Size() As String
Get
Return Me.sizeField2
End Get
Set
Me.sizeField2 = Value
End Set
End Property
'''
_
Public Property Checksums() As ChecksumType()
Get
Return Me.checksumsField4
End Get
Set
Me.checksumsField4 = Value
End Set
End Property
End Class
'''
'''Start and end of XGD's security sectors
'''
'''
_
Partial Public Class SecuritySectorsType
Private startField As Long
Private endField As Long
'''
'''Start of XGD's security sectors
'''
'''
Public Property Start() As Long
Get
Return Me.startField
End Get
Set
Me.startField = Value
End Set
End Property
'''
'''End of XGD's security sectors
'''
Public Property End() As Long
Get
Return Me.endField
End Get
Set
Me.endField = Value
End Set
End Property
End Class
'''
_
Partial Public Class PS3EncryptionType
Private keyField As String
Private serialField1 As String
'''
'''PS3 encryption key
'''
Public Property Key() As String
Get
Return Me.keyField
End Get
Set
Me.keyField = Value
End Set
End Property
'''
'''PS3 encryption key
'''
Public Property Serial() As String
Get
Return Me.serialField1
End Get
Set
Me.serialField1 = Value
End Set
End Property
End Class
'''
'''Track information
'''
_
Partial Public Class TrackType
Private imageField3 As ImageType
Private sizeField3 As String
Private sequenceField1 As TrackSequenceType
Private startMSFField As String
Private endMSFField As String
Private startSectorField As Long
Private endSectorField As Long
Private trackType1Field As TrackTypeTrackType
Private bytesPerSectorField As Integer
Private accoustIDField As String
Private checksumsField5 As ChecksumType()
Private subChannelField As SubChannelType
Private fileSystemInformationField As PartitionType()
'''
'''File containing track dump, and format, binary, yranib, or audio/video container
'''
'''
Public Property Image() As ImageType
Get
Return Me.imageField3
End Get
Set
Me.imageField3 = Value
End Set
End Property
'''
'''Size of track dump in bytes
'''
Public Property Size() As String
Get
Return Me.sizeField3
End Get
Set
Me.sizeField3 = Value
End Set
End Property
'''
'''Track sequence information
'''
Public Property Sequence() As TrackSequenceType
Get
Return Me.sequenceField1
End Get
Set
Me.sequenceField1 = Value
End Set
End Property
'''
'''Track start address in MM:SS:FF
'''
'''
Public Property StartMSF() As String
Get
Return Me.startMSFField
End Get
Set
Me.startMSFField = Value
End Set
End Property
'''
'''Track end address in MM:SS:FF
'''
Public Property EndMSF() As String
Get
Return Me.endMSFField
End Get
Set
Me.endMSFField = Value
End Set
End Property
'''
'''Track start sector
'''
Public Property StartSector() As Long
Get
Return Me.startSectorField
End Get
Set
Me.startSectorField = Value
End Set
End Property
'''
'''Track end sector
'''
Public Property EndSector() As Long
Get
Return Me.endSectorField
End Get
Set
Me.endSectorField = Value
End Set
End Property
'''
''' Track type: audio, mode0, mode1, mode2
'''
'''
_
Public Property TrackType1() As TrackTypeTrackType
Get
Return Me.trackType1Field
End Get
Set
Me.trackType1Field = Value
End Set
End Property
'''
'''Bytes per sector: 2048, 2352, 2448, etc, etc (as stored in image, not in physical format)
'''
'''
Public Property BytesPerSector() As Integer
Get
Return Me.bytesPerSectorField
End Get
Set
Me.bytesPerSectorField = Value
End Set
End Property
'''
'''AccoustID for audio tracks
'''
Public Property AccoustID() As String
Get
Return Me.accoustIDField
End Get
Set
Me.accoustIDField = Value
End Set
End Property
'''
_
Public Property Checksums() As ChecksumType()
Get
Return Me.checksumsField5
End Get
Set
Me.checksumsField5 = Value
End Set
End Property
'''
'''Track's subchannel information
'''
Public Property SubChannel() As SubChannelType
Get
Return Me.subChannelField
End Get
Set
Me.subChannelField = Value
End Set
End Property
'''
_
Public Property FileSystemInformation() As PartitionType()
Get
Return Me.fileSystemInformationField
End Get
Set
Me.fileSystemInformationField = Value
End Set
End Property
End Class
'''
'''Sequence information about a track
'''
'''
_
Partial Public Class TrackSequenceType
Private trackNumberField As Integer
Private sessionField1 As Integer
'''
'''Track number
'''
Public Property TrackNumber() As Integer
Get
Return Me.trackNumberField
End Get
Set
Me.trackNumberField = Value
End Set
End Property
'''
'''Session this track belongs to
'''
Public Property Session() As Integer
Get
Return Me.sessionField1
End Get
Set
Me.sessionField1 = Value
End Set
End Property
End Class
'''
_
Public Enum TrackTypeTrackType
'''
audio
'''
mode0
'''
mode1
'''
mode2
'''
m2f1
'''
m2f2
'''
dvd
'''
hddvd
'''
bluray
'''
ddcd
End Enum
'''
'''Track's subchannel information
'''
_
Partial Public Class SubChannelType
Private imageField4 As ImageType
Private sizeField4 As String
Private checksumsField6 As ChecksumType()
'''
'''File containing track's subchannel dump and format, packed, rw_raw
'''
'''
Public Property Image() As ImageType
Get
Return Me.imageField4
End Get
Set
Me.imageField4 = Value
End Set
End Property
'''
'''Size of subchannel dump
'''
Public Property Size() As String
Get
Return Me.sizeField4
End Get
Set
Me.sizeField4 = Value
End Set
End Property
'''
_
Public Property Checksums() As ChecksumType()
Get
Return Me.checksumsField6
End Get
Set
Me.checksumsField6 = Value
End Set
End Property
End Class
'''
_
Partial Public Class PartitionType
Private sequenceField2 As Integer
Private nameField4 As String
Private typeField3 As String
Private startSectorField1 As Integer
Private endSectorField1 As Integer
Private descriptionField As String
Private fileSystemsField As FileSystemsType
'''
'''Partition sequence number, starting on 1
'''
'''
Public Property Sequence() As Integer
Get
Return Me.sequenceField2
End Get
Set
Me.sequenceField2 = Value
End Set
End Property
'''
'''Partition name if supported by partition scheme
'''
'''
Public Property Name() As String
Get
Return Me.nameField4
End Get
Set
Me.nameField4 = Value
End Set
End Property
'''
'''Partition type
'''
Public Property Type() As String
Get
Return Me.typeField3
End Get
Set
Me.typeField3 = Value
End Set
End Property
'''
'''Partition starting sector
'''
Public Property StartSector() As Integer
Get
Return Me.startSectorField1
End Get
Set
Me.startSectorField1 = Value
End Set
End Property
'''
'''Partition ending sector
'''
Public Property EndSector() As Integer
Get
Return Me.endSectorField1
End Get
Set
Me.endSectorField1 = Value
End Set
End Property
'''
'''Partition description if supported by partition scheme
'''
'''
Public Property Description() As String
Get
Return Me.descriptionField
End Get
Set
Me.descriptionField = Value
End Set
End Property
'''
'''Array of filesystems contained in the partition
'''
'''
Public Property FileSystems() As FileSystemsType
Get
Return Me.fileSystemsField
End Get
Set
Me.fileSystemsField = Value
End Set
End Property
End Class
'''
_
Partial Public Class FileSystemsType
Private fileSystemField As FileSystemType
'''
'''Array of filesystems
'''
Public Property FileSystem() As FileSystemType
Get
Return Me.fileSystemField
End Get
Set
Me.fileSystemField = Value
End Set
End Property
End Class
'''
'''Information about a filesystem
'''
_
Partial Public Class FileSystemType
Private typeField4 As String
Private creationDateField As Date
Private creationDateSpecifiedField As Boolean
Private modificationDateField As Date
Private modificationDateSpecifiedField As Boolean
Private backupDateField As Date
Private backupDateSpecifiedField As Boolean
Private clusterSizeField As Integer
Private clustersField As Long
Private filesField As Long
Private filesSpecifiedField As Boolean
Private bootableField As Boolean
Private volumeSerialField As String
Private volumeNameField As String
Private freeClustersField As Long
Private freeClustersSpecifiedField As Boolean
Private dirtyField As Boolean
Private expirationDateField As Date
Private expirationDateSpecifiedField As Boolean
Private effectiveDateField As Date
Private effectiveDateSpecifiedField As Boolean
Private systemIdentifierField As String
Private volumeSetIdentifierField As String
Private publisherIdentifierField As String
Private dataPreparerIdentifierField As String
Private applicationIdentifierField As String
'''
'''Filesystem type
'''
Public Property Type() As String
Get
Return Me.typeField4
End Get
Set
Me.typeField4 = Value
End Set
End Property
'''
'''Filesystem creation date
'''
Public Property CreationDate() As Date
Get
Return Me.creationDateField
End Get
Set
Me.creationDateField = Value
End Set
End Property
'''
_
Public Overridable Property CreationDateSpecified() As Boolean
Get
Return Me.creationDateSpecifiedField
End Get
Set
Me.creationDateSpecifiedField = Value
End Set
End Property
'''
'''Filesystem last modification date
'''
'''
Public Property ModificationDate() As Date
Get
Return Me.modificationDateField
End Get
Set
Me.modificationDateField = Value
End Set
End Property
'''
_
Public Overridable Property ModificationDateSpecified() As Boolean
Get
Return Me.modificationDateSpecifiedField
End Get
Set
Me.modificationDateSpecifiedField = Value
End Set
End Property
'''
'''Filesystem last backup date
'''
Public Property BackupDate() As Date
Get
Return Me.backupDateField
End Get
Set
Me.backupDateField = Value
End Set
End Property
'''
_
Public Overridable Property BackupDateSpecified() As Boolean
Get
Return Me.backupDateSpecifiedField
End Get
Set
Me.backupDateSpecifiedField = Value
End Set
End Property
'''
'''Bytes per cluster
'''
Public Property ClusterSize() As Integer
Get
Return Me.clusterSizeField
End Get
Set
Me.clusterSizeField = Value
End Set
End Property
'''
'''Clusters in filesystem
'''
Public Property Clusters() As Long
Get
Return Me.clustersField
End Get
Set
Me.clustersField = Value
End Set
End Property
'''
'''Files in filesystem
'''
Public Property Files() As Long
Get
Return Me.filesField
End Get
Set
Me.filesField = Value
End Set
End Property
'''
_
Public Overridable Property FilesSpecified() As Boolean
Get
Return Me.filesSpecifiedField
End Get
Set
Me.filesSpecifiedField = Value
End Set
End Property
'''
'''Bootable filesystem?
'''
Public Property Bootable() As Boolean
Get
Return Me.bootableField
End Get
Set
Me.bootableField = Value
End Set
End Property
'''
'''Filesystem serial number
'''
Public Property VolumeSerial() As String
Get
Return Me.volumeSerialField
End Get
Set
Me.volumeSerialField = Value
End Set
End Property
'''
'''Filesystem volume name
'''
Public Property VolumeName() As String
Get
Return Me.volumeNameField
End Get
Set
Me.volumeNameField = Value
End Set
End Property
'''
'''Free clusters in filesystem
'''
Public Property FreeClusters() As Long
Get
Return Me.freeClustersField
End Get
Set
Me.freeClustersField = Value
End Set
End Property
'''
_
Public Overridable Property FreeClustersSpecified() As Boolean
Get
Return Me.freeClustersSpecifiedField
End Get
Set
Me.freeClustersSpecifiedField = Value
End Set
End Property
'''
'''Dirty/unclean filesystem
'''
Public Property Dirty() As Boolean
Get
Return Me.dirtyField
End Get
Set
Me.dirtyField = Value
End Set
End Property
'''
'''Filesystem expiration date
'''
Public Property ExpirationDate() As Date
Get
Return Me.expirationDateField
End Get
Set
Me.expirationDateField = Value
End Set
End Property
'''
_
Public Overridable Property ExpirationDateSpecified() As Boolean
Get
Return Me.expirationDateSpecifiedField
End Get
Set
Me.expirationDateSpecifiedField = Value
End Set
End Property
'''
'''Filesystem effective date
'''
Public Property EffectiveDate() As Date
Get
Return Me.effectiveDateField
End Get
Set
Me.effectiveDateField = Value
End Set
End Property
'''
_
Public Overridable Property EffectiveDateSpecified() As Boolean
Get
Return Me.effectiveDateSpecifiedField
End Get
Set
Me.effectiveDateSpecifiedField = Value
End Set
End Property
'''
'''System identifier filesystem applies to
'''
'''
Public Property SystemIdentifier() As String
Get
Return Me.systemIdentifierField
End Get
Set
Me.systemIdentifierField = Value
End Set
End Property
'''
'''Volume set identifier
'''
Public Property VolumeSetIdentifier() As String
Get
Return Me.volumeSetIdentifierField
End Get
Set
Me.volumeSetIdentifierField = Value
End Set
End Property
'''
'''Filesystem publisher identifier
'''
'''
Public Property PublisherIdentifier() As String
Get
Return Me.publisherIdentifierField
End Get
Set
Me.publisherIdentifierField = Value
End Set
End Property
'''
'''Filesystem data preparer
'''
Public Property DataPreparerIdentifier() As String
Get
Return Me.dataPreparerIdentifierField
End Get
Set
Me.dataPreparerIdentifierField = Value
End Set
End Property
'''
'''Filesystem application preparer
'''
'''
Public Property ApplicationIdentifier() As String
Get
Return Me.applicationIdentifierField
End Get
Set
Me.applicationIdentifierField = Value
End Set
End Property
End Class
'''
_
Partial Public Class DumpHardwareArrayType
Private dumpHardwareField As DumpHardwareType
'''
'''Array of drives information
'''
Public Property DumpHardware() As DumpHardwareType
Get
Return Me.dumpHardwareField
End Get
Set
Me.dumpHardwareField = Value
End Set
End Property
End Class
'''
_
Partial Public Class DumpHardwareType
Private manufacturerField1 As String
Private modelField1 As String
Private revisionField As String
Private firmwareField As String
Private serialField2 As String
Private extentsField As ExtentType()
Private softwareField3 As SoftwareType
'''
'''Drive manufacturer
'''
Public Property Manufacturer() As String
Get
Return Me.manufacturerField1
End Get
Set
Me.manufacturerField1 = Value
End Set
End Property
'''
'''Drive model
'''
Public Property Model() As String
Get
Return Me.modelField1
End Get
Set
Me.modelField1 = Value
End Set
End Property
'''
'''Drive revision
'''
Public Property Revision() As String
Get
Return Me.revisionField
End Get
Set
Me.revisionField = Value
End Set
End Property
'''
'''Drive firmware version
'''
Public Property Firmware() As String
Get
Return Me.firmwareField
End Get
Set
Me.firmwareField = Value
End Set
End Property
'''
'''Drive serial number
'''
Public Property Serial() As String
Get
Return Me.serialField2
End Get
Set
Me.serialField2 = Value
End Set
End Property
'''
_
Public Property Extents() As ExtentType()
Get
Return Me.extentsField
End Get
Set
Me.extentsField = Value
End Set
End Property
'''
'''Software used to read with this drive
'''
'''
Public Property Software() As SoftwareType
Get
Return Me.softwareField3
End Get
Set
Me.softwareField3 = Value
End Set
End Property
End Class
'''
_
Partial Public Class ExtentType
Private startField1 As Integer
Private endField1 As Integer
'''
'''Starting sector
'''
Public Property Start() As Integer
Get
Return Me.startField1
End Get
Set
Me.startField1 = Value
End Set
End Property
'''
'''Ending sector
'''
Public Property End() As Integer
Get
Return Me.endField1
End Get
Set
Me.endField1 = Value
End Set
End Property
End Class
'''
'''Software used for disc reading
'''
_
Partial Public Class SoftwareType
Private nameField5 As String
Private versionField2 As String
Private operatingSystemField As String
'''
'''Software name
'''
Public Property Name() As String
Get
Return Me.nameField5
End Get
Set
Me.nameField5 = Value
End Set
End Property
'''
'''Software version
'''
Public Property Version() As String
Get
Return Me.versionField2
End Get
Set
Me.versionField2 = Value
End Set
End Property
'''
'''Operating system name and version where the software was run
'''
'''
Public Property OperatingSystem() As String
Get
Return Me.operatingSystemField
End Get
Set
Me.operatingSystemField = Value
End Set
End Property
End Class
'''
_
Partial Public Class AdvertisementType
Private manufacturerField2 As String
Private productField As String
Private fileField2 As FileType
Private fileSizeField As Long
Private framesField As Long
Private framesSpecifiedField As Boolean
Private durationField As Long
Private meanFrameRateField As Integer
Private meanFrameRateSpecifiedField As Boolean
Private checksumsField7 As ChecksumType()
Private audioTrackField As AudioTracksType()
Private videoTrackField As VideoTracksType()
Private subtitleTrackField As SubtitleTracksType()
Private recordingField As RecordingType
'''
'''Manufactured of the advertised product
'''
'''
Public Property Manufacturer() As String
Get
Return Me.manufacturerField2
End Get
Set
Me.manufacturerField2 = Value
End Set
End Property
'''
'''Advertised product
'''
Public Property Product() As String
Get
Return Me.productField
End Get
Set
Me.productField = Value
End Set
End Property
'''
'''File containing advertising
'''
Public Property File() As FileType
Get
Return Me.fileField2
End Get
Set
Me.fileField2 = Value
End Set
End Property
'''
'''Size of file
'''
Public Property FileSize() As Long
Get
Return Me.fileSizeField
End Get
Set
Me.fileSizeField = Value
End Set
End Property
'''
'''Total video frames
'''
Public Property Frames() As Long
Get
Return Me.framesField
End Get
Set
Me.framesField = Value
End Set
End Property
'''
_
Public Overridable Property FramesSpecified() As Boolean
Get
Return Me.framesSpecifiedField
End Get
Set
Me.framesSpecifiedField = Value
End Set
End Property
'''
'''Duration in seconds
'''
Public Property Duration() As Long
Get
Return Me.durationField
End Get
Set
Me.durationField = Value
End Set
End Property
'''
'''Mean framerate
'''
Public Property MeanFrameRate() As Integer
Get
Return Me.meanFrameRateField
End Get
Set
Me.meanFrameRateField = Value
End Set
End Property
'''
_
Public Overridable Property MeanFrameRateSpecified() As Boolean
Get
Return Me.meanFrameRateSpecifiedField
End Get
Set
Me.meanFrameRateSpecifiedField = Value
End Set
End Property
'''
_
Public Property Checksums() As ChecksumType()
Get
Return Me.checksumsField7
End Get
Set
Me.checksumsField7 = Value
End Set
End Property
'''
'''Audio tracks of advertisement
'''
_
Public Property AudioTrack() As AudioTracksType()
Get
Return Me.audioTrackField
End Get
Set
Me.audioTrackField = Value
End Set
End Property
'''
'''Video tracks of advertisement
'''
_
Public Property VideoTrack() As VideoTracksType()
Get
Return Me.videoTrackField
End Get
Set
Me.videoTrackField = Value
End Set
End Property
'''
'''Subtitle tracks of advertisement
'''
'''
_
Public Property SubtitleTrack() As SubtitleTracksType()
Get
Return Me.subtitleTrackField
End Get
Set
Me.subtitleTrackField = Value
End Set
End Property
'''
'''If advertisement has been capture from a television/radio broadcast, here is the capture information
'''
'''
Public Property Recording() As RecordingType
Get
Return Me.recordingField
End Get
Set
Me.recordingField = Value
End Set
End Property
End Class
'''
_
Partial Public Class AudioTracksType
Private trackNumberField1 As Integer
Private accoustIDField1 As String
Private codecField As String
Private channelsField As Integer
Private sampleRateField As Integer
Private meanBitrateField As Long
Private languagesField1 As LanguagesType
'''
'''Track number in media container
'''
_
Public Property TrackNumber() As Integer
Get
Return Me.trackNumberField1
End Get
Set
Me.trackNumberField1 = Value
End Set
End Property
'''
'''Track's AccoustID
'''
_
Public Property AccoustID() As String
Get
Return Me.accoustIDField1
End Get
Set
Me.accoustIDField1 = Value
End Set
End Property
'''
'''Track's codec
'''
_
Public Property Codec() As String
Get
Return Me.codecField
End Get
Set
Me.codecField = Value
End Set
End Property
'''
'''Audio channels
'''
_
Public Property Channels() As Integer
Get
Return Me.channelsField
End Get
Set
Me.channelsField = Value
End Set
End Property
'''
'''Audio sampling rate
'''
_
Public Property SampleRate() As Integer
Get
Return Me.sampleRateField
End Get
Set
Me.sampleRateField = Value
End Set
End Property
'''
'''Mean bitrate, or constant bitrate, in bits per second
'''
'''
_
Public Property MeanBitrate() As Long
Get
Return Me.meanBitrateField
End Get
Set
Me.meanBitrateField = Value
End Set
End Property
'''
'''Track languages
'''
Public Property Languages() As LanguagesType
Get
Return Me.languagesField1
End Get
Set
Me.languagesField1 = Value
End Set
End Property
End Class
'''
_
Partial Public Class VideoTracksType
Private trackNumberField2 As Integer
Private codecField1 As String
Private horizontalField As Integer
Private verticalField As Integer
Private meanBitrateField1 As Long
Private threeDField As Boolean
Private languagesField2 As LanguagesType
'''
'''Track number in media container
'''
_
Public Property TrackNumber() As Integer
Get
Return Me.trackNumberField2
End Get
Set
Me.trackNumberField2 = Value
End Set
End Property
'''
'''Track's codec
'''
_
Public Property Codec() As String
Get
Return Me.codecField1
End Get
Set
Me.codecField1 = Value
End Set
End Property
'''
'''Horizontal resolution in pixels
'''
_
Public Property Horizontal() As Integer
Get
Return Me.horizontalField
End Get
Set
Me.horizontalField = Value
End Set
End Property
'''
'''Vertical resolution in pixels
'''
_
Public Property Vertical() As Integer
Get
Return Me.verticalField
End Get
Set
Me.verticalField = Value
End Set
End Property
'''
'''Mean bitrate, or constant bitrate, in bits per second
'''
'''
_
Public Property MeanBitrate() As Long
Get
Return Me.meanBitrateField1
End Get
Set
Me.meanBitrateField1 = Value
End Set
End Property
'''
'''Is this video track in 3D?
'''
_
Public Property ThreeD() As Boolean
Get
Return Me.threeDField
End Get
Set
Me.threeDField = Value
End Set
End Property
'''
'''Track languages
'''
Public Property Languages() As LanguagesType
Get
Return Me.languagesField2
End Get
Set
Me.languagesField2 = Value
End Set
End Property
End Class
'''
_
Partial Public Class SubtitleTracksType
Private trackNumberField3 As Integer
Private codecField2 As String
Private languagesField3 As LanguagesType
'''
'''Track number in media container
'''
_
Public Property TrackNumber() As Integer
Get
Return Me.trackNumberField3
End Get
Set
Me.trackNumberField3 = Value
End Set
End Property
'''
'''Track's codec
'''
_
Public Property Codec() As String
Get
Return Me.codecField2
End Get
Set
Me.codecField2 = Value
End Set
End Property
'''
'''Track languages
'''
Public Property Languages() As LanguagesType
Get
Return Me.languagesField3
End Get
Set
Me.languagesField3 = Value
End Set
End Property
End Class
'''
_
Partial Public Class RecordingType
Private broadcasterField As String
Private broadcastPlatformField As String
Private sourceFormatField As RecordingTypeSourceFormat
Private timestampField As Date
Private softwareField4 As SoftwareType()
Private coordinatesField As CoordinatesType
'''
'''Name of the television channel this recording was broadcasted, if applicable
'''
'''
Public Property Broadcaster() As String
Get
Return Me.broadcasterField
End Get
Set
Me.broadcasterField = Value
End Set
End Property
'''
'''Platform that broadcasted the television channel, if applicable
'''
'''
Public Property BroadcastPlatform() As String
Get
Return Me.broadcastPlatformField
End Get
Set
Me.broadcastPlatformField = Value
End Set
End Property
'''
''' Format of the source of this recording
'''
'''
Public Property SourceFormat() As RecordingTypeSourceFormat
Get
Return Me.sourceFormatField
End Get
Set
Me.sourceFormatField = Value
End Set
End Property
'''
'''Date and time of broadcast
'''
Public Property Timestamp() As Date
Get
Return Me.timestampField
End Get
Set
Me.timestampField = Value
End Set
End Property
'''
'''Software used to capture, process, convert, the recording
'''
'''
_
Public Property Software() As SoftwareType()
Get
Return Me.softwareField4
End Get
Set
Me.softwareField4 = Value
End Set
End Property
'''
'''Approximate coordinates where the recording was done
'''
'''
Public Property Coordinates() As CoordinatesType
Get
Return Me.coordinatesField
End Get
Set
Me.coordinatesField = Value
End Set
End Property
End Class
'''
_
Public Enum RecordingTypeSourceFormat
'''
_
ITUA
'''
_
ITUB
'''
_
ITUC
'''
_
ITUD
'''
_
ITUE
'''
_
ITUF
'''
_
ITUG
'''
_
ITUH
'''
_
ITUI
'''
_
ITUJ
'''
_
ITUK
'''
_
ITUL
'''
_
ITUM
'''
_
ITUN
'''
_
PALB
'''
_
SECAMB
'''
_
PALD
'''
_
SECAMD
'''
_
PALG
'''
_
SECAMG
'''
_
PALH
'''
_
PALI
'''
_
PALK
'''
_
SECAMK
'''
_
NTSCM
'''
_
PALN
'''
_
PALM
'''
_
SECAMM
'''
MUSE
'''
PALplus
'''
FM
'''
AM
'''
COFDM
'''
_
CAMD
'''
DAB
'''
_
DAB1
'''
DRM
'''
_
DRM1
'''
FMeXtra
'''
ATSC
'''
ATSC2
'''
ATSC3
'''
_
ATSCMH
'''
_
DVBT
'''
_
DVBT2
'''
_
DVBS
'''
_
DVBS2
'''
_
DVBS2X
'''
_
DVBC
'''
_
DVBC2
'''
_
DVBH
'''
_
DVBNGH
'''
_
DVBSH
'''
_
ISDBT
'''
_
ISDBTb
'''
_
ISDBS
'''
_
ISDBC
'''
_
Item1seg
'''
DTMB
'''
CCMB
'''
_
TDMB
'''
_
SDMB
'''
IPTV
'''
_
DVBMT
'''
_
DVBMC
'''
_
DVBMS
'''
ADR
'''
SDR
End Enum
'''
_
Partial Public Class CoordinatesType
Private latitudeField As Double
Private longitudeField As Double
'''
'''Approximate latitude of recording
'''
'''
Public Property Latitude() As Double
Get
Return Me.latitudeField
End Get
Set
Me.latitudeField = Value
End Set
End Property
'''
'''Approximate longitude of recording
'''
'''
Public Property Longitude() As Double
Get
Return Me.longitudeField
End Get
Set
Me.longitudeField = Value
End Set
End Property
End Class
'''
'''Describes a dump of a linear media, that is, a media that is read byte-by-byte like for example, a ROM chip, a game cartridge, a PCMCIA SRAM card, etc...
'''
_
Partial Public Class LinearMediaType
Private imageField5 As ImageType
Private sizeField5 As Long
Private imageChecksumsField As ChecksumType()
Private checksumsField8 As ChecksumType()
Private titleField As String
Private sequenceField3 As Integer
Private sequenceSpecifiedField As Boolean
Private imageInterleaveField As Integer
Private imageInterleaveSpecifiedField As Boolean
Private interleaveField As Integer
Private interleaveSpecifiedField As Boolean
Private manufacturerField3 As String
Private modelField2 As String
Private packageField As String
Private interfaceField As String
Private dimensionsField1 As DimensionsType
Private scanField6 As MediaScanType
Private dumpHardwareArrayField1 As DumpHardwareArrayType
Private pCMCIAField As PCMCIAType
'''
'''Image file, or image description file, plus format (cue, toc, etc, etc)
'''
Public Property Image() As ImageType
Get
Return Me.imageField5
End Get
Set
Me.imageField5 = Value
End Set
End Property
'''
'''Image file size
'''
Public Property Size() As Long
Get
Return Me.sizeField5
End Get
Set
Me.sizeField5 = Value
End Set
End Property
'''
_
Public Property ImageChecksums() As ChecksumType()
Get
Return Me.imageChecksumsField
End Get
Set
Me.imageChecksumsField = Value
End Set
End Property
'''
_
Public Property Checksums() As ChecksumType()
Get
Return Me.checksumsField8
End Get
Set
Me.checksumsField8 = Value
End Set
End Property
'''
'''Title as it is labeled on media
'''
Public Property Title() As String
Get
Return Me.titleField
End Get
Set
Me.titleField = Value
End Set
End Property
'''
'''Sequence of media
'''
Public Property Sequence() As Integer
Get
Return Me.sequenceField3
End Get
Set
Me.sequenceField3 = Value
End Set
End Property
'''
_
Public Overridable Property SequenceSpecified() As Boolean
Get
Return Me.sequenceSpecifiedField
End Get
Set
Me.sequenceSpecifiedField = Value
End Set
End Property
'''
'''How many bytes must be read in image file for each byte in media
'''
Public Property ImageInterleave() As Integer
Get
Return Me.imageInterleaveField
End Get
Set
Me.imageInterleaveField = Value
End Set
End Property
'''
_
Public Overridable Property ImageInterleaveSpecified() As Boolean
Get
Return Me.imageInterleaveSpecifiedField
End Get
Set
Me.imageInterleaveSpecifiedField = Value
End Set
End Property
'''
'''How many bytes must be skipped in image file for each byte in media
'''
Public Property Interleave() As Integer
Get
Return Me.interleaveField
End Get
Set
Me.interleaveField = Value
End Set
End Property
'''
_
Public Overridable Property InterleaveSpecified() As Boolean
Get
Return Me.interleaveSpecifiedField
End Get
Set
Me.interleaveSpecifiedField = Value
End Set
End Property
'''
'''Media manufacturer
'''
Public Property Manufacturer() As String
Get
Return Me.manufacturerField3
End Get
Set
Me.manufacturerField3 = Value
End Set
End Property
'''
'''Media model
'''
Public Property Model() As String
Get
Return Me.modelField2
End Get
Set
Me.modelField2 = Value
End Set
End Property
'''
'''Media packaging (DIP, PCMCIA, Cartridge, etc)
'''
Public Property Package() As String
Get
Return Me.packageField
End Get
Set
Me.packageField = Value
End Set
End Property
'''
'''Media interface
'''
Public Property Interface() As String
Get
Return Me.interfaceField
End Get
Set
Me.interfaceField = Value
End Set
End Property
'''
'''Dimensions of media
'''
Public Property Dimensions() As DimensionsType
Get
Return Me.dimensionsField1
End Get
Set
Me.dimensionsField1 = Value
End Set
End Property
'''
'''Scan of media
'''
Public Property Scan() As MediaScanType
Get
Return Me.scanField6
End Get
Set
Me.scanField6 = Value
End Set
End Property
'''
'''Array of hardware used to dump media
'''
Public Property DumpHardwareArray() As DumpHardwareArrayType
Get
Return Me.dumpHardwareArrayField1
End Get
Set
Me.dumpHardwareArrayField1 = Value
End Set
End Property
'''
'''Present if media is a PCMCIA Linear Flash or SRAM card, to contain PCMCIA specific information
'''
Public Property PCMCIA() As PCMCIAType
Get
Return Me.pCMCIAField
End Get
Set
Me.pCMCIAField = Value
End Set
End Property
End Class
'''
'''Contains PCMCIA card information
'''
_
Partial Public Class PCMCIAType
Private cISField As DumpType
'''
'''Contains the PCMCIA Card Information Structure dump.
'''
Public Property CIS() As DumpType
Get
Return Me.cISField
End Get
Set
Me.cISField = Value
End Set
End Property
End Class
End Namespace