KICT/ECO2
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

..

Browse Source
This commit is contained in:
tindevil
2020-08-15 19:34:49 +09:00
parent 890d88bbfc
commit 2f394faf88
18 changed files with 17882 additions and 3173 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
ArinWarev1/Calculator/CShared.vb
View File

@@ -8,7 +8,8 @@ Public Class CShared
Return Nothing
Else
Try
Return CType(DSET1.tbl_weather.Select("code ='" & DSET1.tbl_Desc.Rows(0)("buildarea").ToString & "'")(0), DS.tbl_weatherRow)
Dim drArea As DS.tbl_DescRow = CType(DSET1.tbl_Desc.Rows(0), DS.tbl_DescRow)
Return CType(DSET1.tbl_weather.Select("code ='" & drArea.buildarea & "'")(0), DS.tbl_weatherRow)
Catch ex As Exception
MsgBox("건물개요의 지역정보를 찾을수없습니다.", MsgBoxStyle.Critical, "오류")
Return Nothing

6494
ArinWarev1/DataSet/DS.Designer.vb generated
View File

File diff suppressed because it is too large Load Diff

123
ArinWarev1/DataSet/DS.xsd
View File

@@ -1326,6 +1326,58 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</Mappings>
<Sources />
</TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="weather_groupTableAdapter" GeneratorDataComponentClassName="weather_groupTableAdapter" Name="weather_group" UserDataComponentName="weather_groupTableAdapter">
<MainSource>
<DbSource ConnectionRef="cs (MySettings)" DbObjectName="eco2.dbo.weather_group" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<DeleteCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>DELETE FROM [weather_group] WHERE (([code] = @Original_code) AND ((@IsNull_name = 1 AND [name] IS NULL) OR ([name] = @Original_name)))</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_code" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="code" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_name" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="name" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_name" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="name" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</DeleteCommand>
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO [weather_group] ([code], [name]) VALUES (@code, @name);
SELECT code, name FROM weather_group WHERE (code = @code) ORDER BY code</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@code" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="code" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@name" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="name" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT code, name
FROM weather_group
ORDER BY code</CommandText>
<Parameters />
</DbCommand>
</SelectCommand>
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>UPDATE [weather_group] SET [code] = @code, [name] = @name WHERE (([code] = @Original_code) AND ((@IsNull_name = 1 AND [name] IS NULL) OR ([name] = @Original_name)));
SELECT code, name FROM weather_group WHERE (code = @code) ORDER BY code</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@code" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="code" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@name" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="name" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_code" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="code" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_name" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="name" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_name" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="name" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</UpdateCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="code" DataSetColumn="code" />
<Mapping SourceColumn="name" DataSetColumn="name" />
</Mappings>
<Sources />
</TableAdapter>
</Tables>
<Sources />
</DataSource>
@@ -1334,7 +1386,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
<xs:element name="DS" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="DS" msprop:Generator_UserDSName="DS">
<xs:complexType>
<xs:choice minOccurs="0" maxOccurs="unbounded">
<xs:element name="tbl_pic" msprop:Generator_TableClassName="tbl_picDataTable" msprop:Generator_TableVarName="tabletbl_pic" msprop:Generator_TablePropName="tbl_pic" msprop:Generator_RowDeletingName="tbl_picRowDeleting" msprop:Generator_RowChangingName="tbl_picRowChanging" msprop:Generator_RowEvHandlerName="tbl_picRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_picRowDeleted" msprop:Generator_UserTableName="tbl_pic" msprop:Generator_RowChangedName="tbl_picRowChanged" msprop:Generator_RowEvArgName="tbl_picRowChangeEvent" msprop:Generator_RowClassName="tbl_picRow">
<xs:element name="tbl_pic" msprop:Generator_TableClassName="tbl_picDataTable" msprop:Generator_TableVarName="tabletbl_pic" msprop:Generator_RowChangedName="tbl_picRowChanged" msprop:Generator_TablePropName="tbl_pic" msprop:Generator_RowDeletingName="tbl_picRowDeleting" msprop:Generator_RowChangingName="tbl_picRowChanging" msprop:Generator_RowEvHandlerName="tbl_picRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_picRowDeleted" msprop:Generator_RowClassName="tbl_picRow" msprop:Generator_UserTableName="tbl_pic" msprop:Generator_RowEvArgName="tbl_picRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code" type="xs:string" minOccurs="0" />
@@ -1342,7 +1394,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_nanbangkiki" msprop:Generator_TableClassName="tbl_nanbangkikiDataTable" msprop:Generator_TableVarName="tabletbl_nanbangkiki" msprop:Generator_TablePropName="tbl_nanbangkiki" msprop:Generator_RowDeletingName="tbl_nanbangkikiRowDeleting" msprop:Generator_RowChangingName="tbl_nanbangkikiRowChanging" msprop:Generator_RowEvHandlerName="tbl_nanbangkikiRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_nanbangkikiRowDeleted" msprop:Generator_UserTableName="tbl_nanbangkiki" msprop:Generator_RowChangedName="tbl_nanbangkikiRowChanged" msprop:Generator_RowEvArgName="tbl_nanbangkikiRowChangeEvent" msprop:Generator_RowClassName="tbl_nanbangkikiRow">
<xs:element name="tbl_nanbangkiki" msprop:Generator_TableClassName="tbl_nanbangkikiDataTable" msprop:Generator_TableVarName="tabletbl_nanbangkiki" msprop:Generator_RowChangedName="tbl_nanbangkikiRowChanged" msprop:Generator_TablePropName="tbl_nanbangkiki" msprop:Generator_RowDeletingName="tbl_nanbangkikiRowDeleting" msprop:Generator_RowChangingName="tbl_nanbangkikiRowChanging" msprop:Generator_RowEvHandlerName="tbl_nanbangkikiRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_nanbangkikiRowDeleted" msprop:Generator_RowClassName="tbl_nanbangkikiRow" msprop:Generator_UserTableName="tbl_nanbangkiki" msprop:Generator_RowEvArgName="tbl_nanbangkikiRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code">
@@ -1424,7 +1476,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_nangbangkiki" msprop:Generator_TableClassName="tbl_nangbangkikiDataTable" msprop:Generator_TableVarName="tabletbl_nangbangkiki" msprop:Generator_TablePropName="tbl_nangbangkiki" msprop:Generator_RowDeletingName="tbl_nangbangkikiRowDeleting" msprop:Generator_RowChangingName="tbl_nangbangkikiRowChanging" msprop:Generator_RowEvHandlerName="tbl_nangbangkikiRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_nangbangkikiRowDeleted" msprop:Generator_UserTableName="tbl_nangbangkiki" msprop:Generator_RowChangedName="tbl_nangbangkikiRowChanged" msprop:Generator_RowEvArgName="tbl_nangbangkikiRowChangeEvent" msprop:Generator_RowClassName="tbl_nangbangkikiRow">
<xs:element name="tbl_nangbangkiki" msprop:Generator_TableClassName="tbl_nangbangkikiDataTable" msprop:Generator_TableVarName="tabletbl_nangbangkiki" msprop:Generator_RowChangedName="tbl_nangbangkikiRowChanged" msprop:Generator_TablePropName="tbl_nangbangkiki" msprop:Generator_RowDeletingName="tbl_nangbangkikiRowDeleting" msprop:Generator_RowChangingName="tbl_nangbangkikiRowChanging" msprop:Generator_RowEvHandlerName="tbl_nangbangkikiRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_nangbangkikiRowDeleted" msprop:Generator_RowClassName="tbl_nangbangkikiRow" msprop:Generator_UserTableName="tbl_nangbangkiki" msprop:Generator_RowEvArgName="tbl_nangbangkikiRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code">
@@ -1487,7 +1539,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_bunbae" msprop:Generator_TableClassName="tbl_bunbaeDataTable" msprop:Generator_TableVarName="tabletbl_bunbae" msprop:Generator_TablePropName="tbl_bunbae" msprop:Generator_RowDeletingName="tbl_bunbaeRowDeleting" msprop:Generator_RowChangingName="tbl_bunbaeRowChanging" msprop:Generator_RowEvHandlerName="tbl_bunbaeRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_bunbaeRowDeleted" msprop:Generator_UserTableName="tbl_bunbae" msprop:Generator_RowChangedName="tbl_bunbaeRowChanged" msprop:Generator_RowEvArgName="tbl_bunbaeRowChangeEvent" msprop:Generator_RowClassName="tbl_bunbaeRow">
<xs:element name="tbl_bunbae" msprop:Generator_TableClassName="tbl_bunbaeDataTable" msprop:Generator_TableVarName="tabletbl_bunbae" msprop:Generator_RowChangedName="tbl_bunbaeRowChanged" msprop:Generator_TablePropName="tbl_bunbae" msprop:Generator_RowDeletingName="tbl_bunbaeRowDeleting" msprop:Generator_RowChangingName="tbl_bunbaeRowChanging" msprop:Generator_RowEvHandlerName="tbl_bunbaeRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_bunbaeRowDeleted" msprop:Generator_RowClassName="tbl_bunbaeRow" msprop:Generator_UserTableName="tbl_bunbae" msprop:Generator_RowEvArgName="tbl_bunbaeRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code">
@@ -1532,7 +1584,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_new" msprop:Generator_TableClassName="tbl_newDataTable" msprop:Generator_TableVarName="tabletbl_new" msprop:Generator_TablePropName="tbl_new" msprop:Generator_RowDeletingName="tbl_newRowDeleting" msprop:Generator_RowChangingName="tbl_newRowChanging" msprop:Generator_RowEvHandlerName="tbl_newRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_newRowDeleted" msprop:Generator_UserTableName="tbl_new" msprop:Generator_RowChangedName="tbl_newRowChanged" msprop:Generator_RowEvArgName="tbl_newRowChangeEvent" msprop:Generator_RowClassName="tbl_newRow">
<xs:element name="tbl_new" msprop:Generator_TableClassName="tbl_newDataTable" msprop:Generator_TableVarName="tabletbl_new" msprop:Generator_RowChangedName="tbl_newRowChanged" msprop:Generator_TablePropName="tbl_new" msprop:Generator_RowDeletingName="tbl_newRowDeleting" msprop:Generator_RowChangingName="tbl_newRowChanging" msprop:Generator_RowEvHandlerName="tbl_newRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_newRowDeleted" msprop:Generator_RowClassName="tbl_newRow" msprop:Generator_UserTableName="tbl_new" msprop:Generator_RowEvArgName="tbl_newRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code">
@@ -1586,7 +1638,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_myoun" msprop:Generator_TableClassName="tbl_myounDataTable" msprop:Generator_TableVarName="tabletbl_myoun" msprop:Generator_TablePropName="tbl_myoun" msprop:Generator_RowDeletingName="tbl_myounRowDeleting" msprop:Generator_RowChangingName="tbl_myounRowChanging" msprop:Generator_RowEvHandlerName="tbl_myounRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_myounRowDeleted" msprop:Generator_UserTableName="tbl_myoun" msprop:Generator_RowChangedName="tbl_myounRowChanged" msprop:Generator_RowEvArgName="tbl_myounRowChangeEvent" msprop:Generator_RowClassName="tbl_myounRow">
<xs:element name="tbl_myoun" msprop:Generator_TableClassName="tbl_myounDataTable" msprop:Generator_TableVarName="tabletbl_myoun" msprop:Generator_RowChangedName="tbl_myounRowChanged" msprop:Generator_TablePropName="tbl_myoun" msprop:Generator_RowDeletingName="tbl_myounRowDeleting" msprop:Generator_RowChangingName="tbl_myounRowChanging" msprop:Generator_RowEvHandlerName="tbl_myounRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_myounRowDeleted" msprop:Generator_RowClassName="tbl_myounRow" msprop:Generator_UserTableName="tbl_myoun" msprop:Generator_RowEvArgName="tbl_myounRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code" default="">
@@ -1629,7 +1681,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_buha" msprop:Generator_TableClassName="tbl_buhaDataTable" msprop:Generator_TableVarName="tabletbl_buha" msprop:Generator_TablePropName="tbl_buha" msprop:Generator_RowDeletingName="tbl_buhaRowDeleting" msprop:Generator_RowChangingName="tbl_buhaRowChanging" msprop:Generator_RowEvHandlerName="tbl_buhaRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_buhaRowDeleted" msprop:Generator_UserTableName="tbl_buha" msprop:Generator_RowChangedName="tbl_buhaRowChanged" msprop:Generator_RowEvArgName="tbl_buhaRowChangeEvent" msprop:Generator_RowClassName="tbl_buhaRow">
<xs:element name="tbl_buha" msprop:Generator_TableClassName="tbl_buhaDataTable" msprop:Generator_TableVarName="tabletbl_buha" msprop:Generator_RowChangedName="tbl_buhaRowChanged" msprop:Generator_TablePropName="tbl_buha" msprop:Generator_RowDeletingName="tbl_buhaRowDeleting" msprop:Generator_RowChangingName="tbl_buhaRowChanging" msprop:Generator_RowEvHandlerName="tbl_buhaRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_buhaRowDeleted" msprop:Generator_RowClassName="tbl_buhaRow" msprop:Generator_UserTableName="tbl_buha" msprop:Generator_RowEvArgName="tbl_buhaRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code" type="xs:string" default="" />
@@ -1647,7 +1699,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_nbunbae" msprop:Generator_TableClassName="tbl_nbunbaeDataTable" msprop:Generator_TableVarName="tabletbl_nbunbae" msprop:Generator_TablePropName="tbl_nbunbae" msprop:Generator_RowDeletingName="tbl_nbunbaeRowDeleting" msprop:Generator_RowChangingName="tbl_nbunbaeRowChanging" msprop:Generator_RowEvHandlerName="tbl_nbunbaeRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_nbunbaeRowDeleted" msprop:Generator_UserTableName="tbl_nbunbae" msprop:Generator_RowChangedName="tbl_nbunbaeRowChanged" msprop:Generator_RowEvArgName="tbl_nbunbaeRowChangeEvent" msprop:Generator_RowClassName="tbl_nbunbaeRow">
<xs:element name="tbl_nbunbae" msprop:Generator_TableClassName="tbl_nbunbaeDataTable" msprop:Generator_TableVarName="tabletbl_nbunbae" msprop:Generator_RowChangedName="tbl_nbunbaeRowChanged" msprop:Generator_TablePropName="tbl_nbunbae" msprop:Generator_RowDeletingName="tbl_nbunbaeRowDeleting" msprop:Generator_RowChangingName="tbl_nbunbaeRowChanging" msprop:Generator_RowEvHandlerName="tbl_nbunbaeRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_nbunbaeRowDeleted" msprop:Generator_RowClassName="tbl_nbunbaeRow" msprop:Generator_UserTableName="tbl_nbunbae" msprop:Generator_RowEvArgName="tbl_nbunbaeRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code" type="xs:string" default="" />
@@ -1667,7 +1719,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="weather_cha" msprop:Generator_TableClassName="weather_chaDataTable" msprop:Generator_TableVarName="tableweather_cha" msprop:Generator_TablePropName="weather_cha" msprop:Generator_RowDeletingName="weather_chaRowDeleting" msprop:Generator_RowChangingName="weather_chaRowChanging" msprop:Generator_RowEvHandlerName="weather_chaRowChangeEventHandler" msprop:Generator_RowDeletedName="weather_chaRowDeleted" msprop:Generator_UserTableName="weather_cha" msprop:Generator_RowChangedName="weather_chaRowChanged" msprop:Generator_RowEvArgName="weather_chaRowChangeEvent" msprop:Generator_RowClassName="weather_chaRow">
<xs:element name="weather_cha" msprop:Generator_TableClassName="weather_chaDataTable" msprop:Generator_TableVarName="tableweather_cha" msprop:Generator_RowChangedName="weather_chaRowChanged" msprop:Generator_TablePropName="weather_cha" msprop:Generator_RowDeletingName="weather_chaRowDeleting" msprop:Generator_RowChangingName="weather_chaRowChanging" msprop:Generator_RowEvHandlerName="weather_chaRowChangeEventHandler" msprop:Generator_RowDeletedName="weather_chaRowDeleted" msprop:Generator_RowClassName="weather_chaRow" msprop:Generator_UserTableName="weather_cha" msprop:Generator_RowEvArgName="weather_chaRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="pcode" msprop:nullValue="" msprop:Generator_ColumnPropNameInRow="pcode" msprop:Generator_ColumnVarNameInTable="columnpcode" msprop:Generator_ColumnPropNameInTable="pcodeColumn" msprop:Generator_UserColumnName="pcode" default="">
@@ -1778,7 +1830,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="weather_temp" msprop:Generator_TableClassName="weather_tempDataTable" msprop:Generator_TableVarName="tableweather_temp" msprop:Generator_TablePropName="weather_temp" msprop:Generator_RowDeletingName="weather_tempRowDeleting" msprop:Generator_RowChangingName="weather_tempRowChanging" msprop:Generator_RowEvHandlerName="weather_tempRowChangeEventHandler" msprop:Generator_RowDeletedName="weather_tempRowDeleted" msprop:Generator_UserTableName="weather_temp" msprop:Generator_RowChangedName="weather_tempRowChanged" msprop:Generator_RowEvArgName="weather_tempRowChangeEvent" msprop:Generator_RowClassName="weather_tempRow">
<xs:element name="weather_temp" msprop:Generator_TableClassName="weather_tempDataTable" msprop:Generator_TableVarName="tableweather_temp" msprop:Generator_RowChangedName="weather_tempRowChanged" msprop:Generator_TablePropName="weather_temp" msprop:Generator_RowDeletingName="weather_tempRowDeleting" msprop:Generator_RowChangingName="weather_tempRowChanging" msprop:Generator_RowEvHandlerName="weather_tempRowChangeEventHandler" msprop:Generator_RowDeletedName="weather_tempRowDeleted" msprop:Generator_RowClassName="weather_tempRow" msprop:Generator_UserTableName="weather_temp" msprop:Generator_RowEvArgName="weather_tempRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="pcode" msprop:nullValue="" msprop:Generator_ColumnPropNameInRow="pcode" msprop:Generator_ColumnVarNameInTable="columnpcode" msprop:Generator_ColumnPropNameInTable="pcodeColumn" msprop:Generator_UserColumnName="pcode" default="">
@@ -1973,7 +2025,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_kongjo" msprop:Generator_TableClassName="tbl_kongjoDataTable" msprop:Generator_TableVarName="tabletbl_kongjo" msprop:Generator_TablePropName="tbl_kongjo" msprop:Generator_RowDeletingName="tbl_kongjoRowDeleting" msprop:Generator_RowChangingName="tbl_kongjoRowChanging" msprop:Generator_RowEvHandlerName="tbl_kongjoRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_kongjoRowDeleted" msprop:Generator_UserTableName="tbl_kongjo" msprop:Generator_RowChangedName="tbl_kongjoRowChanged" msprop:Generator_RowEvArgName="tbl_kongjoRowChangeEvent" msprop:Generator_RowClassName="tbl_kongjoRow">
<xs:element name="tbl_kongjo" msprop:Generator_TableClassName="tbl_kongjoDataTable" msprop:Generator_TableVarName="tabletbl_kongjo" msprop:Generator_RowChangedName="tbl_kongjoRowChanged" msprop:Generator_TablePropName="tbl_kongjo" msprop:Generator_RowDeletingName="tbl_kongjoRowDeleting" msprop:Generator_RowChangingName="tbl_kongjoRowChanging" msprop:Generator_RowEvHandlerName="tbl_kongjoRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_kongjoRowDeleted" msprop:Generator_RowClassName="tbl_kongjoRow" msprop:Generator_UserTableName="tbl_kongjo" msprop:Generator_RowEvArgName="tbl_kongjoRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code">
@@ -2036,7 +2088,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_kongkub" msprop:Generator_TableClassName="tbl_kongkubDataTable" msprop:Generator_TableVarName="tabletbl_kongkub" msprop:Generator_TablePropName="tbl_kongkub" msprop:Generator_RowDeletingName="tbl_kongkubRowDeleting" msprop:Generator_RowChangingName="tbl_kongkubRowChanging" msprop:Generator_RowEvHandlerName="tbl_kongkubRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_kongkubRowDeleted" msprop:Generator_UserTableName="tbl_kongkub" msprop:Generator_RowChangedName="tbl_kongkubRowChanged" msprop:Generator_RowEvArgName="tbl_kongkubRowChangeEvent" msprop:Generator_RowClassName="tbl_kongkubRow">
<xs:element name="tbl_kongkub" msprop:Generator_TableClassName="tbl_kongkubDataTable" msprop:Generator_TableVarName="tabletbl_kongkub" msprop:Generator_RowChangedName="tbl_kongkubRowChanged" msprop:Generator_TablePropName="tbl_kongkub" msprop:Generator_RowDeletingName="tbl_kongkubRowDeleting" msprop:Generator_RowChangingName="tbl_kongkubRowChanging" msprop:Generator_RowEvHandlerName="tbl_kongkubRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_kongkubRowDeleted" msprop:Generator_RowClassName="tbl_kongkubRow" msprop:Generator_UserTableName="tbl_kongkub" msprop:Generator_RowEvArgName="tbl_kongkubRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code">
@@ -2093,7 +2145,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_yk" msprop:Generator_TableClassName="tbl_ykDataTable" msprop:Generator_TableVarName="tabletbl_yk" msprop:Generator_TablePropName="tbl_yk" msprop:Generator_RowDeletingName="tbl_ykRowDeleting" msprop:Generator_RowChangingName="tbl_ykRowChanging" msprop:Generator_RowEvHandlerName="tbl_ykRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_ykRowDeleted" msprop:Generator_UserTableName="tbl_yk" msprop:Generator_RowChangedName="tbl_ykRowChanged" msprop:Generator_RowEvArgName="tbl_ykRowChangeEvent" msprop:Generator_RowClassName="tbl_ykRow">
<xs:element name="tbl_yk" msprop:Generator_TableClassName="tbl_ykDataTable" msprop:Generator_TableVarName="tabletbl_yk" msprop:Generator_RowChangedName="tbl_ykRowChanged" msprop:Generator_TablePropName="tbl_yk" msprop:Generator_RowDeletingName="tbl_ykRowDeleting" msprop:Generator_RowChangingName="tbl_ykRowChanging" msprop:Generator_RowEvHandlerName="tbl_ykRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_ykRowDeleted" msprop:Generator_RowClassName="tbl_ykRow" msprop:Generator_UserTableName="tbl_yk" msprop:Generator_RowEvArgName="tbl_ykRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code">
@@ -2116,7 +2168,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_ykdetail" msprop:Generator_TableClassName="tbl_ykdetailDataTable" msprop:Generator_TableVarName="tabletbl_ykdetail" msprop:Generator_TablePropName="tbl_ykdetail" msprop:Generator_RowDeletingName="tbl_ykdetailRowDeleting" msprop:Generator_RowChangingName="tbl_ykdetailRowChanging" msprop:Generator_RowEvHandlerName="tbl_ykdetailRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_ykdetailRowDeleted" msprop:Generator_UserTableName="tbl_ykdetail" msprop:Generator_RowChangedName="tbl_ykdetailRowChanged" msprop:Generator_RowEvArgName="tbl_ykdetailRowChangeEvent" msprop:Generator_RowClassName="tbl_ykdetailRow">
<xs:element name="tbl_ykdetail" msprop:Generator_TableClassName="tbl_ykdetailDataTable" msprop:Generator_TableVarName="tabletbl_ykdetail" msprop:Generator_RowChangedName="tbl_ykdetailRowChanged" msprop:Generator_TablePropName="tbl_ykdetail" msprop:Generator_RowDeletingName="tbl_ykdetailRowDeleting" msprop:Generator_RowChangingName="tbl_ykdetailRowChanging" msprop:Generator_RowEvHandlerName="tbl_ykdetailRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_ykdetailRowDeleted" msprop:Generator_RowClassName="tbl_ykdetailRow" msprop:Generator_UserTableName="tbl_ykdetail" msprop:Generator_RowEvArgName="tbl_ykdetailRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="pcode" msprop:nullValue="" msprop:Generator_ColumnPropNameInRow="pcode" msprop:Generator_ColumnVarNameInTable="columnpcode" msprop:Generator_ColumnPropNameInTable="pcodeColumn" msprop:Generator_UserColumnName="pcode" default="">
@@ -2150,7 +2202,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_weather" msprop:Generator_TableClassName="tbl_weatherDataTable" msprop:Generator_TableVarName="tabletbl_weather" msprop:Generator_TablePropName="tbl_weather" msprop:Generator_RowDeletingName="tbl_weatherRowDeleting" msprop:Generator_RowChangingName="tbl_weatherRowChanging" msprop:Generator_RowEvHandlerName="tbl_weatherRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_weatherRowDeleted" msprop:Generator_UserTableName="tbl_weather" msprop:Generator_RowChangedName="tbl_weatherRowChanged" msprop:Generator_RowEvArgName="tbl_weatherRowChangeEvent" msprop:Generator_RowClassName="tbl_weatherRow">
<xs:element name="tbl_weather" msprop:Generator_TableClassName="tbl_weatherDataTable" msprop:Generator_TableVarName="tabletbl_weather" msprop:Generator_RowChangedName="tbl_weatherRowChanged" msprop:Generator_TablePropName="tbl_weather" msprop:Generator_RowDeletingName="tbl_weatherRowDeleting" msprop:Generator_RowChangingName="tbl_weatherRowChanging" msprop:Generator_RowEvHandlerName="tbl_weatherRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_weatherRowDeleted" msprop:Generator_RowClassName="tbl_weatherRow" msprop:Generator_UserTableName="tbl_weather" msprop:Generator_RowEvArgName="tbl_weatherRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:nullValue="" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code" default="">
@@ -2268,7 +2320,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="weather_ilsa" msprop:Generator_TableClassName="weather_ilsaDataTable" msprop:Generator_TableVarName="tableweather_ilsa" msprop:Generator_TablePropName="weather_ilsa" msprop:Generator_RowDeletingName="weather_ilsaRowDeleting" msprop:Generator_RowChangingName="weather_ilsaRowChanging" msprop:Generator_RowEvHandlerName="weather_ilsaRowChangeEventHandler" msprop:Generator_RowDeletedName="weather_ilsaRowDeleted" msprop:Generator_UserTableName="weather_ilsa" msprop:Generator_RowChangedName="weather_ilsaRowChanged" msprop:Generator_RowEvArgName="weather_ilsaRowChangeEvent" msprop:Generator_RowClassName="weather_ilsaRow">
<xs:element name="weather_ilsa" msprop:Generator_TableClassName="weather_ilsaDataTable" msprop:Generator_TableVarName="tableweather_ilsa" msprop:Generator_RowChangedName="weather_ilsaRowChanged" msprop:Generator_TablePropName="weather_ilsa" msprop:Generator_RowDeletingName="weather_ilsaRowDeleting" msprop:Generator_RowChangingName="weather_ilsaRowChanging" msprop:Generator_RowEvHandlerName="weather_ilsaRowChangeEventHandler" msprop:Generator_RowDeletedName="weather_ilsaRowDeleted" msprop:Generator_RowClassName="weather_ilsaRow" msprop:Generator_UserTableName="weather_ilsa" msprop:Generator_RowEvArgName="weather_ilsaRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="pcode" msprop:nullValue="" msprop:Generator_ColumnPropNameInRow="pcode" msprop:Generator_ColumnVarNameInTable="columnpcode" msprop:Generator_ColumnPropNameInTable="pcodeColumn" msprop:Generator_UserColumnName="pcode" default="">
@@ -2386,7 +2438,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="weather_supdo" msprop:Generator_TableClassName="weather_supdoDataTable" msprop:Generator_TableVarName="tableweather_supdo" msprop:Generator_TablePropName="weather_supdo" msprop:Generator_RowDeletingName="weather_supdoRowDeleting" msprop:Generator_RowChangingName="weather_supdoRowChanging" msprop:Generator_RowEvHandlerName="weather_supdoRowChangeEventHandler" msprop:Generator_RowDeletedName="weather_supdoRowDeleted" msprop:Generator_UserTableName="weather_supdo" msprop:Generator_RowChangedName="weather_supdoRowChanged" msprop:Generator_RowEvArgName="weather_supdoRowChangeEvent" msprop:Generator_RowClassName="weather_supdoRow">
<xs:element name="weather_supdo" msprop:Generator_TableClassName="weather_supdoDataTable" msprop:Generator_TableVarName="tableweather_supdo" msprop:Generator_RowChangedName="weather_supdoRowChanged" msprop:Generator_TablePropName="weather_supdo" msprop:Generator_RowDeletingName="weather_supdoRowDeleting" msprop:Generator_RowChangingName="weather_supdoRowChanging" msprop:Generator_RowEvHandlerName="weather_supdoRowChangeEventHandler" msprop:Generator_RowDeletedName="weather_supdoRowDeleted" msprop:Generator_RowClassName="weather_supdoRow" msprop:Generator_UserTableName="weather_supdo" msprop:Generator_RowEvArgName="weather_supdoRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="pcode" msprop:nullValue="" msprop:Generator_ColumnPropNameInRow="pcode" msprop:Generator_ColumnVarNameInTable="columnpcode" msprop:Generator_ColumnPropNameInTable="pcodeColumn" msprop:Generator_UserColumnName="pcode" default="">
@@ -2581,7 +2633,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_profile" msprop:Generator_TableClassName="tbl_profileDataTable" msprop:Generator_TableVarName="tabletbl_profile" msprop:Generator_TablePropName="tbl_profile" msprop:Generator_RowDeletingName="tbl_profileRowDeleting" msprop:Generator_RowChangingName="tbl_profileRowChanging" msprop:Generator_RowEvHandlerName="tbl_profileRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_profileRowDeleted" msprop:Generator_UserTableName="tbl_profile" msprop:Generator_RowChangedName="tbl_profileRowChanged" msprop:Generator_RowEvArgName="tbl_profileRowChangeEvent" msprop:Generator_RowClassName="tbl_profileRow">
<xs:element name="tbl_profile" msprop:Generator_TableClassName="tbl_profileDataTable" msprop:Generator_TableVarName="tabletbl_profile" msprop:Generator_RowChangedName="tbl_profileRowChanged" msprop:Generator_TablePropName="tbl_profile" msprop:Generator_RowDeletingName="tbl_profileRowDeleting" msprop:Generator_RowChangingName="tbl_profileRowChanging" msprop:Generator_RowEvHandlerName="tbl_profileRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_profileRowDeleted" msprop:Generator_RowClassName="tbl_profileRow" msprop:Generator_UserTableName="tbl_profile" msprop:Generator_RowEvArgName="tbl_profileRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code">
@@ -2916,7 +2968,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_zone" msprop:Generator_TableClassName="tbl_zoneDataTable" msprop:Generator_TableVarName="tabletbl_zone" msprop:Generator_TablePropName="tbl_zone" msprop:Generator_RowDeletingName="tbl_zoneRowDeleting" msprop:Generator_RowChangingName="tbl_zoneRowChanging" msprop:Generator_RowEvHandlerName="tbl_zoneRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_zoneRowDeleted" msprop:Generator_UserTableName="tbl_zone" msprop:Generator_RowChangedName="tbl_zoneRowChanged" msprop:Generator_RowEvArgName="tbl_zoneRowChangeEvent" msprop:Generator_RowClassName="tbl_zoneRow">
<xs:element name="tbl_zone" msprop:Generator_TableClassName="tbl_zoneDataTable" msprop:Generator_TableVarName="tabletbl_zone" msprop:Generator_RowChangedName="tbl_zoneRowChanged" msprop:Generator_TablePropName="tbl_zone" msprop:Generator_RowDeletingName="tbl_zoneRowDeleting" msprop:Generator_RowChangingName="tbl_zoneRowChanging" msprop:Generator_RowEvHandlerName="tbl_zoneRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_zoneRowDeleted" msprop:Generator_RowClassName="tbl_zoneRow" msprop:Generator_UserTableName="tbl_zone" msprop:Generator_RowEvArgName="tbl_zoneRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code">
@@ -3086,7 +3138,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_monuse" msprop:Generator_TableClassName="tbl_monuseDataTable" msprop:Generator_TableVarName="tabletbl_monuse" msprop:Generator_TablePropName="tbl_monuse" msprop:Generator_RowDeletingName="tbl_monuseRowDeleting" msprop:Generator_RowChangingName="tbl_monuseRowChanging" msprop:Generator_RowEvHandlerName="tbl_monuseRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_monuseRowDeleted" msprop:Generator_UserTableName="tbl_monuse" msprop:Generator_RowChangedName="tbl_monuseRowChanged" msprop:Generator_RowEvArgName="tbl_monuseRowChangeEvent" msprop:Generator_RowClassName="tbl_monuseRow">
<xs:element name="tbl_monuse" msprop:Generator_TableClassName="tbl_monuseDataTable" msprop:Generator_TableVarName="tabletbl_monuse" msprop:Generator_RowChangedName="tbl_monuseRowChanged" msprop:Generator_TablePropName="tbl_monuse" msprop:Generator_RowDeletingName="tbl_monuseRowDeleting" msprop:Generator_RowChangingName="tbl_monuseRowChanging" msprop:Generator_RowEvHandlerName="tbl_monuseRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_monuseRowDeleted" msprop:Generator_RowClassName="tbl_monuseRow" msprop:Generator_UserTableName="tbl_monuse" msprop:Generator_RowEvArgName="tbl_monuseRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="년" msprop:nullValue="" msprop:Generator_ColumnPropNameInRow="년" msprop:Generator_ColumnVarNameInTable="column년" msprop:Generator_ColumnPropNameInTable="년Column" msprop:Generator_UserColumnName="년" type="xs:string" default="" />
@@ -3098,7 +3150,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_common" msprop:Generator_TableClassName="tbl_commonDataTable" msprop:Generator_TableVarName="tabletbl_common" msprop:Generator_TablePropName="tbl_common" msprop:Generator_RowDeletingName="tbl_commonRowDeleting" msprop:Generator_RowChangingName="tbl_commonRowChanging" msprop:Generator_RowEvHandlerName="tbl_commonRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_commonRowDeleted" msprop:Generator_UserTableName="tbl_common" msprop:Generator_RowChangedName="tbl_commonRowChanged" msprop:Generator_RowEvArgName="tbl_commonRowChangeEvent" msprop:Generator_RowClassName="tbl_commonRow">
<xs:element name="tbl_common" msprop:Generator_TableClassName="tbl_commonDataTable" msprop:Generator_TableVarName="tabletbl_common" msprop:Generator_RowChangedName="tbl_commonRowChanged" msprop:Generator_TablePropName="tbl_common" msprop:Generator_RowDeletingName="tbl_commonRowDeleting" msprop:Generator_RowChangingName="tbl_commonRowChanging" msprop:Generator_RowEvHandlerName="tbl_commonRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_commonRowDeleted" msprop:Generator_RowClassName="tbl_commonRow" msprop:Generator_UserTableName="tbl_common" msprop:Generator_RowEvArgName="tbl_commonRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="gubun" msprop:nullValue="" msprop:Generator_ColumnPropNameInRow="gubun" msprop:Generator_ColumnVarNameInTable="columngubun" msprop:Generator_ColumnPropNameInTable="gubunColumn" msprop:Generator_UserColumnName="gubun" default="">
@@ -3127,7 +3179,7 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="tbl_Desc" msprop:Generator_TableClassName="tbl_DescDataTable" msprop:Generator_TableVarName="tabletbl_Desc" msprop:Generator_TablePropName="tbl_Desc" msprop:Generator_RowDeletingName="tbl_DescRowDeleting" msprop:Generator_RowChangingName="tbl_DescRowChanging" msprop:Generator_RowEvHandlerName="tbl_DescRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_DescRowDeleted" msprop:Generator_UserTableName="tbl_Desc" msprop:Generator_RowChangedName="tbl_DescRowChanged" msprop:Generator_RowEvArgName="tbl_DescRowChangeEvent" msprop:Generator_RowClassName="tbl_DescRow">
<xs:element name="tbl_Desc" msprop:Generator_TableClassName="tbl_DescDataTable" msprop:Generator_TableVarName="tabletbl_Desc" msprop:Generator_RowChangedName="tbl_DescRowChanged" msprop:Generator_TablePropName="tbl_Desc" msprop:Generator_RowDeletingName="tbl_DescRowDeleting" msprop:Generator_RowChangingName="tbl_DescRowChanging" msprop:Generator_RowEvHandlerName="tbl_DescRowChangeEventHandler" msprop:Generator_RowDeletedName="tbl_DescRowDeleted" msprop:Generator_RowClassName="tbl_DescRow" msprop:Generator_UserTableName="tbl_Desc" msprop:Generator_RowEvArgName="tbl_DescRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="cname" msprop:nullValue="" msprop:Generator_ColumnPropNameInRow="cname" msprop:Generator_ColumnVarNameInTable="columncname" msprop:Generator_ColumnPropNameInTable="cnameColumn" msprop:Generator_UserColumnName="cname" type="xs:string" default="" minOccurs="0" />
@@ -3166,6 +3218,29 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="weather_group" msprop:Generator_TableClassName="weather_groupDataTable" msprop:Generator_TableVarName="tableweather_group" msprop:Generator_TablePropName="weather_group" msprop:Generator_RowDeletingName="weather_groupRowDeleting" msprop:Generator_RowChangingName="weather_groupRowChanging" msprop:Generator_RowEvHandlerName="weather_groupRowChangeEventHandler" msprop:Generator_RowDeletedName="weather_groupRowDeleted" msprop:Generator_UserTableName="weather_group" msprop:Generator_RowChangedName="weather_groupRowChanged" msprop:Generator_RowEvArgName="weather_groupRowChangeEvent" msprop:Generator_RowClassName="weather_groupRow">
<xs:complexType>
<xs:sequence>
<xs:element name="code" msprop:Generator_ColumnVarNameInTable="columncode" msprop:Generator_ColumnPropNameInRow="code" msprop:Generator_ColumnPropNameInTable="codeColumn" msprop:Generator_UserColumnName="code">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="50" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="name" msprop:nullValue="_empty" msprop:Generator_ColumnPropNameInRow="name" msprop:Generator_ColumnVarNameInTable="columnname" msprop:Generator_ColumnPropNameInTable="nameColumn" msprop:Generator_UserColumnName="name" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="50" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="area" msprop:nullValue="_empty" msprop:Generator_ColumnPropNameInRow="area" msprop:Generator_ColumnVarNameInTable="columnarea" msprop:Generator_ColumnPropNameInTable="areaColumn" msprop:Generator_UserColumnName="area" type="xs:string" minOccurs="0" />
<xs:element name="area2" msprop:nullValue="_empty" msprop:Generator_ColumnPropNameInRow="area2" msprop:Generator_ColumnVarNameInTable="columnarea2" msprop:Generator_ColumnPropNameInTable="area2Column" msprop:Generator_UserColumnName="area2" type="xs:string" minOccurs="0" />
<xs:element name="area3" msprop:nullValue="_empty" msprop:Generator_ColumnPropNameInRow="area3" msprop:Generator_ColumnVarNameInTable="columnarea3" msprop:Generator_ColumnPropNameInTable="area3Column" msprop:Generator_UserColumnName="area3" type="xs:string" minOccurs="0" />
</xs:sequence>
</xs:complexType>
</xs:element>
</xs:choice>
</xs:complexType>
<xs:unique name="Constraint1" msdata:PrimaryKey="true">
@@ -3255,5 +3330,9 @@ SELECT gubun, code, name, valn1 FROM tbl_common2 WHERE (code = @code) AND (gubun
<xs:field xpath="mstns:gubun" />
<xs:field xpath="mstns:code" />
</xs:unique>
<xs:unique name="weather_group_Constraint1" msdata:ConstraintName="Constraint1" msdata:PrimaryKey="true">
<xs:selector xpath=".//mstns:weather_group" />
<xs:field xpath="mstns:code" />
</xs:unique>
</xs:element>
</xs:schema>

47
ArinWarev1/DataSet/DS.xss
View File

@@ -4,30 +4,31 @@
Changes to this file may cause incorrect behavior and will be lost if
the code is regenerated.
</autogenerated>-->
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-10" ViewPortY="-10" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-10" ViewPortY="40" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<Shapes>
<Shape ID="DesignTable:weather_cha" ZOrder="15" X="120" Y="245" Height="305" Width="217" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:weather_temp" ZOrder="12" X="162" Y="330" Height="305" Width="228" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:tbl_weather" ZOrder="19" X="562" Y="474" Height="376" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="308" />
<Shape ID="DesignTable:weather_ilsa" ZOrder="18" X="192" Y="676" Height="153" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
<Shape ID="DesignTable:weather_supdo" ZOrder="16" X="25" Y="665" Height="149" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="59" />
<Shape ID="DesignTable:tbl_profile" ZOrder="1" X="784" Y="474" Height="187" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="97" />
<Shape ID="DesignTable:tbl_common" ZOrder="5" X="371" Y="417" Height="168" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="78" />
<Shape ID="DesignTable:tbl_pic" ZOrder="4" X="588" Y="45" Height="67" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
<Shape ID="DesignTable:tbl_nanbangkiki" ZOrder="22" X="14" Y="81" Height="257" Width="159" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_nangbangkiki" ZOrder="21" X="182" Y="81" Height="257" Width="166" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_bunbae" ZOrder="13" X="252" Y="98" Height="257" Width="153" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_new" ZOrder="9" X="524" Y="124" Height="257" Width="153" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_myoun" ZOrder="3" X="1590" Y="60" Height="828" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="824" />
<Shape ID="DesignTable:tbl_buha" ZOrder="20" X="854" Y="81" Height="257" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_nbunbae" ZOrder="7" X="1022" Y="81" Height="257" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_kongjo" ZOrder="6" X="373" Y="266" Height="257" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_kongkub" ZOrder="8" X="202" Y="185" Height="257" Width="165" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_yk" ZOrder="10" X="412" Y="382" Height="238" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="234" />
<Shape ID="DesignTable:tbl_ykdetail" ZOrder="14" X="573" Y="385" Height="219" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="215" />
<Shape ID="DesignTable:tbl_zone" ZOrder="2" X="1414" Y="58" Height="847" Width="177" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="843" />
<Shape ID="DesignTable:tbl_monuse" ZOrder="17" X="481" Y="21" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="86" />
<Shape ID="DesignTable:tbl_Desc" ZOrder="11" X="392" Y="357" Height="466" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="462" />
<Shape ID="DesignTable:weather_cha" ZOrder="2" X="944" Y="359" Height="305" Width="217" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:weather_temp" ZOrder="14" X="162" Y="330" Height="305" Width="228" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:tbl_weather" ZOrder="20" X="562" Y="474" Height="376" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="308" />
<Shape ID="DesignTable:weather_ilsa" ZOrder="19" X="192" Y="676" Height="153" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
<Shape ID="DesignTable:weather_supdo" ZOrder="17" X="25" Y="665" Height="149" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="59" />
<Shape ID="DesignTable:tbl_profile" ZOrder="3" X="784" Y="474" Height="187" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="97" />
<Shape ID="DesignTable:tbl_common" ZOrder="7" X="371" Y="417" Height="168" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="78" />
<Shape ID="DesignTable:tbl_pic" ZOrder="6" X="588" Y="45" Height="67" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="63" />
<Shape ID="DesignTable:tbl_nanbangkiki" ZOrder="23" X="14" Y="81" Height="257" Width="159" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_nangbangkiki" ZOrder="22" X="182" Y="81" Height="257" Width="166" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_bunbae" ZOrder="15" X="252" Y="98" Height="257" Width="153" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_new" ZOrder="11" X="524" Y="124" Height="257" Width="153" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_myoun" ZOrder="5" X="1590" Y="60" Height="828" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="824" />
<Shape ID="DesignTable:tbl_buha" ZOrder="21" X="854" Y="81" Height="257" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_nbunbae" ZOrder="9" X="1022" Y="81" Height="257" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_kongjo" ZOrder="8" X="373" Y="266" Height="257" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_kongkub" ZOrder="10" X="202" Y="185" Height="257" Width="165" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="253" />
<Shape ID="DesignTable:tbl_yk" ZOrder="12" X="412" Y="382" Height="238" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="234" />
<Shape ID="DesignTable:tbl_ykdetail" ZOrder="16" X="573" Y="385" Height="219" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="215" />
<Shape ID="DesignTable:tbl_zone" ZOrder="4" X="1414" Y="58" Height="847" Width="177" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="843" />
<Shape ID="DesignTable:tbl_monuse" ZOrder="18" X="481" Y="21" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="86" />
<Shape ID="DesignTable:tbl_Desc" ZOrder="13" X="392" Y="357" Height="466" Width="150" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="462" />
<Shape ID="DesignTable:weather_group" ZOrder="1" X="1020" Y="373" Height="172" Width="233" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
</Shapes>
<Connectors />
</DiagramLayout>

18
ArinWarev1/ECO2_2016.vbproj
View File

@@ -166,6 +166,18 @@
<Compile Include="Forms_Basic\Frm_import.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="Forms_Basic\fSelectWeatherGroup.Designer.vb">
<DependentUpon>fSelectWeatherGroup.vb</DependentUpon>
</Compile>
<Compile Include="Forms_Basic\fSelectWeatherGroup.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="Forms_Basic\fSelectArea.Designer.vb">
<DependentUpon>fSelectArea.vb</DependentUpon>
</Compile>
<Compile Include="Forms_Basic\fSelectArea.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="Forms_Input\frm_monuse.Designer.vb">
<DependentUpon>frm_monuse.vb</DependentUpon>
</Compile>
@@ -461,6 +473,12 @@
<DependentUpon>Frm_Work.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="Forms_Basic\fSelectWeatherGroup.resx">
<DependentUpon>fSelectWeatherGroup.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="Forms_Basic\fSelectArea.resx">
<DependentUpon>fSelectArea.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="Forms_Input\frm_monuse.resx">
<DependentUpon>frm_monuse.vb</DependentUpon>
<SubType>Designer</SubType>

85
ArinWarev1/Forms_Basic/fSelectArea.Designer.vb generated Normal file
View File

@@ -0,0 +1,85 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class fSelectArea
Inherits CForm
'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Windows Form 디자이너에 필요합니다.
Private components As System.ComponentModel.IContainer
'참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
'수정하려면 Windows Form 디자이너를 사용하십시오.
'코드 편집기에서는 수정하지 마세요.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(fSelectArea))
Me.Label1 = New System.Windows.Forms.Label()
Me.ComboBox1 = New System.Windows.Forms.ComboBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.SuspendLayout()
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("맑은 고딕", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.Label1.Location = New System.Drawing.Point(21, 16)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(284, 60)
Me.Label1.TabIndex = 0
Me.Label1.Text = "기상데이터 지역목록 입니다." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "적용할 지역을 선택 하세요"
'
'ComboBox1
'
Me.ComboBox1.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.ComboBox1.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
Me.ComboBox1.Font = New System.Drawing.Font("맑은 고딕", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.ComboBox1.FormattingEnabled = True
Me.ComboBox1.Location = New System.Drawing.Point(26, 96)
Me.ComboBox1.Name = "ComboBox1"
Me.ComboBox1.Size = New System.Drawing.Size(291, 40)
Me.ComboBox1.TabIndex = 1
'
'Button1
'
Me.Button1.Font = New System.Drawing.Font("맑은 고딕", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.Button1.Location = New System.Drawing.Point(26, 151)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(291, 40)
Me.Button1.TabIndex = 2
Me.Button1.Text = "확 인"
Me.Button1.UseVisualStyleBackColor = True
'
'fSelectArea
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 15.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(341, 209)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.ComboBox1)
Me.Controls.Add(Me.Label1)
Me.Font = New System.Drawing.Font("맑은 고딕", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "fSelectArea"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "적용 지역 선택"
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents Label1 As Label
Friend WithEvents ComboBox1 As ComboBox
Friend WithEvents Button1 As Button
End Class

6293
ArinWarev1/Forms_Basic/fSelectArea.resx Normal file
View File

File diff suppressed because it is too large Load Diff

18
ArinWarev1/Forms_Basic/fSelectArea.vb Normal file
View File

@@ -0,0 +1,18 @@
Public Class fSelectArea
Private Sub fSelectArea_Load(sender As Object, e As EventArgs) Handles MyBase.Load
ComboBox1.Items.Clear()
ComboBox1.DataSource = DSET1.tbl_weather
ComboBox1.DisplayMember = "건물위치"
ComboBox1.ValueMember = "code"
If ComboBox1.Items.Count > 0 Then ComboBox1.SelectedIndex = 0
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If ComboBox1.SelectedIndex < 0 Then
MsgBox("선택하지 않았습니다", MsgBoxStyle.Critical, "확인")
Return
End If
DialogResult = DialogResult.OK
End Sub
End Class

127
ArinWarev1/Forms_Basic/fSelectWeatherGroup.Designer.vb generated Normal file
View File

@@ -0,0 +1,127 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class fSelectWeatherGroup
Inherits CForm
'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Windows Form 디자이너에 필요합니다.
Private components As System.ComponentModel.IContainer
'참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
'수정하려면 Windows Form 디자이너를 사용하십시오.
'코드 편집기에서는 수정하지 마세요.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(fSelectWeatherGroup))
Me.Label1 = New System.Windows.Forms.Label()
Me.cmbArea1 = New System.Windows.Forms.ComboBox()
Me.btOK = New System.Windows.Forms.Button()
Me.cmbArea2 = New System.Windows.Forms.ComboBox()
Me.bsArea2 = New System.Windows.Forms.BindingSource(Me.components)
Me.bsArea1 = New System.Windows.Forms.BindingSource(Me.components)
Me.DS = New Eco2Ar.DS()
CType(Me.bsArea2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.bsArea1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DS, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("맑은 고딕", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.Label1.Location = New System.Drawing.Point(14, 22)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(188, 30)
Me.Label1.TabIndex = 0
Me.Label1.Text = "지역을 선택하세요" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)
'
'cmbArea1
'
Me.cmbArea1.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.cmbArea1.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
Me.cmbArea1.Font = New System.Drawing.Font("맑은 고딕", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.cmbArea1.FormattingEnabled = True
Me.cmbArea1.Location = New System.Drawing.Point(19, 73)
Me.cmbArea1.Name = "cmbArea1"
Me.cmbArea1.Size = New System.Drawing.Size(291, 40)
Me.cmbArea1.TabIndex = 1
'
'btOK
'
Me.btOK.Font = New System.Drawing.Font("맑은 고딕", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.btOK.Location = New System.Drawing.Point(22, 468)
Me.btOK.Name = "btOK"
Me.btOK.Size = New System.Drawing.Size(588, 50)
Me.btOK.TabIndex = 2
Me.btOK.Text = "확 인"
Me.btOK.UseVisualStyleBackColor = True
'
'cmbArea2
'
Me.cmbArea2.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.cmbArea2.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
Me.cmbArea2.Font = New System.Drawing.Font("맑은 고딕", 18.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.cmbArea2.FormattingEnabled = True
Me.cmbArea2.Location = New System.Drawing.Point(316, 73)
Me.cmbArea2.Name = "cmbArea2"
Me.cmbArea2.Size = New System.Drawing.Size(291, 40)
Me.cmbArea2.TabIndex = 4
'
'bsArea2
'
Me.bsArea2.DataMember = "weather_group"
Me.bsArea2.DataSource = Me.DS
'
'bsArea1
'
Me.bsArea1.DataMember = "weather_group"
Me.bsArea1.DataSource = Me.DS
'
'DS
'
Me.DS.DataSetName = "DS"
Me.DS.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
'
'fSelectWeatherGroup
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 15.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(622, 542)
Me.Controls.Add(Me.cmbArea2)
Me.Controls.Add(Me.btOK)
Me.Controls.Add(Me.cmbArea1)
Me.Controls.Add(Me.Label1)
Me.Font = New System.Drawing.Font("맑은 고딕", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "fSelectWeatherGroup"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "적용 지역 선택"
CType(Me.bsArea2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.bsArea1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DS, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents Label1 As Label
Friend WithEvents cmbArea1 As ComboBox
Friend WithEvents btOK As Button
Friend WithEvents cmbArea2 As ComboBox
Friend WithEvents bsArea2 As BindingSource
Friend WithEvents bsArea1 As BindingSource
Public WithEvents DS As DS
End Class

6302
ArinWarev1/Forms_Basic/fSelectWeatherGroup.resx Normal file
View File

File diff suppressed because it is too large Load Diff

22
ArinWarev1/Forms_Basic/fSelectWeatherGroup.vb Normal file
View File

@@ -0,0 +1,22 @@
Public Class fSelectWeatherGroup
Private Sub fSelectArea_Load(sender As Object, e As EventArgs) Handles MyBase.Load
bsArea1.DataSource = DSET1
bsArea2.DataSource = DSET2
bsArea1.Filter = "code like '%0000'"
bsArea2.Filter = "code = 'test'"
cmbArea1.DisplayMember = "name"
cmbArea1.ValueMember = "code"
cmbArea2.DisplayMember = "name"
cmbArea2.ValueMember = "code"
cmbArea1.DataSource = bsArea1
cmbArea2.DataSource = bsArea2
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btOK.Click
DialogResult = DialogResult.OK
End Sub
End Class

79
ArinWarev1/Forms_Input/Frm_Desc.Designer.vb generated
View File

@@ -67,6 +67,7 @@ Partial Class Frm_Desc
Me.Label28 = New System.Windows.Forms.Label()
Me.TextBox76 = New Eco2Ar.MyTb()
Me.Panel3 = New System.Windows.Forms.Panel()
Me.cmbArea1 = New System.Windows.Forms.ComboBox()
Me.Label19 = New System.Windows.Forms.Label()
Me.MyTb7 = New Eco2Ar.MyTb()
Me.Label29 = New System.Windows.Forms.Label()
@@ -80,7 +81,7 @@ Partial Class Frm_Desc
Me.TextBox73 = New Eco2Ar.MyTb()
Me.TextBox71 = New Eco2Ar.MyTb()
Me.Label35 = New System.Windows.Forms.Label()
Me.cmb_location = New Eco2Ar.MyCmb()
Me.cmbArea2 = New Eco2Ar.MyCmb()
Me.Label40 = New System.Windows.Forms.Label()
Me.Label41 = New System.Windows.Forms.Label()
Me.GroupBox5 = New System.Windows.Forms.GroupBox()
@@ -138,6 +139,8 @@ Partial Class Frm_Desc
Me.Panel10 = New System.Windows.Forms.Panel()
Me.PictureBox7 = New System.Windows.Forms.PictureBox()
Me.Label47 = New System.Windows.Forms.Label()
Me.bsArea2 = New System.Windows.Forms.BindingSource(Me.components)
Me.bsArea1 = New System.Windows.Forms.BindingSource(Me.components)
Me.TableLayoutPanel3.SuspendLayout()
Me.TableLayoutPanel4.SuspendLayout()
CType(Me.bs, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -168,6 +171,8 @@ Partial Class Frm_Desc
Me.GroupBox8.SuspendLayout()
Me.Panel10.SuspendLayout()
CType(Me.PictureBox7, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.bsArea2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.bsArea1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'TableLayoutPanel3
@@ -616,6 +621,7 @@ Partial Class Frm_Desc
'Panel3
'
Me.Panel3.BackColor = System.Drawing.Color.FromArgb(CType(CType(219, Byte), Integer), CType(CType(221, Byte), Integer), CType(CType(223, Byte), Integer))
Me.Panel3.Controls.Add(Me.cmbArea1)
Me.Panel3.Controls.Add(Me.Label19)
Me.Panel3.Controls.Add(Me.MyTb7)
Me.Panel3.Controls.Add(Me.Label29)
@@ -629,7 +635,7 @@ Partial Class Frm_Desc
Me.Panel3.Controls.Add(Me.TextBox73)
Me.Panel3.Controls.Add(Me.TextBox71)
Me.Panel3.Controls.Add(Me.Label35)
Me.Panel3.Controls.Add(Me.cmb_location)
Me.Panel3.Controls.Add(Me.cmbArea2)
Me.Panel3.Controls.Add(Me.Label40)
Me.Panel3.Controls.Add(Me.Label41)
Me.Panel3.Location = New System.Drawing.Point(1, 9)
@@ -637,11 +643,25 @@ Partial Class Frm_Desc
Me.Panel3.Size = New System.Drawing.Size(507, 162)
Me.Panel3.TabIndex = 5
'
'cmbArea1
'
Me.cmbArea1.BackColor = System.Drawing.Color.White
Me.cmbArea1.DisplayMember = "name"
Me.cmbArea1.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cmbArea1.ForeColor = System.Drawing.SystemColors.ControlDarkDark
Me.cmbArea1.FormattingEnabled = True
Me.cmbArea1.Location = New System.Drawing.Point(345, 5)
Me.cmbArea1.Margin = New System.Windows.Forms.Padding(4, 2, 4, 2)
Me.cmbArea1.Name = "cmbArea1"
Me.cmbArea1.Size = New System.Drawing.Size(152, 20)
Me.cmbArea1.TabIndex = 78
Me.cmbArea1.ValueMember = "code"
'
'Label19
'
Me.Label19.AutoSize = True
Me.Label19.ForeColor = System.Drawing.SystemColors.ControlDarkDark
Me.Label19.Location = New System.Drawing.Point(45, 75)
Me.Label19.Location = New System.Drawing.Point(45, 80)
Me.Label19.Name = "Label19"
Me.Label19.Size = New System.Drawing.Size(31, 12)
Me.Label19.TabIndex = 76
@@ -650,7 +670,7 @@ Partial Class Frm_Desc
'MyTb7
'
Me.MyTb7.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.bs, "gujo", True))
Me.MyTb7.Location = New System.Drawing.Point(81, 72)
Me.MyTb7.Location = New System.Drawing.Point(81, 77)
Me.MyTb7.Name = "MyTb7"
Me.MyTb7.NectControl = Nothing
Me.MyTb7.Size = New System.Drawing.Size(416, 21)
@@ -702,7 +722,7 @@ Partial Class Frm_Desc
'
Me.Label33.AutoSize = True
Me.Label33.ForeColor = System.Drawing.SystemColors.ControlDarkDark
Me.Label33.Location = New System.Drawing.Point(1, 51)
Me.Label33.Location = New System.Drawing.Point(1, 56)
Me.Label33.Name = "Label33"
Me.Label33.Size = New System.Drawing.Size(75, 12)
Me.Label33.TabIndex = 0
@@ -732,10 +752,10 @@ Partial Class Frm_Desc
'TextBox72
'
Me.TextBox72.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.bs, "buildname", True))
Me.TextBox72.Location = New System.Drawing.Point(81, 24)
Me.TextBox72.Location = New System.Drawing.Point(81, 29)
Me.TextBox72.Name = "TextBox72"
Me.TextBox72.NectControl = Nothing
Me.TextBox72.Size = New System.Drawing.Size(256, 21)
Me.TextBox72.Size = New System.Drawing.Size(211, 21)
Me.TextBox72.TabIndex = 11
Me.TextBox72.TextFormat = Eco2Ar.MyTb.ETFormat.Normal
'
@@ -752,7 +772,7 @@ Partial Class Frm_Desc
'TextBox71
'
Me.TextBox71.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.bs, "buildaddr", True))
Me.TextBox71.Location = New System.Drawing.Point(81, 48)
Me.TextBox71.Location = New System.Drawing.Point(81, 53)
Me.TextBox71.Name = "TextBox71"
Me.TextBox71.NectControl = Nothing
Me.TextBox71.Size = New System.Drawing.Size(416, 21)
@@ -770,22 +790,22 @@ Partial Class Frm_Desc
Me.Label35.Text = "연면적(㎡)" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)
Me.Label35.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
'
'cmb_location
'cmbArea2
'
Me.cmb_location.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cmb_location.FormattingEnabled = True
Me.cmb_location.Items.AddRange(New Object() {"서울", "인천", "경기", "강원", "대구", "대전", "충남", "충북", "광주", "전남", "전북", "부산", "울산", "경북", "경남", "제주"})
Me.cmb_location.Location = New System.Drawing.Point(403, 25)
Me.cmb_location.Name = "cmb_location"
Me.cmb_location.NectControl = Nothing
Me.cmb_location.Size = New System.Drawing.Size(94, 20)
Me.cmb_location.TabIndex = 12
Me.cmbArea2.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cmbArea2.FormattingEnabled = True
Me.cmbArea2.Items.AddRange(New Object() {"서울", "인천", "경기", "강원", "대구", "대전", "충남", "충북", "광주", "전남", "전북", "부산", "울산", "경북", "경남", "제주"})
Me.cmbArea2.Location = New System.Drawing.Point(345, 29)
Me.cmbArea2.Name = "cmbArea2"
Me.cmbArea2.NectControl = Nothing
Me.cmbArea2.Size = New System.Drawing.Size(152, 20)
Me.cmbArea2.TabIndex = 12
'
'Label40
'
Me.Label40.AutoSize = True
Me.Label40.ForeColor = System.Drawing.SystemColors.ControlDarkDark
Me.Label40.Location = New System.Drawing.Point(32, 27)
Me.Label40.Location = New System.Drawing.Point(32, 32)
Me.Label40.Name = "Label40"
Me.Label40.Size = New System.Drawing.Size(44, 12)
Me.Label40.TabIndex = 0
@@ -793,13 +813,13 @@ Partial Class Frm_Desc
'
'Label41
'
Me.Label41.AutoSize = True
Me.Label41.ForeColor = System.Drawing.SystemColors.ControlDarkDark
Me.Label41.Location = New System.Drawing.Point(366, 29)
Me.Label41.Location = New System.Drawing.Point(305, 13)
Me.Label41.Name = "Label41"
Me.Label41.Size = New System.Drawing.Size(31, 12)
Me.Label41.Size = New System.Drawing.Size(43, 33)
Me.Label41.TabIndex = 2
Me.Label41.Text = "지역"
Me.Label41.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
'
'GroupBox5
'
@@ -1366,6 +1386,16 @@ Partial Class Frm_Desc
Me.Label47.TabIndex = 179
Me.Label47.Text = "경과년수"
'
'bsArea2
'
Me.bsArea2.DataMember = "weather_group"
Me.bsArea2.DataSource = Me.DS
'
'bsArea1
'
Me.bsArea1.DataMember = "weather_group"
Me.bsArea1.DataSource = Me.DS
'
'Frm_Desc
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 12.0!)
@@ -1454,6 +1484,8 @@ Partial Class Frm_Desc
Me.Panel10.ResumeLayout(False)
Me.Panel10.PerformLayout()
CType(Me.PictureBox7, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.bsArea2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.bsArea1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
@@ -1476,7 +1508,7 @@ Partial Class Frm_Desc
Friend WithEvents TextBox75 As Eco2Ar.MyTb
Friend WithEvents TextBox73 As Eco2Ar.MyTb
Friend WithEvents DateTimePicker1 As System.Windows.Forms.DateTimePicker
Friend WithEvents cmb_location As Eco2Ar.MyCmb
Friend WithEvents cmbArea2 As Eco2Ar.MyCmb
Friend WithEvents TextBox72 As Eco2Ar.MyTb
Friend WithEvents TextBox70 As Eco2Ar.MyTb
Friend WithEvents TextBox69 As Eco2Ar.MyTb
@@ -1572,4 +1604,7 @@ Partial Class Frm_Desc
Friend WithEvents Label24 As System.Windows.Forms.Label
Friend WithEvents cmb_인증기관 As Eco2Ar.MyCmb
Friend WithEvents CheckBox1 As System.Windows.Forms.CheckBox
Friend WithEvents cmbArea1 As ComboBox
Friend WithEvents bsArea2 As BindingSource
Friend WithEvents bsArea1 As BindingSource
End Class

8
ArinWarev1/Forms_Input/Frm_Desc.resx
View File

@@ -785,7 +785,13 @@
ZqH7/wD/ABaT/hUfb7Ht/wBj7V9p8v8A9Cr+Oz+lz//Z
</value>
</data>
<metadata name="bsArea2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>248, 17</value>
</metadata>
<metadata name="bsArea1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>345, 17</value>
</metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>45</value>
<value>57</value>
</metadata>
</root>

186
ArinWarev1/Forms_Input/Frm_Desc.vb
View File

@@ -3,6 +3,18 @@
'''변경된내용을적용한다.
Public Overrides Function AcceptChanged() As Boolean
Dim drv As DataRowView = bs.Current
If drv Is Nothing Then Return True
If Me.cmbArea2.SelectedValue Is Nothing OrElse Me.cmbArea1.SelectedValue Is Nothing Then
MsgBox("지역이 선택되지 않았습니다" + vbCrLf + "계산작업을 위해서는 지역이 선택되어야 합니다", MsgBoxStyle.Critical, "확인")
drv("buildarea") = "0"
Else
drv("buildarea") = Me.cmbArea2.SelectedValue.ToString
End If
bs.EndEdit()
Dim BaseDS As DataSet = CType(bs.DataSource, DataSet)
Dim BaseDT As DataTable = BaseDS.Tables(bs.DataMember)
@@ -37,6 +49,9 @@
#End Region
Dim DT지역중분류 As DataTable
Dim init As Boolean = False
Dim 변경암함_세부지역 As Boolean = False
Public Sub New(_opentime)
@@ -83,12 +98,50 @@
End Select
End Sub
Sub AttachAreaBind()
'//지역중분류값을 업데이트한다
bsArea1.DataSource = DSET1
bsArea1.DataMember = "weather_group"
bsArea2.DataSource = DSET1
bsArea2.DataMember = "weather_group"
cmbArea1.DataSource = bsArea1
cmbArea2.DataSource = bsArea2
cmbArea1.DisplayMember = "name"
cmbArea1.ValueMember = "code"
'bsArea1.Filter = "code like '%0000'"
cmbArea2.DisplayMember = "name"
cmbArea2.ValueMember = "code"
'bsArea2.Filter = "code ='test'"
End Sub
Private Sub MdiMain_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
init = False
Me.Show()
My.Application.DoEvents()
' Work_msg_timer("잠시만 기다려주세요")
'//지역중분류값을 업데이트한다
bsArea1.DataSource = DSET1
bsArea1.DataMember = "weather_group"
bsArea2.DataSource = DSET1
bsArea2.DataMember = "weather_group"
cmbArea1.DataSource = bsArea1
cmbArea2.DataSource = bsArea2
cmbArea1.DisplayMember = "name"
cmbArea1.ValueMember = "code"
bsArea1.Filter = "code like '%0000'"
cmbArea2.DisplayMember = "name"
cmbArea2.ValueMember = "code"
bsArea2.Filter = "code ='test'"
Me.LinkLabel1.Visible = False
@@ -106,6 +159,7 @@
'//Zone
Binding_Zone()
init = True
Try
Me.bs.Position = CEnergy.ARINCLASS.Read_LastPos_Frm(Me)
@@ -113,6 +167,8 @@
Me.bs.MoveFirst()
End Try
If Not (Prj.UserId.ToLower() = "guest" OrElse Prj.UserId.ToLower().StartsWith("user") OrElse Prj.UserAuthType = "ADMIN" OrElse Prj.UserAuthType = "BOTH" OrElse Prj.UserAuthType = "BOTH2" OrElse Prj.UserAuthType = "BOTH1") Then '//2011.03.08 추가
Dim MyVersion As String '= Format(My.Application.Info.Version.Minor, "0000") & Format(My.Application.Info.Version.Build, "0000")
Dim L As New ArinLogin.ArinLOgin
@@ -127,9 +183,9 @@
Try
VersionInfo = L.Get_LastVersion("C") '//버젼을 가져오는데 eco 버젼만 가져오게 바꺼야겟죵 ^^ 구분자를 넣도록 합시닷!
If VersionInfo.Ver <> "0" AndAlso (CInt(VersionInfo.Ver) > CInt(MyVersion)) Then '//0은 없거나 관리안함의 뜻이므로 넘어간다.
Dim Lc As String = Me.cmb_location.SelectedValue
Dim Lc As String = Me.cmbArea2.SelectedValue
Read_CommonCode()
Me.cmb_location.SelectedValue = Lc
Me.cmbArea2.SelectedValue = Lc
Me.bs.EndEdit()
End If
Catch ex As Exception
@@ -147,9 +203,9 @@
VersionInfo = L.Get_LastVersion("P") '//버젼을 가져오는데 eco 버젼만 가져오게 바꺼야겟죵 ^^ 구분자를 넣도록 합시닷!
If VersionInfo.Ver <> "0" AndAlso (CInt(VersionInfo.Ver) > CInt(MyVersion)) Then '//0은 없거나 관리안함의 뜻이므로 넘어간다.
Dim Lp As String = Me.cmb_location.SelectedValue
Dim Lp As String = Me.cmbArea2.SelectedValue
Read_ProfileData()
Me.cmb_location.SelectedValue = Lp
Me.cmbArea2.SelectedValue = Lp
Me.bs.EndEdit()
End If
Catch ex As Exception
@@ -167,9 +223,9 @@
'MyVersion = DSET1.tbl_Desc.Rows(0)("versionw").ToString
VersionInfo = L.Get_LastVersion("W") '//버젼을 가져오는데 eco 버젼만 가져오게 바꺼야겟죵 ^^ 구분자를 넣도록 합시닷!
If VersionInfo.Ver <> "0" AndAlso (CInt(VersionInfo.Ver) > CInt(MyVersion)) Then '//0은 없거나 관리안함의 뜻이므로 넘어간다.
Dim Lw As String = Me.cmb_location.SelectedValue
Dim Lw As String = Me.cmbArea2.SelectedValue
Read_WeatherData()
Me.cmb_location.SelectedValue = Lw
Me.cmbArea2.SelectedValue = Lw
Me.bs.EndEdit()
End If
Catch ex As Exception
@@ -184,7 +240,9 @@
End If
End If
AddHandler DSET1.tbl_Desc.ColumnChanging, AddressOf AddNewDataRow_Zone_Changed2
지역코드설정()
AddHandler DSET1.tbl_Desc.ColumnChanging, AddressOf AddNewDataRow_Zone_Changed2
AddDebug("▲ Form Load")
End Sub
@@ -192,10 +250,10 @@
Private Sub Binding_Zone()
Dim bs_cmb_공조방식 As New BindingSource(DSET1, "tbl_weather")
bs_cmb_공조방식.Filter = ""
Me.cmb_location.DataSource = bs_cmb_공조방식
cmb_location.DisplayMember = "건물위치"
cmb_location.ValueMember = "code"
Me.cmb_location.DataBindings.Add("selectedvalue", Me.bs, "buildarea")
Me.cmbArea2.DataSource = bs_cmb_공조방식
cmbArea2.DisplayMember = "건물위치"
cmbArea2.ValueMember = "code"
Me.cmbArea2.DataBindings.Add("selectedvalue", Me.bs, "buildarea")
Dim bs_cmb_인증기관 As New BindingSource(DSET1, "tbl_common")
bs_cmb_인증기관.Filter = "gubun='1100'"
@@ -255,22 +313,23 @@
Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
Dim L As String = Me.cmb_location.SelectedValue
Dim L As String = Me.cmbArea2.SelectedValue
If MsgBox("공용코드값을 서버로부터 가져오시겠습니까?", MsgBoxStyle.Information Or MsgBoxStyle.OkCancel, "확인") = MsgBoxResult.Ok Then Read_CommonCode()
Me.cmb_location.SelectedValue = L
' Me.cmbArea2.SelectedValue = L
Me.bs.EndEdit()
End Sub
Private Sub LinkLabel2_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel2.LinkClicked
Dim L As String = Me.cmb_location.SelectedValue
Dim L As String = Me.cmbArea2.SelectedValue
If MsgBox("기상데이터값을 서버로부터 가져오시겠습니까?", MsgBoxStyle.Information Or MsgBoxStyle.OkCancel, "확인") = MsgBoxResult.Ok Then Read_WeatherData()
Me.cmb_location.SelectedValue = L
AttachAreaBind()
' Me.cmbArea2.SelectedValue = L
Me.bs.EndEdit()
End Sub
Private Sub LinkLabel3_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel3.LinkClicked '//2010.12.06 추가
Dim L As String = Me.cmb_location.SelectedValue
Dim L As String = Me.cmbArea2.SelectedValue
If MsgBox("표준프로파일값을 서버로부터 가져오시겠습니까?", MsgBoxStyle.Information Or MsgBoxStyle.OkCancel, "확인") = MsgBoxResult.Ok Then Read_ProfileData()
Me.cmb_location.SelectedValue = L
' Me.cmbArea2.SelectedValue = L
Me.bs.EndEdit()
End Sub
@@ -308,9 +367,7 @@
Me.bs.EndEdit()
End Sub
Private Sub cmb_location_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles cmb_location.SelectedIndexChanged
End Sub
Private Sub CheckBox1_Click(sender As Object, e As System.EventArgs) Handles CheckBox1.Click
Dim drv As DataRowView = Me.bs.Current
@@ -321,4 +378,93 @@
Private Sub CheckBox1_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles CheckBox1.CheckedChanged
End Sub
Private Sub 지역코드설정()
Dim drv As DataRowView = Me.bs.Current
If drv Is Nothing Then Return
'//지역코드에는 Weather_Group의 코드값이 들어있다.
Dim 지역코드 As String = drv("buildarea").ToString
If 지역코드 <> "" AndAlso 지역코드 <> "0" AndAlso 지역코드 <> "00" AndAlso 지역코드.Length = 6 Then
변경암함_세부지역 = True
'//Dep 1
Dim codeHeader As String = 지역코드.Substring(0, 2)
bsArea2.Filter = String.Format("code like '{0}%' and code not like '%0000' and code like '%00'", codeHeader)
Me.cmbArea1.SelectedValue = codeHeader + "0000" '//선택해줌
codeHeader = 지역코드.Substring(0, 4)
'bsArea3.Filter = String.Format("code like '{0}%' and code not like '%00'", codeHeader)
Me.cmbArea2.SelectedValue = codeHeader + "00"
'Me.cmbArea3.SelectedValue = 지역코드
'//찾은 중분류코드에맞는 중분류를 자동 선택해준다.
변경암함_세부지역 = False
Else
bsArea1.Filter = "code like '%0000'"
bsArea2.Filter = "code='test'"
'bsArea3.Filter = "code='test'"
End If
End Sub
Private Sub cmbArea1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbArea1.SelectedIndexChanged
If init = False Then Return '//초기화전이면 수행안함
Dim drv As DataRowView = Me.bs.Current
If drv Is Nothing Then Return
'//지역그룹선택을 바꾼다면 해당 지역에 맞도록 우측을 갱신해줘야한다
If 변경암함_세부지역 Then Return '//순환참조방지
If Me.cmbArea1.SelectedIndex < 0 OrElse cmbArea1.Text = "없음" OrElse cmbArea1.SelectedValue.ToString() = "00" Then
Me.cmbArea2.SelectedIndex = -1
Else
Dim codeHeader As String = cmbArea1.SelectedValue.ToString().Substring(0, 2)
bsArea2.Filter = String.Format("code like '{0}%' and code not like '%0000' and code like '%00'", codeHeader)
cmbArea2.DataSource = bsArea2
cmbArea2.DisplayMember = "name"
cmbArea2.ValueMember = "code"
If (cmbArea2.Items.Count > 0) Then
cmbArea2.SelectedIndex = 0
Else
cmbArea2.SelectedIndex = -1
End If
If cmbArea1.SelectedIndex >= 0 Then
drv("buildarea") = cmbArea1.SelectedValue.ToString()
drv.EndEdit()
End If
End If
End Sub
Private Sub CmbArea2_SelectedIndexChanged_1(sender As System.Object, e As System.EventArgs) Handles cmbArea2.SelectedIndexChanged
If init = False Then Return '//초기화전이면 수행안함
Dim drv As DataRowView = Me.bs.Current
If drv Is Nothing Then Return
'//지역그룹선택을 바꾼다면 해당 지역에 맞도록 우측을 갱신해줘야한다
If 변경암함_세부지역 Then Return '//순환참조방지
If Me.cmbArea2.SelectedIndex < 0 OrElse cmbArea2.Text = "없음" OrElse cmbArea2.SelectedValue.ToString() = "00" Then
'Me.cmbArea3.SelectedIndex = -1
Else
Dim codeHeader As String = cmbArea2.SelectedValue.ToString().Substring(0, 4)
'bsArea3.Filter = String.Format("code like '{0}%' and code not like '%00'", codeHeader)
'cmbArea3.SelectedIndex = -1
If cmbArea2.SelectedIndex >= 0 Then
drv("buildarea") = cmbArea2.SelectedValue.ToString()
drv.EndEdit()
End If
End If
End Sub
Private Sub Label41_Click(sender As Object, e As EventArgs) Handles Label41.Click
Dim f As New fSelectWeatherGroup()
f.ShowDialog()
End Sub
End Class

841
ArinWarev1/Forms_Input/Frm_v20091231_Weather.Designer.vb generated
View File

File diff suppressed because it is too large Load Diff

150
ArinWarev1/Forms_Input/Frm_v20091231_Weather.resx
View File

@@ -379,27 +379,54 @@
<value>False</value>
</metadata>
<metadata name="bn_all.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>497, 17</value>
</metadata>
<metadata name="bs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<metadata name="DS.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>329, 56</value>
</metadata>
<metadata name="DS.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>329, 56</value>
</metadata>
<metadata name="bsw_ilsa.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>81, 17</value>
</metadata>
<metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>581, 17</value>
</metadata>
<metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>581, 17</value>
<value>571, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="ToolStripButton8.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIDSURBVDhPpZLrS5NhGMb3j4SWh0oRQVExD4gonkDpg4hG
YKxG6WBogkMZKgPNCEVJFBGdGETEvgwyO9DJE5syZw3PIlPEE9pgBCLZ5XvdMB8Ew8gXbl54nuf63dd9
0OGSnwCahxbPRNPAPMw9Xpg6ZmF46kZZ0xSKzJPIrhpDWsVnpBhGkKx3nAX8Pv7z1zg8OoY/cITdn4fw
bf/C0kYAN3Ma/w3gWfZL5kzTKBxjWyK2DftwI9tyMYCZKXbNHaD91bLYJrDXsYbrWfUKwJrPE9M2M1Oc
VzOOpHI7Jr376Hi9ogHqFIANO0/MmmmbmSmm9a8ze+I4MrNWAdjtoJgWcx+PSzg166yZZ8xM8XvXDix9
c4jIqFYAjoriBV9AhEPv1mH/sonogha0afbZMMZz+yreTGyhpusHwtNNCsA5U1zS4BLxzJIfg299qO32
Ir7UJtZfftyATqeT+8o2D8JSjQrAJblrncYL7ZJ2+bfaFnC/1S1NjL3diRat7qrO7wLRP3HjWsojBeCo
mDEo5mNjuweFGvjWg2EBhCbpkW78htSHHwRyNdmgAFzPEee2iFkzayy2OLXzT4gr6UdUnlXrullsxxQ+
kx0g8BTA3aZlButjSTyjODq/WcQcW/B/Je4OQhLvKQDnzN1mp0nnkvAhR8VuMzNrpm1mpjgkoVwB/v8D
TgDQASA1MVpwzwAAAABJRU5ErkJggg==
</value>
</data>
<data name="ToolStripButton13.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIDSURBVDhPpZLrS5NhGMb3j4SWh0oRQVExD4gonkDpg4hG
YKxG6WBogkMZKgPNCEVJFBGdGETEvgwyO9DJE5syZw3PIlPEE9pgBCLZ5XvdMB8Ew8gXbl54nuf63dd9
0OGSnwCahxbPRNPAPMw9Xpg6ZmF46kZZ0xSKzJPIrhpDWsVnpBhGkKx3nAX8Pv7z1zg8OoY/cITdn4fw
bf/C0kYAN3Ma/w3gWfZL5kzTKBxjWyK2DftwI9tyMYCZKXbNHaD91bLYJrDXsYbrWfUKwJrPE9M2M1Oc
VzOOpHI7Jr376Hi9ogHqFIANO0/MmmmbmSmm9a8ze+I4MrNWAdjtoJgWcx+PSzg166yZZ8xM8XvXDix9
c4jIqFYAjoriBV9AhEPv1mH/sonogha0afbZMMZz+yreTGyhpusHwtNNCsA5U1zS4BLxzJIfg299qO32
Ir7UJtZfftyATqeT+8o2D8JSjQrAJblrncYL7ZJ2+bfaFnC/1S1NjL3diRat7qrO7wLRP3HjWsojBeCo
mDEo5mNjuweFGvjWg2EBhCbpkW78htSHHwRyNdmgAFzPEee2iFkzayy2OLXzT4gr6UdUnlXrullsxxQ+
kx0g8BTA3aZlButjSTyjODq/WcQcW/B/Je4OQhLvKQDnzN1mp0nnkvAhR8VuMzNrpm1mpjgkoVwB/v8D
TgDQASA1MVpwzwAAAABJRU5ErkJggg==
</value>
</data>
<metadata name="bs.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>91, 17</value>
</metadata>
<metadata name="DS1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<metadata name="code.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="bsw_ilsa.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>155, 17</value>
</metadata>
<metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>655, 17</value>
</metadata>
<data name="ToolStripButton9.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACBjSFJNAAB6
@@ -469,14 +496,14 @@
P0ilegWKIwMchCbSyQAAAABJRU5ErkJggg==
</value>
</data>
<metadata name="DataGridViewTextBoxColumn9.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="bsw_temp.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>178, 17</value>
<value>252, 17</value>
</metadata>
<metadata name="BindingNavigator4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value>
</metadata>
<metadata name="BindingNavigator4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value>
<value>811, 17</value>
</metadata>
<data name="ToolStripButton25.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
@@ -547,14 +574,14 @@
P0ilegWKIwMchCbSyQAAAABJRU5ErkJggg==
</value>
</data>
<metadata name="DataGridViewTextBoxColumn10.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="bsw_supdo.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>286, 17</value>
<value>360, 17</value>
</metadata>
<metadata name="BindingNavigator5.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>173, 56</value>
</metadata>
<metadata name="BindingNavigator5.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>173, 56</value>
<value>967, 17</value>
</metadata>
<data name="ToolStripButton33.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
@@ -625,14 +652,14 @@
P0ilegWKIwMchCbSyQAAAABJRU5ErkJggg==
</value>
</data>
<metadata name="DataGridViewTextBoxColumn11.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="bsw_cha.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>399, 17</value>
<value>473, 17</value>
</metadata>
<metadata name="BindingNavigator2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>514, 56</value>
</metadata>
<metadata name="BindingNavigator2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>514, 56</value>
<value>1241, 17</value>
</metadata>
<data name="ToolStripButton1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
@@ -703,43 +730,28 @@
P0ilegWKIwMchCbSyQAAAABJRU5ErkJggg==
</value>
</data>
<metadata name="bsWGDep3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1397, 17</value>
</metadata>
<metadata name="area2.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="dvc_area2.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="area3.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="bsWGDep2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value>
</metadata>
<metadata name="bsWGDep1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>131, 56</value>
</metadata>
<metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>396, 56</value>
<value>1123, 17</value>
</metadata>
<metadata name="code.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="bsw_ilsa.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>81, 17</value>
</metadata>
<metadata name="code.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="DataGridViewTextBoxColumn9.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="bsw_temp.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>178, 17</value>
</metadata>
<metadata name="DataGridViewTextBoxColumn9.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="DataGridViewTextBoxColumn10.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="bsw_supdo.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>286, 17</value>
</metadata>
<metadata name="DataGridViewTextBoxColumn10.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="DataGridViewTextBoxColumn11.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="bsw_cha.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>399, 17</value>
</metadata>
<metadata name="DataGridViewTextBoxColumn11.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<metadata name="Column1.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">

248
ArinWarev1/Forms_Input/Frm_v20091231_Weather.vb
View File

@@ -74,12 +74,23 @@
AddHandler DSET1.weather_supdo.TableNewRow, AddressOf AddNewDataRow_Weathersupdo
AddHandler DSET1.weather_cha.TableNewRow, AddressOf AddNewDataRow_WeatherCha
AddHandler DSET1.weather_group.TableNewRow, AddressOf AddNewDataRow_WeatherGrp
AddHandler dvArea1.CellContentClick, AddressOf dv_cellcontclick
AddHandler dvArea2.CellContentClick, AddressOf dv_cellcontclick
AddHandler dvArea3.CellContentClick, AddressOf dv_cellcontclick
Me.bs.DataSource = DSET1
Me.bsw_ilsa.DataSource = DSET1
Me.bsw_supdo.DataSource = DSET1
Me.bsw_temp.DataSource = DSET1
Me.bsw_cha.DataSource = DSET1
Me.bsWGDep1.DataSource = DSET1
Me.bsWGDep2.DataSource = DSET1
Me.bsWGDep3.DataSource = DSET1
'//콤보컨트롤 바인딩
Me.bn_all.BindingSource = Me.bs
Me.bs = Me.bs
@@ -92,7 +103,21 @@
AddDebug("▲ Form Load")
End Sub
Sub dv_cellcontclick(sender As Object, e As DataGridViewCellEventArgs)
Dim grid As DataGridView = sender
If grid.Columns(e.ColumnIndex).DataPropertyName <> "area" Then Return
Dim f As New fSelectArea()
If f.ShowDialog <> DialogResult.OK Then Return
grid.Rows(e.RowIndex).Cells(e.ColumnIndex).Value = f.ComboBox1.Text.ToString()
End Sub
#Region "Weather 관련"
Private Sub AddNewDataRow_WeatherGrp(ByVal sender As Object, ByVal e As System.Data.DataTableNewRowEventArgs)
End Sub
Private Sub AddNewDataRow_Weather(ByVal sender As Object, ByVal e As System.Data.DataTableNewRowEventArgs)
e.Row.Item("code") = GetMaxCode(DSET1.tbl_weather)
End Sub
@@ -146,11 +171,11 @@
If Not EndEdit(Me.bsw_ilsa) Then Return
If Not EndEdit(Me.bsw_temp) Then Return
If Not EndEdit(Me.bsw_cha) Then Return
Check_Modify(Me.DS.tbl_weather)
Check_Modify(Me.DS.weather_ilsa, False)
Check_Modify(Me.DS.weather_supdo, False)
Check_Modify(Me.DS.weather_temp, False)
Check_Modify(Me.DS.weather_cha, False)
Check_Modify(Me.DS1.tbl_weather)
Check_Modify(Me.DS1.weather_ilsa, False)
Check_Modify(Me.DS1.weather_supdo, False)
Check_Modify(Me.DS1.weather_temp, False)
Check_Modify(Me.DS1.weather_cha, False)
End Sub
@@ -185,8 +210,8 @@
Else
'MsgBox(Me.bsw_supdo.Count)
End If
Me.DS.weather_temp.AcceptChanges()
Me.DS.weather_supdo.AcceptChanges()
Me.DS1.weather_temp.AcceptChanges()
Me.DS1.weather_supdo.AcceptChanges()
End Sub
@@ -689,7 +714,7 @@
'For j As Integer = 1 To DSET1.weather_cha.Select(Me.bsw_cha.Filter).Length
' DSET1.weather_cha.Select(Me.bsw_cha.Filter)(j - 1)("code") = Format(j, "0000")
'Next
DS.weather_cha.AcceptChanges() '//이건 변경내역을 반영하게삳는겁니다.
DS1.weather_cha.AcceptChanges() '//이건 변경내역을 반영하게삳는겁니다.
End Sub
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
@@ -985,4 +1010,211 @@
End Sub
Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
'//delete 1dep
'//하위모든데이터를 삭제해야한다.
Dim drv As DataRowView = Me.bsWGDep1.Current
If drv Is Nothing OrElse drv("code").ToString().Length < 6 Then Return
Dim codeHeader As String = drv("code").ToString().Substring(0, 2)
Dim drows() As DataRow = DSET1.weather_group.Select(String.Format("code like '{0}%'", codeHeader))
For i As Integer = drows.Length To 1 Step -1
DSET1.weather_group.Rows.Remove(drows(i - 1))
Next
End Sub
Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click
'//add 2
'//1번이 선택되지 않앗다면 넘어간다.
Dim drv1 As DataRowView = Me.bsWGDep1.Current
If drv1 Is Nothing OrElse drv1("code").ToString().Length < 6 Then Return
Dim codeHeader As String = drv1("code").ToString().Substring(0, 2)
Dim newcode As String = String.Empty
For i As Integer = 1 To 99
Dim ccode As String = codeHeader + i.ToString("00") + "00"
'//이 코드가 현재 없다면 적용한다.
If DSET1.weather_group.Select("code='" + ccode + "'").Length < 1 Then
newcode = ccode
Exit For
End If
Next
If String.IsNullOrEmpty(newcode) Then
MsgBox("신규번호를 할당 하지 못했습니다", MsgBoxStyle.Critical, "확인")
Return
End If
Dim newdr As DS.weather_groupRow = DSET1.weather_group.Newweather_groupRow
newdr.code = newcode
newdr.name = "<지역명>"
DSET1.weather_group.Addweather_groupRow(newdr)
End Sub
Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
'//delete 2dep
'//하위모든데이터를 삭제해야한다.
Dim drv As DataRowView = Me.bsWGDep2.Current
If drv Is Nothing OrElse drv("code").ToString().Length < 6 Then Return
Dim codeHeader As String = drv("code").ToString().Substring(0, 4)
Dim drows() As DataRow = DSET1.weather_group.Select(String.Format("code like '{0}%'", codeHeader))
For i As Integer = drows.Length To 1 Step -1
DSET1.weather_group.Rows.Remove(drows(i - 1))
Next
End Sub
Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
'/add 3
'//2번이 선택되지 않앗다면 넘어간다.
Dim drv1 As DataRowView = Me.bsWGDep2.Current
If drv1 Is Nothing OrElse drv1("code").ToString().Length < 6 Then Return
Dim codeHeader As String = drv1("code").ToString().Substring(0, 4)
Dim newcode As String = String.Empty
For i As Integer = 1 To 99
Dim ccode As String = codeHeader + i.ToString("00")
'//이 코드가 현재 없다면 적용한다.
If DSET1.weather_group.Select("code='" + ccode + "'").Length < 1 Then
newcode = ccode
Exit For
End If
Next
If String.IsNullOrEmpty(newcode) Then
MsgBox("신규번호를 할당 하지 못했습니다", MsgBoxStyle.Critical, "확인")
Return
End If
Dim newdr As DS.weather_groupRow = DSET1.weather_group.Newweather_groupRow
newdr.code = newcode
newdr.name = "<지역명>"
DSET1.weather_group.Addweather_groupRow(newdr)
End Sub
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
'//delete 3dep
Dim drv As DataRowView = Me.bsWGDep3.Current
If drv Is Nothing OrElse drv("code").ToString().Length < 6 Then Return
Dim codeHeader As String = drv("code").ToString().Substring(0, 6)
Dim drows() As DataRow = DSET1.weather_group.Select(String.Format("code like '{0}%'", codeHeader))
For i As Integer = drows.Length To 1 Step -1
DSET1.weather_group.Rows.Remove(drows(i - 1))
Next
End Sub
Private Sub dvArea1_DataError(sender As System.Object, e As System.Windows.Forms.DataGridViewDataErrorEventArgs) Handles dvArea1.DataError
End Sub
Private Sub dvArea2_DataError(sender As System.Object, e As System.Windows.Forms.DataGridViewDataErrorEventArgs) Handles dvArea2.DataError
End Sub
Private Sub dvArea3_DataError(sender As System.Object, e As System.Windows.Forms.DataGridViewDataErrorEventArgs) Handles dvArea3.DataError
End Sub
Private Sub Button10_Click(sender As Object, e As EventArgs)
Dim sd As New SaveFileDialog()
If sd.ShowDialog() = DialogResult.OK Then
DSET1.weather_group.WriteXml(sd.FileName)
End If
End Sub
Private Sub Button9_Click(sender As Object, e As EventArgs)
Dim sd As New OpenFileDialog()
If sd.ShowDialog() = DialogResult.OK Then
DSET1.weather_group.Clear()
DSET1.weather_group.ReadXml(sd.FileName)
DSET1.weather_group.AcceptChanges()
End If
End Sub
Private Sub bsWGDep1_CurrentChanged(sender As Object, e As EventArgs) Handles bsWGDep1.CurrentChanged
'//select 1 depth
Dim drv As DataRowView = Me.bsWGDep1.Current
If drv Is Nothing OrElse drv("code").ToString().Length < 6 Then
bsWGDep2.Filter = "code='test'"
Else
Dim codeHeader As String = drv("code").ToString().Substring(0, 2)
bsWGDep2.Filter = String.Format("code like '{0}%' and code not like '%0000' and code like '%00'", codeHeader)
End If
End Sub
Private Sub bsWGDep2_CurrentChanged(sender As Object, e As EventArgs) Handles bsWGDep2.CurrentChanged
'//select 2 depth
Dim drv As DataRowView = Me.bsWGDep2.Current
If drv Is Nothing OrElse drv("code").ToString().Length < 6 Then
bsWGDep3.Filter = "code='test'"
Else
Dim codeHeader As String = drv("code").ToString().Substring(0, 4)
bsWGDep3.Filter = String.Format("code like '{0}%' and code not like '%00'", codeHeader)
End If
End Sub
Private Sub bsWGDep3_CurrentChanged(sender As Object, e As EventArgs) Handles bsWGDep3.CurrentChanged
End Sub
Private Sub ToolStripButton8_Click(sender As Object, e As EventArgs) Handles ToolStripButton8.Click
Dim sd As New FolderBrowserDialog()
If sd.ShowDialog() = DialogResult.OK Then
'Eco2는 바로 내보내기하면 된다
'DSET1.weather_cha.Clear()
'DSET1.weather_ilsa.Clear()
'DSET1.weather_supdo.Clear()
'DSET1.weather_temp.Clear()
'DSET1.weather_cha.Merge(DSET1.weather_cha_od)
'DSET1.weather_ilsa.Merge(DSET1.weather_ilsa)
'DSET1.weather_supdo.Merge(DSET1.weather_supdo)
'DSET1.weather_temp.Merge(DSET1.weather_temp)
'모든파일을 저장한다.
DSET1.weather_cha.WriteXml(System.IO.Path.Combine(sd.SelectedPath, DSET1.weather_cha.TableName + ".xml"))
DSET1.weather_ilsa.WriteXml(System.IO.Path.Combine(sd.SelectedPath, DSET1.weather_ilsa.TableName + ".xml"))
DSET1.weather_supdo.WriteXml(System.IO.Path.Combine(sd.SelectedPath, DSET1.weather_supdo.TableName + ".xml"))
DSET1.weather_temp.WriteXml(System.IO.Path.Combine(sd.SelectedPath, DSET1.weather_temp.TableName + ".xml"))
DSET1.tbl_weather.WriteXml(System.IO.Path.Combine(sd.SelectedPath, DSET1.tbl_weather.TableName + ".xml"))
DSET1.weather_group.WriteXml(System.IO.Path.Combine(sd.SelectedPath, DSET1.weather_cha.TableName + ".xml"))
End If
End Sub
Private Sub ToolStripButton13_Click(sender As Object, e As EventArgs) Handles ToolStripButton13.Click
Dim sd As New FolderBrowserDialog()
If sd.ShowDialog() = DialogResult.OK Then
DSET1.weather_cha.Clear()
DSET1.weather_ilsa.Clear()
DSET1.weather_supdo.Clear()
DSET1.weather_temp.Clear()
DSET1.weather_group.Clear()
DSET1.tbl_weather.Clear()
DSET1.weather_cha.ReadXml(System.IO.Path.Combine(sd.SelectedPath, DSET1.weather_cha.TableName + ".xml"))
DSET1.weather_ilsa.ReadXml(System.IO.Path.Combine(sd.SelectedPath, DSET1.weather_ilsa.TableName + ".xml"))
DSET1.weather_supdo.ReadXml(System.IO.Path.Combine(sd.SelectedPath, DSET1.weather_supdo.TableName + ".xml"))
DSET1.weather_temp.ReadXml(System.IO.Path.Combine(sd.SelectedPath, DSET1.weather_temp.TableName + ".xml"))
DSET1.tbl_weather.ReadXml(System.IO.Path.Combine(sd.SelectedPath, DSET1.tbl_weather.TableName + ".xml"))
DSET1.weather_group.ReadXml(System.IO.Path.Combine(sd.SelectedPath, DSET1.weather_group.TableName + ".xml"))
'//od는 od 데이터에 다시 옴겨야한다
DSET1.weather_cha.AcceptChanges()
DSET1.weather_ilsa.AcceptChanges()
DSET1.weather_supdo.AcceptChanges()
DSET1.weather_temp.AcceptChanges()
DSET1.tbl_weather.AcceptChanges()
DSET1.weather_group.AcceptChanges()
End If
End Sub
End Class

11
ArinWarev1/Module/Pub.vb
View File

@@ -482,6 +482,7 @@
DSET1.weather_ilsa.Clear()
DSET1.weather_temp.Clear()
DSET1.weather_supdo.Clear()
DSET1.weather_group.Clear()
DSET1.AcceptChanges()
DSET2.tbl_weather.Clear()
@@ -489,6 +490,7 @@
DSET2.weather_ilsa.Clear()
DSET2.weather_temp.Clear()
DSET2.weather_supdo.Clear()
DSET2.weather_group.Clear()
DSET2.AcceptChanges()
Try
@@ -531,7 +533,14 @@
MsgBox("기상데이터4 업데이트실패" & vbCrLf & ex.Message.ToString, MsgBoxStyle.Critical, "확인")
Iserror = True
End Try
Try
Dim TaC As New DSTableAdapters.weather_groupTableAdapter
TaC.Fill(DSET1.weather_group)
TaC.Fill(DSET2.weather_group)
Catch ex As Exception
MsgBox("기상데이터(GRP) 업데이트실패" & vbCrLf & ex.Message.ToString, MsgBoxStyle.Critical, "확인")
Iserror = True
End Try
If Iserror = False Then
DSET1.tbl_Desc.Rows(0)("versionw") = Version
'DSET2.tbl_Desc.Rows(0)("versionw") = Version