misc: Add a comment all classes in the Osmo namespace

9 files changed, 198 insertions, 5 deletions

diff --git a/Extensions.st b/Extensions.st
index 7ba6037..be0c8dd 100644
--- a/Extensions.st
+++ b/Extensions.st
@@ -138,7 +138,8 @@ ByteArray extend [
 CCompound subclass: CPackedStruct [
     <shape: #word>
     <category: 'Language-C interface'>
-    <comment: nil>
+    <comment: 'I am a packed struct with one byte alignment,
+    Paolo created me, Holger copied me here.'>
 
     CPackedStruct class >> declaration: array [
         "Compile methods that implement the declaration in array."
diff --git a/IPAConstants.st b/IPAConstants.st
index 1f94fb7..9df3e85 100644
--- a/IPAConstants.st
+++ b/IPAConstants.st
@@ -18,6 +18,7 @@
 
 Object subclass: IPAConstants [
     <category: 'OsmoNetwork-IPA'>
+    <comment: 'I have the constants for the IPA protocol.'>
 
     IPAConstants class >> protocolRSL  [ ^ 16r00 ]
     IPAConstants class >> protocolMGCP [ ^ 16rFC ]
@@ -55,6 +56,8 @@ Object subclass: IPAConstants [
 
 CPackedStruct subclass: IPASCCPState [
     <category: 'OsmoNetwork-IPA'>
+    <comment: 'This is an Osmocom NAT extension to hand out USSD
+    to a different provider.'>
 
     <declaration: #(
         #(#src  (#array #byte 3))
diff --git a/IPAMuxer.st b/IPAMuxer.st
index f8f7add..213f81e 100644
--- a/IPAMuxer.st
+++ b/IPAMuxer.st
@@ -1,5 +1,5 @@
 "
- (C) 2010 by Holger Hans Peter Freyther
+ (C) 2010-2012 by Holger Hans Peter Freyther
  All Rights Reserved
 
  This program is free software: you can redistribute it and/or modify
@@ -20,6 +20,8 @@ Object subclass: IPADemuxer [
     | socket |
 
     <category: 'OsmoNetwork-IPA'>
+    <comment: 'I know how to demultiplex data from a socket. Give
+    me the socket and I read from it and provide you a tuple.'>
 
     IPADemuxer class >> initOn: aSocket [
 	^ (self new)
@@ -54,6 +56,9 @@ Object subclass: IPAMuxer [
     | socket |
 
     <category: 'OsmoNetwork-IPA'>
+    <comment: 'I can multiplex data according to the IPA protocol. You
+    will need to give me a Socket or a SharedQueue and I will mux the
+    data you provide me with.'>
 
     IPAMuxer class >> initOn: aSocket [
 	^ (self new)
diff --git a/LogAreas.st b/LogAreas.st
index 1c8f4ac..6c12c43 100644
--- a/LogAreas.st
+++ b/LogAreas.st
@@ -1,5 +1,5 @@
 "
- (C) 2010-2011 by Holger Hans Peter Freyther
+ (C) 2010-2012 by Holger Hans Peter Freyther
  All Rights Reserved
 
  This program is free software: you can redistribute it and/or modify
@@ -18,6 +18,7 @@
 
 Osmo.LogArea subclass: LogAreaSCCP [
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I am the debug area for SCCP.'>
 
     LogAreaSCCP class >> areaName [ ^ #sccp ]
     LogAreaSCCP class >> areaDescription [ ^ 'SCCP related' ]
@@ -31,6 +32,7 @@ Osmo.LogArea subclass: LogAreaSCCP [
 
 Osmo.LogArea subclass: LogAreaIPA [
     <category: 'OsmoNetwork-IPA'>
+    <comment: 'I am the debug area for IPA messages.'>
 
     LogAreaIPA class >> areaName [ ^ #ipa ]
     LogAreaIPA class >> areaDescription [ ^ 'IPA related' ]
@@ -44,6 +46,7 @@ Osmo.LogArea subclass: LogAreaIPA [
 
 Osmo.LogArea subclass: LogAreaM2UA [
     <category: 'OsmoNetwork-M2UA'>
+    <comment: 'I am the debug area for M2UA messages'>
 
     LogAreaM2UA class >> areaName [ ^ #m2ua ]
     LogAreaM2UA class >> areaDescription [ ^ 'MTP2 User Adaption' ]
diff --git a/M2UA.st b/M2UA.st
index c811a21..b1b9379 100644
--- a/M2UA.st
+++ b/M2UA.st
@@ -1,5 +1,5 @@
 "
- (C) 2011 by Holger Hans Peter Freyther
+ (C) 2011-2012 by Holger Hans Peter Freyther
  All Rights Reserved
 
  This program is free software: you can redistribute it and/or modify
@@ -32,6 +32,8 @@ Object subclass: UAConstants [
     "
 
     <category: 'OsmoNetwork-M2UA'>
+    <comment: 'I hold the mapping from M2UA constants to their
+    numeric representation.'>
 
     UAConstants class >> clsMgmt            [ ^ 0  ]
     UAConstants class >> clsTrans           [ ^ 1  ]
@@ -222,6 +224,8 @@ Object subclass: M2UATag [
     | tag_nr data |
 
     <category: 'OsmoNetwork-M2UA'>
+    <comment: 'I represent a tag of a M2UA packet. I hold the
+    number of the tag and the data associated with it.'>
 
     M2UATag class >> fromStream: aStream [
         ^ self new
@@ -277,6 +281,8 @@ Object subclass: M2UAMSG [
     | msg_class msg_type tags |
 
     <category: 'OsmoNetwork-M2UA'>
+    <comment: 'I can parse a M2UA message from the wire, allow you
+    to see the class, type and include tags.'>
 
     M2UAMSG class >> parseFrom: aMsg [
 	self logDataContext: aMsg area: #m2ua.
diff --git a/MessageStructure.st b/MessageStructure.st
index 3c43dcb..ca11d79 100644
--- a/MessageStructure.st
+++ b/MessageStructure.st
@@ -402,6 +402,7 @@ Object subclass: MSGField [
 
 MSGField subclass: MSGFixedField [
     <category: 'OsmoNetwork-MSG'>
+    <comment: 'I represent a fixed length field.'>
 
     MSGFixedField class >> isVarible [ ^ false ]
     MSGFixedField class >> isFixed   [ ^ true  ]
@@ -423,6 +424,7 @@ MSGField subclass: MSGFixedField [
 
 MSGField subclass: MSGVariableField [
     <category: 'OsmoNetwork-MSG'>
+    <comment: 'I represent a variable sized field.'>
 
     MSGVariableField class >> isVarible [ ^ true  ]
     MSGVariableField class >> isFixed   [ ^ false ]
diff --git a/SCCP.st b/SCCP.st
index 2b571b2..0ee8a07 100644
--- a/SCCP.st
+++ b/SCCP.st
@@ -1,5 +1,5 @@
 "
- (C) 2010 by Holger Hans Peter Freyther
+ (C) 2010-2012 by Holger Hans Peter Freyther
  All Rights Reserved
 
  This program is free software: you can redistribute it and/or modify
@@ -18,6 +18,8 @@
 
 Object subclass: SCCPHelper [
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I hold the SCCP message class constants and provide
+    an easy way to create specific messages.'>
 
     SCCPHelper class >> msgCr   [ ^ 16r01 ]
     SCCPHelper class >> msgCc   [ ^ 16r02 ]
@@ -63,6 +65,8 @@ Object subclass: SCCPPNC [
     | dict |
 
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I can parse and write the optional
+    data of SCCP messages.'>
 
     SCCPPNC class >> parseFrom: aPnc [
         | dict pnc |
@@ -231,6 +235,8 @@ SCCPGTI subclass: SCCPGTITranslation [
     | trans plan enc nature addr |
 
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I represent the global title translation specific
+    encoing of a SCCP header.'>
 
     SCCPGTITranslation class >> subType [ ^ 4 ]
     SCCPGTITranslation class >> initWith: data [
@@ -293,6 +299,8 @@ Object subclass: SCCPAddress [
     | route_ssn ssn poi gti gti_ind |
 
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I represent the SCCP Address including the
+    SSN, GTI if present.'>
 
     SCCPAddress class >> ssnNotKnown [ ^ 0 ]
     SCCPAddress class >> ssnSCCPMgnt [ ^ 1 ]
@@ -458,6 +466,8 @@ Object subclass: SCCPAddress [
 Object subclass: SCCPAddrReference [
 
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I represent the Address Reference, e.g. the source
+    or destination reference address as used for SCCP connections.'>
 
     SCCPAddrReference class >> store: anAddress on: aMsg [
         "Store the threee bytes of an sccp address on a messagebuffer"
@@ -491,6 +501,9 @@ Object subclass: SCCPAddrReference [
 
 Object subclass: SCCPMessage [
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I am the generic base class for all defined
+    SCCP messages. You should only deal with me to decode
+    data.'>
 
     SCCPMessage class >> decode: aByteArray [
         | type |
@@ -512,6 +525,7 @@ SCCPMessage subclass: SCCPConnectionRequest [
     | src dst pnc |
 
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I hold the data of a connection request.'>
 
     SCCPConnectionRequest class >> msgType [
         <category: 'factory'>
@@ -607,6 +621,7 @@ SCCPMessage subclass: SCCPConnectionConfirm [
     | src dst pnc |
 
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I hold the data of a connection confirm.'>
 
     SCCPConnectionConfirm class >> msgType [
         <category: 'factory'>
@@ -657,6 +672,7 @@ SCCPMessage subclass: SCCPConnectionData [
     | dst data |
 
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I hold the data of a data memssage.'>
 
     SCCPConnectionData class >> msgType [
         <category: 'factory'>
@@ -728,6 +744,7 @@ SCCPMessage subclass: SCCPConnectionReleased [
     | src dst cause pnc |
 
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I hold the data of a connection release message.'>
 
     SCCPConnectionReleased class >> msgType [
         <category: 'factory'>
@@ -778,6 +795,7 @@ SCCPMessage subclass: SCCPConnectionReleaseComplete [
     | dst src |
 
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I hold the data of a released connection.'>
 
     SCCPConnectionReleaseComplete class >> msgType [
         ^ SCCPHelper msgRlc.
@@ -812,6 +830,7 @@ SCCPMessage subclass: SCCPUDT [
     | called calling data error udtClass |
 
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I hold the data of a connection less data message.'>
 
     SCCPUDT class >> msgType [
         ^ SCCPHelper msgUdt
@@ -913,6 +932,7 @@ SCCPMessage subclass: SCCPInactivityTest [
     | src dst proto seq credit |
 
     <category: 'OsmoNetwork-SCCP'>
+    <comment: 'I hold the data of an inactivity test.'>
 
     SCCPInactivityTest class >> msgType [
         <category: 'factory'>
diff --git a/isup/create_structs.st b/isup/create_structs.st
index 9dec307..28a7cea 100644
--- a/isup/create_structs.st
+++ b/isup/create_structs.st
@@ -191,6 +191,7 @@ Object subclass: StructCreator [
         type :=
 'MSGFixedField subclass: %1 [
     <category: ''OsmoNetwork-ISUP''>
+    <comment: ''I am an auto generated ISUP fixed field.''>
 
     %1 class >> parameterName [ ^ ''%2'' ]
     %1 class >> parameterValue [ ^ ISUPConstants par%3 ]
@@ -216,6 +217,7 @@ Object subclass: StructCreator [
         type :=
 'MSGVariableField subclass: %1 [
     <category: ''OsmoNetwork-ISUP''>
+    <comment: ''I am an auto generated ISUP variable.''>
 
     %1 class >> parameterName [ ^ ''%2'' ]
     %1 class >> parameterValue [ ^ ISUPConstants par%3 ]
@@ -233,6 +235,7 @@ Object subclass: StructCreator [
             struct add: '
 ISUPMessage subclass: ISUP%1 [
     <category: ''OsmoNetwork-ISUP''>
+    <comment: ''I am auto-generated ISUP message.''>
 
     ISUP%1 class >> structure [
         ^ (self initWith: ISUPConstants msg%1)' % {structName. }.
@@ -275,6 +278,7 @@ message type.'>
         self structs add: '
 ISUP%1 subclass: ISUP%2 [
     <category: ''OsmoNetwork-ISUP''>
+    <comment: ''I am an auto generated ISUP message.''>
 
     ISUP%2 class >> structure [
         ^ (super structure)
diff --git a/isup_generated.st b/isup_generated.st
index 8e32f49..27f599a 100644
--- a/isup_generated.st
+++ b/isup_generated.st
@@ -1,6 +1,7 @@
 "Types for ISUP"
 MSGFixedField subclass: ISUPEndOfOptionalParameters [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPEndOfOptionalParameters class >> parameterName [ ^ 'End of optional parameters' ]
     ISUPEndOfOptionalParameters class >> parameterValue [ ^ ISUPConstants parEndOfOptionalParameters ]
@@ -12,6 +13,7 @@ MSGFixedField subclass: ISUPEndOfOptionalParameters [
 
 MSGVariableField subclass: ISUPCorrelationId [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPCorrelationId class >> parameterName [ ^ 'Correlation id' ]
     ISUPCorrelationId class >> parameterValue [ ^ ISUPConstants parCorrelationId ]
@@ -22,6 +24,7 @@ MSGVariableField subclass: ISUPCorrelationId [
 
 MSGFixedField subclass: ISUPCallingPartysCategory [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPCallingPartysCategory class >> parameterName [ ^ 'Calling party''s category' ]
     ISUPCallingPartysCategory class >> parameterValue [ ^ ISUPConstants parCallingPartysCategory ]
@@ -31,6 +34,7 @@ MSGFixedField subclass: ISUPCallingPartysCategory [
 
 MSGFixedField subclass: ISUPPivotStatus [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPPivotStatus class >> parameterName [ ^ 'Pivot status' ]
     ISUPPivotStatus class >> parameterValue [ ^ ISUPConstants parPivotStatus ]
@@ -40,6 +44,7 @@ MSGFixedField subclass: ISUPPivotStatus [
 
 MSGFixedField subclass: ISUPCollectCallRequest [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPCollectCallRequest class >> parameterName [ ^ 'Collect call request' ]
     ISUPCollectCallRequest class >> parameterValue [ ^ ISUPConstants parCollectCallRequest ]
@@ -49,6 +54,7 @@ MSGFixedField subclass: ISUPCollectCallRequest [
 
 MSGVariableField subclass: ISUPSubsequentNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPSubsequentNumber class >> parameterName [ ^ 'Subsequent number' ]
     ISUPSubsequentNumber class >> parameterValue [ ^ ISUPConstants parSubsequentNumber ]
@@ -59,6 +65,7 @@ MSGVariableField subclass: ISUPSubsequentNumber [
 
 MSGFixedField subclass: ISUPNatureOfConnectionIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPNatureOfConnectionIndicators class >> parameterName [ ^ 'Nature of connection indicators' ]
     ISUPNatureOfConnectionIndicators class >> parameterValue [ ^ ISUPConstants parNatureOfConnectionIndicators ]
@@ -68,6 +75,7 @@ MSGFixedField subclass: ISUPNatureOfConnectionIndicators [
 
 MSGFixedField subclass: ISUPPropagationDelayCounter [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPPropagationDelayCounter class >> parameterName [ ^ 'Propagation delay counter' ]
     ISUPPropagationDelayCounter class >> parameterValue [ ^ ISUPConstants parPropagationDelayCounter ]
@@ -77,6 +85,7 @@ MSGFixedField subclass: ISUPPropagationDelayCounter [
 
 MSGFixedField subclass: ISUPRedirectCounter [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPRedirectCounter class >> parameterName [ ^ 'Redirect counter' ]
     ISUPRedirectCounter class >> parameterValue [ ^ ISUPConstants parRedirectCounter ]
@@ -86,6 +95,7 @@ MSGFixedField subclass: ISUPRedirectCounter [
 
 MSGFixedField subclass: ISUPForwardCallIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPForwardCallIndicators class >> parameterName [ ^ 'Forward call indicators' ]
     ISUPForwardCallIndicators class >> parameterValue [ ^ ISUPConstants parForwardCallIndicators ]
@@ -95,6 +105,7 @@ MSGFixedField subclass: ISUPForwardCallIndicators [
 
 MSGVariableField subclass: ISUPBackwardGVNS [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPBackwardGVNS class >> parameterName [ ^ 'Backward GVNS' ]
     ISUPBackwardGVNS class >> parameterValue [ ^ ISUPConstants parBackwardGVNS ]
@@ -105,6 +116,7 @@ MSGVariableField subclass: ISUPBackwardGVNS [
 
 MSGFixedField subclass: ISUPOptionalForwardCallIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPOptionalForwardCallIndicators class >> parameterName [ ^ 'Optional forward call indicators' ]
     ISUPOptionalForwardCallIndicators class >> parameterValue [ ^ ISUPConstants parOptionalForwardCallIndicators ]
@@ -114,6 +126,7 @@ MSGFixedField subclass: ISUPOptionalForwardCallIndicators [
 
 MSGVariableField subclass: ISUPUserServiceInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPUserServiceInformation class >> parameterName [ ^ 'User service information' ]
     ISUPUserServiceInformation class >> parameterValue [ ^ ISUPConstants parUserServiceInformation ]
@@ -124,6 +137,7 @@ MSGVariableField subclass: ISUPUserServiceInformation [
 
 MSGVariableField subclass: ISUPNetworkManagementControls [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPNetworkManagementControls class >> parameterName [ ^ 'Network management controls' ]
     ISUPNetworkManagementControls class >> parameterValue [ ^ ISUPConstants parNetworkManagementControls ]
@@ -134,6 +148,7 @@ MSGVariableField subclass: ISUPNetworkManagementControls [
 
 MSGVariableField subclass: ISUPCalledINNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPCalledINNumber class >> parameterName [ ^ 'Called IN number' ]
     ISUPCalledINNumber class >> parameterValue [ ^ ISUPConstants parCalledINNumber ]
@@ -144,6 +159,7 @@ MSGVariableField subclass: ISUPCalledINNumber [
 
 MSGVariableField subclass: ISUPCauseIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPCauseIndicators class >> parameterName [ ^ 'Cause indicators' ]
     ISUPCauseIndicators class >> parameterValue [ ^ ISUPConstants parCauseIndicators ]
@@ -154,6 +170,7 @@ MSGVariableField subclass: ISUPCauseIndicators [
 
 MSGFixedField subclass: ISUPQoRCapability [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPQoRCapability class >> parameterName [ ^ 'QoR capability' ]
     ISUPQoRCapability class >> parameterValue [ ^ ISUPConstants parQoRCapability ]
@@ -163,6 +180,7 @@ MSGFixedField subclass: ISUPQoRCapability [
 
 MSGFixedField subclass: ISUPCallTransferReference [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPCallTransferReference class >> parameterName [ ^ 'Call transfer reference' ]
     ISUPCallTransferReference class >> parameterValue [ ^ ISUPConstants parCallTransferReference ]
@@ -172,6 +190,7 @@ MSGFixedField subclass: ISUPCallTransferReference [
 
 MSGFixedField subclass: ISUPAutomaticCongestionLevel [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPAutomaticCongestionLevel class >> parameterName [ ^ 'Automatic congestion level' ]
     ISUPAutomaticCongestionLevel class >> parameterValue [ ^ ISUPConstants parAutomaticCongestionLevel ]
@@ -181,6 +200,7 @@ MSGFixedField subclass: ISUPAutomaticCongestionLevel [
 
 MSGVariableField subclass: ISUPRemoteOperations [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPRemoteOperations class >> parameterName [ ^ 'Remote operations' ]
     ISUPRemoteOperations class >> parameterValue [ ^ ISUPConstants parRemoteOperations ]
@@ -191,6 +211,7 @@ MSGVariableField subclass: ISUPRemoteOperations [
 
 MSGFixedField subclass: ISUPSuspendResumeIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPSuspendResumeIndicators class >> parameterName [ ^ 'Suspend/resume indicators' ]
     ISUPSuspendResumeIndicators class >> parameterValue [ ^ ISUPConstants parSuspendResumeIndicators ]
@@ -200,6 +221,7 @@ MSGFixedField subclass: ISUPSuspendResumeIndicators [
 
 MSGVariableField subclass: ISUPRedirectionInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPRedirectionInformation class >> parameterName [ ^ 'Redirection information' ]
     ISUPRedirectionInformation class >> parameterValue [ ^ ISUPConstants parRedirectionInformation ]
@@ -210,6 +232,7 @@ MSGVariableField subclass: ISUPRedirectionInformation [
 
 MSGVariableField subclass: ISUPConferenceTreatmentIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPConferenceTreatmentIndicators class >> parameterName [ ^ 'Conference treatment indicators' ]
     ISUPConferenceTreatmentIndicators class >> parameterValue [ ^ ISUPConstants parConferenceTreatmentIndicators ]
@@ -220,6 +243,7 @@ MSGVariableField subclass: ISUPConferenceTreatmentIndicators [
 
 MSGVariableField subclass: ISUPConnectionRequest [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPConnectionRequest class >> parameterName [ ^ 'Connection request' ]
     ISUPConnectionRequest class >> parameterValue [ ^ ISUPConstants parConnectionRequest ]
@@ -230,6 +254,7 @@ MSGVariableField subclass: ISUPConnectionRequest [
 
 MSGFixedField subclass: ISUPCallHistoryInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPCallHistoryInformation class >> parameterName [ ^ 'Call history information' ]
     ISUPCallHistoryInformation class >> parameterValue [ ^ ISUPConstants parCallHistoryInformation ]
@@ -239,6 +264,7 @@ MSGFixedField subclass: ISUPCallHistoryInformation [
 
 MSGVariableField subclass: ISUPCalledDirectoryNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPCalledDirectoryNumber class >> parameterName [ ^ 'Called directory number' ]
     ISUPCalledDirectoryNumber class >> parameterValue [ ^ ISUPConstants parCalledDirectoryNumber ]
@@ -249,6 +275,7 @@ MSGVariableField subclass: ISUPCalledDirectoryNumber [
 
 MSGFixedField subclass: ISUPRedirectCapability [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPRedirectCapability class >> parameterName [ ^ 'Redirect capability' ]
     ISUPRedirectCapability class >> parameterValue [ ^ ISUPConstants parRedirectCapability ]
@@ -258,6 +285,7 @@ MSGFixedField subclass: ISUPRedirectCapability [
 
 MSGVariableField subclass: ISUPRedirectBackwardInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPRedirectBackwardInformation class >> parameterName [ ^ 'Redirect backward information' ]
     ISUPRedirectBackwardInformation class >> parameterValue [ ^ ISUPConstants parRedirectBackwardInformation ]
@@ -268,6 +296,7 @@ MSGVariableField subclass: ISUPRedirectBackwardInformation [
 
 MSGVariableField subclass: ISUPGenericDigits [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPGenericDigits class >> parameterName [ ^ 'Generic digits' ]
     ISUPGenericDigits class >> parameterValue [ ^ ISUPConstants parGenericDigits ]
@@ -278,6 +307,7 @@ MSGVariableField subclass: ISUPGenericDigits [
 
 MSGVariableField subclass: ISUPOriginalCalledNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPOriginalCalledNumber class >> parameterName [ ^ 'Original called number' ]
     ISUPOriginalCalledNumber class >> parameterValue [ ^ ISUPConstants parOriginalCalledNumber ]
@@ -288,6 +318,7 @@ MSGVariableField subclass: ISUPOriginalCalledNumber [
 
 MSGVariableField subclass: ISUPRedirectionNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPRedirectionNumber class >> parameterName [ ^ 'Redirection number' ]
     ISUPRedirectionNumber class >> parameterValue [ ^ ISUPConstants parRedirectionNumber ]
@@ -298,6 +329,7 @@ MSGVariableField subclass: ISUPRedirectionNumber [
 
 MSGFixedField subclass: ISUPPivotRoutingIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPPivotRoutingIndicators class >> parameterName [ ^ 'Pivot routing indicators' ]
     ISUPPivotRoutingIndicators class >> parameterValue [ ^ ISUPConstants parPivotRoutingIndicators ]
@@ -307,6 +339,7 @@ MSGFixedField subclass: ISUPPivotRoutingIndicators [
 
 MSGVariableField subclass: ISUPCallingGeodeticLocation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPCallingGeodeticLocation class >> parameterName [ ^ 'Calling geodetic location' ]
     ISUPCallingGeodeticLocation class >> parameterValue [ ^ ISUPConstants parCallingGeodeticLocation ]
@@ -317,6 +350,7 @@ MSGVariableField subclass: ISUPCallingGeodeticLocation [
 
 MSGVariableField subclass: ISUPSCFId [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPSCFId class >> parameterName [ ^ 'SCF id' ]
     ISUPSCFId class >> parameterValue [ ^ ISUPConstants parSCFId ]
@@ -327,6 +361,7 @@ MSGVariableField subclass: ISUPSCFId [
 
 MSGFixedField subclass: ISUPPivotCounter [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPPivotCounter class >> parameterName [ ^ 'Pivot counter' ]
     ISUPPivotCounter class >> parameterValue [ ^ ISUPConstants parPivotCounter ]
@@ -336,6 +371,7 @@ MSGFixedField subclass: ISUPPivotCounter [
 
 MSGFixedField subclass: ISUPAccessDeliveryInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPAccessDeliveryInformation class >> parameterName [ ^ 'Access delivery information' ]
     ISUPAccessDeliveryInformation class >> parameterValue [ ^ ISUPConstants parAccessDeliveryInformation ]
@@ -345,6 +381,7 @@ MSGFixedField subclass: ISUPAccessDeliveryInformation [
 
 MSGVariableField subclass: ISUPCallingPartyNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPCallingPartyNumber class >> parameterName [ ^ 'Calling party number' ]
     ISUPCallingPartyNumber class >> parameterValue [ ^ ISUPConstants parCallingPartyNumber ]
@@ -355,6 +392,7 @@ MSGVariableField subclass: ISUPCallingPartyNumber [
 
 MSGFixedField subclass: ISUPSignallingPointCode [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPSignallingPointCode class >> parameterName [ ^ 'Signalling point code' ]
     ISUPSignallingPointCode class >> parameterValue [ ^ ISUPConstants parSignallingPointCode ]
@@ -364,6 +402,7 @@ MSGFixedField subclass: ISUPSignallingPointCode [
 
 MSGFixedField subclass: ISUPMLPPPrecedence [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPMLPPPrecedence class >> parameterName [ ^ 'MLPP precedence' ]
     ISUPMLPPPrecedence class >> parameterValue [ ^ ISUPConstants parMLPPPrecedence ]
@@ -373,6 +412,7 @@ MSGFixedField subclass: ISUPMLPPPrecedence [
 
 MSGVariableField subclass: ISUPForwardGVNS [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPForwardGVNS class >> parameterName [ ^ 'Forward GVNS' ]
     ISUPForwardGVNS class >> parameterValue [ ^ ISUPConstants parForwardGVNS ]
@@ -383,6 +423,7 @@ MSGVariableField subclass: ISUPForwardGVNS [
 
 MSGFixedField subclass: ISUPMessageType [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPMessageType class >> parameterName [ ^ 'Message type' ]
     ISUPMessageType class >> parameterValue [ ^ ISUPConstants parMessageType ]
@@ -392,6 +433,7 @@ MSGFixedField subclass: ISUPMessageType [
 
 MSGVariableField subclass: ISUPTransitNetworkSelection [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPTransitNetworkSelection class >> parameterName [ ^ 'Transit network selection' ]
     ISUPTransitNetworkSelection class >> parameterValue [ ^ ISUPConstants parTransitNetworkSelection ]
@@ -402,6 +444,7 @@ MSGVariableField subclass: ISUPTransitNetworkSelection [
 
 MSGVariableField subclass: ISUPDisplayInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPDisplayInformation class >> parameterName [ ^ 'Display information' ]
     ISUPDisplayInformation class >> parameterValue [ ^ ISUPConstants parDisplayInformation ]
@@ -412,6 +455,7 @@ MSGVariableField subclass: ISUPDisplayInformation [
 
 MSGFixedField subclass: ISUPCallReference [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPCallReference class >> parameterName [ ^ 'Call reference' ]
     ISUPCallReference class >> parameterValue [ ^ ISUPConstants parCallReference ]
@@ -421,6 +465,7 @@ MSGFixedField subclass: ISUPCallReference [
 
 MSGVariableField subclass: ISUPUserToUserInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPUserToUserInformation class >> parameterName [ ^ 'User-to-user information' ]
     ISUPUserToUserInformation class >> parameterValue [ ^ ISUPConstants parUserToUserInformation ]
@@ -431,6 +476,7 @@ MSGVariableField subclass: ISUPUserToUserInformation [
 
 MSGVariableField subclass: ISUPConnectedNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPConnectedNumber class >> parameterName [ ^ 'Connected number' ]
     ISUPConnectedNumber class >> parameterValue [ ^ ISUPConstants parConnectedNumber ]
@@ -441,6 +487,7 @@ MSGVariableField subclass: ISUPConnectedNumber [
 
 MSGFixedField subclass: ISUPTransmissionMediumUsed [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPTransmissionMediumUsed class >> parameterName [ ^ 'Transmission medium used' ]
     ISUPTransmissionMediumUsed class >> parameterValue [ ^ ISUPConstants parTransmissionMediumUsed ]
@@ -450,6 +497,7 @@ MSGFixedField subclass: ISUPTransmissionMediumUsed [
 
 MSGFixedField subclass: ISUPInformationRequestIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPInformationRequestIndicators class >> parameterName [ ^ 'Information request indicators' ]
     ISUPInformationRequestIndicators class >> parameterValue [ ^ ISUPConstants parInformationRequestIndicators ]
@@ -459,6 +507,7 @@ MSGFixedField subclass: ISUPInformationRequestIndicators [
 
 MSGVariableField subclass: ISUPApplicationTransportParameter [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPApplicationTransportParameter class >> parameterName [ ^ 'Application transport parameter' ]
     ISUPApplicationTransportParameter class >> parameterValue [ ^ ISUPConstants parApplicationTransportParameter ]
@@ -469,6 +518,7 @@ MSGVariableField subclass: ISUPApplicationTransportParameter [
 
 MSGVariableField subclass: ISUPCallDiversionTreatmentIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPCallDiversionTreatmentIndicators class >> parameterName [ ^ 'Call diversion treatment indicators' ]
     ISUPCallDiversionTreatmentIndicators class >> parameterValue [ ^ ISUPConstants parCallDiversionTreatmentIndicators ]
@@ -479,6 +529,7 @@ MSGVariableField subclass: ISUPCallDiversionTreatmentIndicators [
 
 MSGVariableField subclass: ISUPParameterCompatibilityInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPParameterCompatibilityInformation class >> parameterName [ ^ 'Parameter compatibility information' ]
     ISUPParameterCompatibilityInformation class >> parameterValue [ ^ ISUPConstants parParameterCompatibilityInformation ]
@@ -489,6 +540,7 @@ MSGVariableField subclass: ISUPParameterCompatibilityInformation [
 
 MSGVariableField subclass: ISUPNetworkRoutingNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPNetworkRoutingNumber class >> parameterName [ ^ 'Network routing number' ]
     ISUPNetworkRoutingNumber class >> parameterValue [ ^ ISUPConstants parNetworkRoutingNumber ]
@@ -499,6 +551,7 @@ MSGVariableField subclass: ISUPNetworkRoutingNumber [
 
 MSGVariableField subclass: ISUPAccessTransport [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPAccessTransport class >> parameterName [ ^ 'Access transport' ]
     ISUPAccessTransport class >> parameterValue [ ^ ISUPConstants parAccessTransport ]
@@ -509,6 +562,7 @@ MSGVariableField subclass: ISUPAccessTransport [
 
 MSGFixedField subclass: ISUPCircuitGroupSupervisionMessageType [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPCircuitGroupSupervisionMessageType class >> parameterName [ ^ 'Circuit group supervision message type' ]
     ISUPCircuitGroupSupervisionMessageType class >> parameterValue [ ^ ISUPConstants parCircuitGroupSupervisionMessageType ]
@@ -518,6 +572,7 @@ MSGFixedField subclass: ISUPCircuitGroupSupervisionMessageType [
 
 MSGVariableField subclass: ISUPUserTeleserviceInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPUserTeleserviceInformation class >> parameterName [ ^ 'User teleservice information' ]
     ISUPUserTeleserviceInformation class >> parameterValue [ ^ ISUPConstants parUserTeleserviceInformation ]
@@ -528,6 +583,7 @@ MSGVariableField subclass: ISUPUserTeleserviceInformation [
 
 MSGVariableField subclass: ISUPHTRInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPHTRInformation class >> parameterName [ ^ 'HTR information' ]
     ISUPHTRInformation class >> parameterValue [ ^ ISUPConstants parHTRInformation ]
@@ -538,6 +594,7 @@ MSGVariableField subclass: ISUPHTRInformation [
 
 MSGFixedField subclass: ISUPInformationIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPInformationIndicators class >> parameterName [ ^ 'Information indicators' ]
     ISUPInformationIndicators class >> parameterValue [ ^ ISUPConstants parInformationIndicators ]
@@ -547,6 +604,7 @@ MSGFixedField subclass: ISUPInformationIndicators [
 
 MSGFixedField subclass: ISUPCallDiversionInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPCallDiversionInformation class >> parameterName [ ^ 'Call diversion information' ]
     ISUPCallDiversionInformation class >> parameterValue [ ^ ISUPConstants parCallDiversionInformation ]
@@ -556,6 +614,7 @@ MSGFixedField subclass: ISUPCallDiversionInformation [
 
 MSGVariableField subclass: ISUPCircuitStateIndicator [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPCircuitStateIndicator class >> parameterName [ ^ 'Circuit state indicator' ]
     ISUPCircuitStateIndicator class >> parameterValue [ ^ ISUPConstants parCircuitStateIndicator ]
@@ -566,6 +625,7 @@ MSGVariableField subclass: ISUPCircuitStateIndicator [
 
 MSGFixedField subclass: ISUPLoopPreventionIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPLoopPreventionIndicators class >> parameterName [ ^ 'Loop prevention indicators' ]
     ISUPLoopPreventionIndicators class >> parameterValue [ ^ ISUPConstants parLoopPreventionIndicators ]
@@ -575,6 +635,7 @@ MSGFixedField subclass: ISUPLoopPreventionIndicators [
 
 MSGVariableField subclass: ISUPChargedPartyIdentification [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPChargedPartyIdentification class >> parameterName [ ^ 'Charged party identification' ]
     ISUPChargedPartyIdentification class >> parameterValue [ ^ ISUPConstants parChargedPartyIdentification ]
@@ -585,6 +646,7 @@ MSGVariableField subclass: ISUPChargedPartyIdentification [
 
 MSGVariableField subclass: ISUPLocationNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPLocationNumber class >> parameterName [ ^ 'Location number' ]
     ISUPLocationNumber class >> parameterValue [ ^ ISUPConstants parLocationNumber ]
@@ -595,6 +657,7 @@ MSGVariableField subclass: ISUPLocationNumber [
 
 MSGVariableField subclass: ISUPNumberPortabilityForwardInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPNumberPortabilityForwardInformation class >> parameterName [ ^ 'Number portability forward information' ]
     ISUPNumberPortabilityForwardInformation class >> parameterValue [ ^ ISUPConstants parNumberPortabilityForwardInformation ]
@@ -605,6 +668,7 @@ MSGVariableField subclass: ISUPNumberPortabilityForwardInformation [
 
 MSGFixedField subclass: ISUPTransmissionMediumRequirement [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPTransmissionMediumRequirement class >> parameterName [ ^ 'Transmission medium requirement' ]
     ISUPTransmissionMediumRequirement class >> parameterValue [ ^ ISUPConstants parTransmissionMediumRequirement ]
@@ -614,6 +678,7 @@ MSGFixedField subclass: ISUPTransmissionMediumRequirement [
 
 MSGFixedField subclass: ISUPEchoControlInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPEchoControlInformation class >> parameterName [ ^ 'Echo control information' ]
     ISUPEchoControlInformation class >> parameterValue [ ^ ISUPConstants parEchoControlInformation ]
@@ -623,6 +688,7 @@ MSGFixedField subclass: ISUPEchoControlInformation [
 
 MSGVariableField subclass: ISUPCalledPartyNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPCalledPartyNumber class >> parameterName [ ^ 'Called party number' ]
     ISUPCalledPartyNumber class >> parameterValue [ ^ ISUPConstants parCalledPartyNumber ]
@@ -633,6 +699,7 @@ MSGVariableField subclass: ISUPCalledPartyNumber [
 
 MSGFixedField subclass: ISUPRedirectionNumberRestriction [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPRedirectionNumberRestriction class >> parameterName [ ^ 'Redirection number restriction' ]
     ISUPRedirectionNumberRestriction class >> parameterValue [ ^ ISUPConstants parRedirectionNumberRestriction ]
@@ -642,6 +709,7 @@ MSGFixedField subclass: ISUPRedirectionNumberRestriction [
 
 MSGVariableField subclass: ISUPUIDActionIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPUIDActionIndicators class >> parameterName [ ^ 'UID action indicators' ]
     ISUPUIDActionIndicators class >> parameterValue [ ^ ISUPConstants parUIDActionIndicators ]
@@ -652,6 +720,7 @@ MSGVariableField subclass: ISUPUIDActionIndicators [
 
 MSGFixedField subclass: ISUPPivotCapability [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPPivotCapability class >> parameterName [ ^ 'Pivot capability' ]
     ISUPPivotCapability class >> parameterValue [ ^ ISUPConstants parPivotCapability ]
@@ -661,6 +730,7 @@ MSGFixedField subclass: ISUPPivotCapability [
 
 MSGFixedField subclass: ISUPRange [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPRange class >> parameterName [ ^ 'Range' ]
     ISUPRange class >> parameterValue [ ^ ISUPConstants parRange ]
@@ -670,6 +740,7 @@ MSGFixedField subclass: ISUPRange [
 
 MSGFixedField subclass: ISUPFacilityIndicator [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPFacilityIndicator class >> parameterName [ ^ 'Facility indicator' ]
     ISUPFacilityIndicator class >> parameterValue [ ^ ISUPConstants parFacilityIndicator ]
@@ -679,6 +750,7 @@ MSGFixedField subclass: ISUPFacilityIndicator [
 
 MSGVariableField subclass: ISUPPivotRoutingForwardInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPPivotRoutingForwardInformation class >> parameterName [ ^ 'Pivot routing forward information' ]
     ISUPPivotRoutingForwardInformation class >> parameterValue [ ^ ISUPConstants parPivotRoutingForwardInformation ]
@@ -689,6 +761,7 @@ MSGVariableField subclass: ISUPPivotRoutingForwardInformation [
 
 MSGFixedField subclass: ISUPCCNRPossibleIndicator [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPCCNRPossibleIndicator class >> parameterName [ ^ 'CCNR possible indicator' ]
     ISUPCCNRPossibleIndicator class >> parameterValue [ ^ ISUPConstants parCCNRPossibleIndicator ]
@@ -698,6 +771,7 @@ MSGFixedField subclass: ISUPCCNRPossibleIndicator [
 
 MSGFixedField subclass: ISUPOriginationISCPointCode [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPOriginationISCPointCode class >> parameterName [ ^ 'Origination ISC point code' ]
     ISUPOriginationISCPointCode class >> parameterValue [ ^ ISUPConstants parOriginationISCPointCode ]
@@ -707,6 +781,7 @@ MSGFixedField subclass: ISUPOriginationISCPointCode [
 
 MSGVariableField subclass: ISUPMessageCompatibilityInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPMessageCompatibilityInformation class >> parameterName [ ^ 'Message compatibility information' ]
     ISUPMessageCompatibilityInformation class >> parameterValue [ ^ ISUPConstants parMessageCompatibilityInformation ]
@@ -717,6 +792,7 @@ MSGVariableField subclass: ISUPMessageCompatibilityInformation [
 
 MSGVariableField subclass: ISUPRedirectForwardInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPRedirectForwardInformation class >> parameterName [ ^ 'Redirect forward information' ]
     ISUPRedirectForwardInformation class >> parameterValue [ ^ ISUPConstants parRedirectForwardInformation ]
@@ -727,6 +803,7 @@ MSGVariableField subclass: ISUPRedirectForwardInformation [
 
 MSGFixedField subclass: ISUPGenericNotificationIndicator [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPGenericNotificationIndicator class >> parameterName [ ^ 'Generic notification indicator' ]
     ISUPGenericNotificationIndicator class >> parameterValue [ ^ ISUPConstants parGenericNotificationIndicator ]
@@ -736,6 +813,7 @@ MSGFixedField subclass: ISUPGenericNotificationIndicator [
 
 MSGFixedField subclass: ISUPUserToUserIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPUserToUserIndicators class >> parameterName [ ^ 'User-to-user indicators' ]
     ISUPUserToUserIndicators class >> parameterValue [ ^ ISUPConstants parUserToUserIndicators ]
@@ -745,6 +823,7 @@ MSGFixedField subclass: ISUPUserToUserIndicators [
 
 MSGVariableField subclass: ISUPNetworkSpecificFacility [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPNetworkSpecificFacility class >> parameterName [ ^ 'Network specific facility' ]
     ISUPNetworkSpecificFacility class >> parameterValue [ ^ ISUPConstants parNetworkSpecificFacility ]
@@ -755,6 +834,7 @@ MSGVariableField subclass: ISUPNetworkSpecificFacility [
 
 MSGFixedField subclass: ISUPMCIDRequestIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPMCIDRequestIndicators class >> parameterName [ ^ 'MCID request indicators' ]
     ISUPMCIDRequestIndicators class >> parameterValue [ ^ ISUPConstants parMCIDRequestIndicators ]
@@ -764,6 +844,7 @@ MSGFixedField subclass: ISUPMCIDRequestIndicators [
 
 MSGFixedField subclass: ISUPTransmissionMediumRequirementPrime [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPTransmissionMediumRequirementPrime class >> parameterName [ ^ 'Transmission medium requirement prime' ]
     ISUPTransmissionMediumRequirementPrime class >> parameterValue [ ^ ISUPConstants parTransmissionMediumRequirementPrime ]
@@ -773,6 +854,7 @@ MSGFixedField subclass: ISUPTransmissionMediumRequirementPrime [
 
 MSGFixedField subclass: ISUPContinuityIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPContinuityIndicators class >> parameterName [ ^ 'Continuity indicators' ]
     ISUPContinuityIndicators class >> parameterValue [ ^ ISUPConstants parContinuityIndicators ]
@@ -782,6 +864,7 @@ MSGFixedField subclass: ISUPContinuityIndicators [
 
 MSGVariableField subclass: ISUPCCSS [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPCCSS class >> parameterName [ ^ 'CCSS' ]
     ISUPCCSS class >> parameterValue [ ^ ISUPConstants parCCSS ]
@@ -792,6 +875,7 @@ MSGVariableField subclass: ISUPCCSS [
 
 MSGVariableField subclass: ISUPUIDCapabilityIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPUIDCapabilityIndicators class >> parameterName [ ^ 'UID capability indicators' ]
     ISUPUIDCapabilityIndicators class >> parameterValue [ ^ ISUPConstants parUIDCapabilityIndicators ]
@@ -802,6 +886,7 @@ MSGVariableField subclass: ISUPUIDCapabilityIndicators [
 
 MSGVariableField subclass: ISUPUserServiceInformationPrime [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPUserServiceInformationPrime class >> parameterName [ ^ 'User service information prime' ]
     ISUPUserServiceInformationPrime class >> parameterValue [ ^ ISUPConstants parUserServiceInformationPrime ]
@@ -812,6 +897,7 @@ MSGVariableField subclass: ISUPUserServiceInformationPrime [
 
 MSGVariableField subclass: ISUPGenericReference [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPGenericReference class >> parameterName [ ^ 'Generic reference' ]
     ISUPGenericReference class >> parameterValue [ ^ ISUPConstants parGenericReference ]
@@ -822,6 +908,7 @@ MSGVariableField subclass: ISUPGenericReference [
 
 MSGFixedField subclass: ISUPHopCounter [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPHopCounter class >> parameterName [ ^ 'Hop counter' ]
     ISUPHopCounter class >> parameterValue [ ^ ISUPConstants parHopCounter ]
@@ -831,6 +918,7 @@ MSGFixedField subclass: ISUPHopCounter [
 
 MSGFixedField subclass: ISUPBackwardCallIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPBackwardCallIndicators class >> parameterName [ ^ 'Backward call indicators' ]
     ISUPBackwardCallIndicators class >> parameterValue [ ^ ISUPConstants parBackwardCallIndicators ]
@@ -840,6 +928,7 @@ MSGFixedField subclass: ISUPBackwardCallIndicators [
 
 MSGFixedField subclass: ISUPClosedUserGroupInterlockCode [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPClosedUserGroupInterlockCode class >> parameterName [ ^ 'Closed user group interlock code' ]
     ISUPClosedUserGroupInterlockCode class >> parameterValue [ ^ ISUPConstants parClosedUserGroupInterlockCode ]
@@ -849,6 +938,7 @@ MSGFixedField subclass: ISUPClosedUserGroupInterlockCode [
 
 MSGVariableField subclass: ISUPRangeAndStatus [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPRangeAndStatus class >> parameterName [ ^ 'Range and status' ]
     ISUPRangeAndStatus class >> parameterValue [ ^ ISUPConstants parRangeAndStatus ]
@@ -859,6 +949,7 @@ MSGVariableField subclass: ISUPRangeAndStatus [
 
 MSGFixedField subclass: ISUPRedirectStatus [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPRedirectStatus class >> parameterName [ ^ 'Redirect status' ]
     ISUPRedirectStatus class >> parameterValue [ ^ ISUPConstants parRedirectStatus ]
@@ -868,6 +959,7 @@ MSGFixedField subclass: ISUPRedirectStatus [
 
 MSGVariableField subclass: ISUPCallOfferingTreatmentIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPCallOfferingTreatmentIndicators class >> parameterName [ ^ 'Call offering treatment indicators' ]
     ISUPCallOfferingTreatmentIndicators class >> parameterValue [ ^ ISUPConstants parCallOfferingTreatmentIndicators ]
@@ -878,6 +970,7 @@ MSGVariableField subclass: ISUPCallOfferingTreatmentIndicators [
 
 MSGVariableField subclass: ISUPServiceActivation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPServiceActivation class >> parameterName [ ^ 'Service activation' ]
     ISUPServiceActivation class >> parameterValue [ ^ ISUPConstants parServiceActivation ]
@@ -888,6 +981,7 @@ MSGVariableField subclass: ISUPServiceActivation [
 
 MSGVariableField subclass: ISUPGenericNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPGenericNumber class >> parameterName [ ^ 'Generic number' ]
     ISUPGenericNumber class >> parameterValue [ ^ ISUPConstants parGenericNumber ]
@@ -898,6 +992,7 @@ MSGVariableField subclass: ISUPGenericNumber [
 
 MSGVariableField subclass: ISUPRedirectingNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPRedirectingNumber class >> parameterName [ ^ 'Redirecting number' ]
     ISUPRedirectingNumber class >> parameterValue [ ^ ISUPConstants parRedirectingNumber ]
@@ -908,6 +1003,7 @@ MSGVariableField subclass: ISUPRedirectingNumber [
 
 MSGFixedField subclass: ISUPOptionalBackwardCallIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPOptionalBackwardCallIndicators class >> parameterName [ ^ 'Optional backward call indicators' ]
     ISUPOptionalBackwardCallIndicators class >> parameterValue [ ^ ISUPConstants parOptionalBackwardCallIndicators ]
@@ -917,6 +1013,7 @@ MSGFixedField subclass: ISUPOptionalBackwardCallIndicators [
 
 MSGVariableField subclass: ISUPOriginalCalledINNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPOriginalCalledINNumber class >> parameterName [ ^ 'Original called IN number' ]
     ISUPOriginalCalledINNumber class >> parameterValue [ ^ ISUPConstants parOriginalCalledINNumber ]
@@ -927,6 +1024,7 @@ MSGVariableField subclass: ISUPOriginalCalledINNumber [
 
 MSGFixedField subclass: ISUPEventInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPEventInformation class >> parameterName [ ^ 'Event information' ]
     ISUPEventInformation class >> parameterValue [ ^ ISUPConstants parEventInformation ]
@@ -936,6 +1034,7 @@ MSGFixedField subclass: ISUPEventInformation [
 
 MSGVariableField subclass: ISUPPivotRoutingBackwardInformation [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPPivotRoutingBackwardInformation class >> parameterName [ ^ 'Pivot routing backward information' ]
     ISUPPivotRoutingBackwardInformation class >> parameterValue [ ^ ISUPConstants parPivotRoutingBackwardInformation ]
@@ -946,6 +1045,7 @@ MSGVariableField subclass: ISUPPivotRoutingBackwardInformation [
 
 MSGVariableField subclass: ISUPCircuitAssignmentMap [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPCircuitAssignmentMap class >> parameterName [ ^ 'Circuit assignment map' ]
     ISUPCircuitAssignmentMap class >> parameterValue [ ^ ISUPConstants parCircuitAssignmentMap ]
@@ -956,6 +1056,7 @@ MSGVariableField subclass: ISUPCircuitAssignmentMap [
 
 MSGFixedField subclass: ISUPMCIDResponseIndicators [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP fixed field.'>
 
     ISUPMCIDResponseIndicators class >> parameterName [ ^ 'MCID response indicators' ]
     ISUPMCIDResponseIndicators class >> parameterValue [ ^ ISUPConstants parMCIDResponseIndicators ]
@@ -965,6 +1066,7 @@ MSGFixedField subclass: ISUPMCIDResponseIndicators [
 
 MSGVariableField subclass: ISUPCallTransferNumber [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP variable.'>
 
     ISUPCallTransferNumber class >> parameterName [ ^ 'Call transfer number' ]
     ISUPCallTransferNumber class >> parameterValue [ ^ ISUPConstants parCallTransferNumber ]
@@ -976,6 +1078,7 @@ MSGVariableField subclass: ISUPCallTransferNumber [
 "MSGs for ISUP"
 ISUPMessage subclass: ISUPACM [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPACM class >> structure [
         ^ (self initWith: ISUPConstants msgACM)
@@ -1012,6 +1115,7 @@ ISUPMessage subclass: ISUPACM [
 
 ISUPMessage subclass: ISUPAMN [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPAMN class >> structure [
         ^ (self initWith: ISUPConstants msgAMN)
@@ -1048,6 +1152,7 @@ ISUPMessage subclass: ISUPAMN [
 
 ISUPMessage subclass: ISUPAPT [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPAPT class >> structure [
         ^ (self initWith: ISUPConstants msgAPT)
@@ -1062,6 +1167,7 @@ ISUPMessage subclass: ISUPAPT [
 
 ISUPMessage subclass: ISUPBLO [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPBLO class >> structure [
         ^ (self initWith: ISUPConstants msgBLO)
@@ -1072,6 +1178,7 @@ ISUPMessage subclass: ISUPBLO [
 
 ISUPMessage subclass: ISUPCFN [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPCFN class >> structure [
         ^ (self initWith: ISUPConstants msgCFN)
@@ -1084,6 +1191,7 @@ ISUPMessage subclass: ISUPCFN [
 
 ISUPMessage subclass: ISUPCGB [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPCGB class >> structure [
         ^ (self initWith: ISUPConstants msgCGB)
@@ -1096,6 +1204,7 @@ ISUPMessage subclass: ISUPCGB [
 
 ISUPMessage subclass: ISUPCON [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPCON class >> structure [
         ^ (self initWith: ISUPConstants msgCON)
@@ -1131,6 +1240,7 @@ ISUPMessage subclass: ISUPCON [
 
 ISUPMessage subclass: ISUPCOT [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPCOT class >> structure [
         ^ (self initWith: ISUPConstants msgCOT)
@@ -1142,6 +1252,7 @@ ISUPMessage subclass: ISUPCOT [
 
 ISUPMessage subclass: ISUPCPG [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPCPG class >> structure [
         ^ (self initWith: ISUPConstants msgCPG)
@@ -1183,6 +1294,7 @@ ISUPMessage subclass: ISUPCPG [
 
 ISUPMessage subclass: ISUPCQR [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPCQR class >> structure [
         ^ (self initWith: ISUPConstants msgCQR)
@@ -1195,6 +1307,7 @@ ISUPMessage subclass: ISUPCQR [
 
 ISUPMessage subclass: ISUPFAA [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPFAA class >> structure [
         ^ (self initWith: ISUPConstants msgFAA)
@@ -1211,6 +1324,7 @@ ISUPMessage subclass: ISUPFAA [
 
 ISUPMessage subclass: ISUPFAC [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPFAC class >> structure [
         ^ (self initWith: ISUPConstants msgFAC)
@@ -1235,6 +1349,7 @@ ISUPMessage subclass: ISUPFAC [
 
 ISUPMessage subclass: ISUPFOT [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPFOT class >> structure [
         ^ (self initWith: ISUPConstants msgFOT)
@@ -1247,6 +1362,7 @@ ISUPMessage subclass: ISUPFOT [
 
 ISUPMessage subclass: ISUPFRJ [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPFRJ class >> structure [
         ^ (self initWith: ISUPConstants msgFRJ)
@@ -1261,6 +1377,7 @@ ISUPMessage subclass: ISUPFRJ [
 
 ISUPMessage subclass: ISUPGRA [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPGRA class >> structure [
         ^ (self initWith: ISUPConstants msgGRA)
@@ -1272,6 +1389,7 @@ ISUPMessage subclass: ISUPGRA [
 
 ISUPMessage subclass: ISUPGRS [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPGRS class >> structure [
         ^ (self initWith: ISUPConstants msgGRS)
@@ -1283,6 +1401,7 @@ ISUPMessage subclass: ISUPGRS [
 
 ISUPMessage subclass: ISUPIAM [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPIAM class >> structure [
         ^ (self initWith: ISUPConstants msgIAM)
@@ -1355,6 +1474,7 @@ ISUPMessage subclass: ISUPIAM [
 
 ISUPMessage subclass: ISUPIDR [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPIDR class >> structure [
         ^ (self initWith: ISUPConstants msgIDR)
@@ -1369,6 +1489,7 @@ ISUPMessage subclass: ISUPIDR [
 
 ISUPMessage subclass: ISUPIDS [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPIDS class >> structure [
         ^ (self initWith: ISUPConstants msgIDS)
@@ -1387,6 +1508,7 @@ ISUPMessage subclass: ISUPIDS [
 
 ISUPMessage subclass: ISUPINF [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPINF class >> structure [
         ^ (self initWith: ISUPConstants msgINF)
@@ -1405,6 +1527,7 @@ ISUPMessage subclass: ISUPINF [
 
 ISUPMessage subclass: ISUPINR [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPINR class >> structure [
         ^ (self initWith: ISUPConstants msgINR)
@@ -1420,6 +1543,7 @@ ISUPMessage subclass: ISUPINR [
 
 ISUPMessage subclass: ISUPLPR [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPLPR class >> structure [
         ^ (self initWith: ISUPConstants msgLPR)
@@ -1435,6 +1559,7 @@ ISUPMessage subclass: ISUPLPR [
 
 ISUPMessage subclass: ISUPNRM [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPNRM class >> structure [
         ^ (self initWith: ISUPConstants msgNRM)
@@ -1449,6 +1574,7 @@ ISUPMessage subclass: ISUPNRM [
 
 ISUPMessage subclass: ISUPPRI [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPPRI class >> structure [
         ^ (self initWith: ISUPConstants msgPRI)
@@ -1465,6 +1591,7 @@ ISUPMessage subclass: ISUPPRI [
 
 ISUPMessage subclass: ISUPREL [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPREL class >> structure [
         ^ (self initWith: ISUPConstants msgREL)
@@ -1492,6 +1619,7 @@ ISUPMessage subclass: ISUPREL [
 
 ISUPMessage subclass: ISUPRES [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPRES class >> structure [
         ^ (self initWith: ISUPConstants msgRES)
@@ -1505,6 +1633,7 @@ ISUPMessage subclass: ISUPRES [
 
 ISUPMessage subclass: ISUPRLC [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPRLC class >> structure [
         ^ (self initWith: ISUPConstants msgRLC)
@@ -1517,6 +1646,7 @@ ISUPMessage subclass: ISUPRLC [
 
 ISUPMessage subclass: ISUPSAM [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPSAM class >> structure [
         ^ (self initWith: ISUPConstants msgSAM)
@@ -1529,6 +1659,7 @@ ISUPMessage subclass: ISUPSAM [
 
 ISUPMessage subclass: ISUPSAN [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPSAN class >> structure [
         ^ (self initWith: ISUPConstants msgSAN)
@@ -1542,6 +1673,7 @@ ISUPMessage subclass: ISUPSAN [
 
 ISUPMessage subclass: ISUPSEG [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPSEG class >> structure [
         ^ (self initWith: ISUPConstants msgSEG)
@@ -1559,6 +1691,7 @@ ISUPMessage subclass: ISUPSEG [
 
 ISUPMessage subclass: ISUPUPT [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPUPT class >> structure [
         ^ (self initWith: ISUPConstants msgUPT)
@@ -1571,6 +1704,7 @@ ISUPMessage subclass: ISUPUPT [
 
 ISUPMessage subclass: ISUPUSR [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am auto-generated ISUP message.'>
 
     ISUPUSR class >> structure [
         ^ (self initWith: ISUPConstants msgUSR)
@@ -1584,6 +1718,7 @@ ISUPMessage subclass: ISUPUSR [
 
 ISUPBLO subclass: ISUPBLA [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPBLA class >> structure [
         ^ (super structure)
@@ -1594,6 +1729,7 @@ ISUPBLO subclass: ISUPBLA [
 
 ISUPBLO subclass: ISUPCCR [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPCCR class >> structure [
         ^ (super structure)
@@ -1604,6 +1740,7 @@ ISUPBLO subclass: ISUPCCR [
 
 ISUPCGB subclass: ISUPCGBA [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPCGBA class >> structure [
         ^ (super structure)
@@ -1614,6 +1751,7 @@ ISUPCGB subclass: ISUPCGBA [
 
 ISUPCGB subclass: ISUPCGUA [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPCGUA class >> structure [
         ^ (super structure)
@@ -1624,6 +1762,7 @@ ISUPCGB subclass: ISUPCGUA [
 
 ISUPCGB subclass: ISUPCGU [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPCGU class >> structure [
         ^ (super structure)
@@ -1634,6 +1773,7 @@ ISUPCGB subclass: ISUPCGU [
 
 ISUPFAA subclass: ISUPFAR [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPFAR class >> structure [
         ^ (super structure)
@@ -1644,6 +1784,7 @@ ISUPFAA subclass: ISUPFAR [
 
 ISUPGRS subclass: ISUPGRA [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPGRA class >> structure [
         ^ (super structure)
@@ -1654,6 +1795,7 @@ ISUPGRS subclass: ISUPGRA [
 
 ISUPBLO subclass: ISUPLPA [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPLPA class >> structure [
         ^ (super structure)
@@ -1664,6 +1806,7 @@ ISUPBLO subclass: ISUPLPA [
 
 ISUPBLO subclass: ISUPOLM [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPOLM class >> structure [
         ^ (super structure)
@@ -1674,6 +1817,7 @@ ISUPBLO subclass: ISUPOLM [
 
 ISUPBLO subclass: ISUPRSC [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPRSC class >> structure [
         ^ (super structure)
@@ -1684,6 +1828,7 @@ ISUPBLO subclass: ISUPRSC [
 
 ISUPRES subclass: ISUPSUS [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPSUS class >> structure [
         ^ (super structure)
@@ -1694,6 +1839,7 @@ ISUPRES subclass: ISUPSUS [
 
 ISUPBLO subclass: ISUPUBA [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPUBA class >> structure [
         ^ (super structure)
@@ -1704,6 +1850,7 @@ ISUPBLO subclass: ISUPUBA [
 
 ISUPBLO subclass: ISUPUBL [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPUBL class >> structure [
         ^ (super structure)
@@ -1714,6 +1861,7 @@ ISUPBLO subclass: ISUPUBL [
 
 ISUPBLO subclass: ISUPUCIC [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPUCIC class >> structure [
         ^ (super structure)
@@ -1724,6 +1872,7 @@ ISUPBLO subclass: ISUPUCIC [
 
 ISUPUPT subclass: ISUPUPA [
     <category: 'OsmoNetwork-ISUP'>
+    <comment: 'I am an auto generated ISUP message.'>
 
     ISUPUPA class >> structure [
         ^ (super structure)