5.1 NetCOBOL for.net 5.2 ADO.NET 5.3 SQL 5.4 READ/WRITE 5.5 5.6 SQL CLR 125
NetCOBOL for.netread/write SQL.NET FrameworkADO.NET 3 Windows NetCOBOL (Oracle Pro*COBOL) READ/WRITE Btrieve Pervasive PowerRDBconnector PowerRW+ SQL Server SQL(ODBC) SQL Oracle Symfoware ADO.NET Access XML 126
ADO.NET.NET Framework XML NetCOBOL for.net ADO.NET COBOL.NET FrameworkADO.NET WindowsODBC NetCOBOL for.netsql ADO.NETODBC SQLWindows NetCOBOL COBOLREAD/WRITE ()NetCOBOL for.net READ/WRITE PowerRW+()Btrieve PowerRDBconnectorSQL ServerOracle 127
ADO.NET.NET Framework ADO.NET ADO.NETWindowsWeb () WebWeb(SOAP).NET Framework.NET Framework ADO.NET Command Connection DataSet DataReader DataAdapter XML 128
ADO.NET.NET Framework (DataSet) WebWeb.NET Framework.NET Framework DataSet DataSet DataSet.NET FrameworkDataSet ADO.NETXML NetCOBOL for.netado.netsql ADO.NET SQL5.3 SQL ADO.NET ADO.NETCOBOL COBOL Visual Studio VBNetCOBOL for.netado.net (DataSet)VB READ/WRITESQLADO.NET 129
.NET Framework.NetCOBOL for.net COBOL READ/WRITE ADO.NET DataSet DataSet DataSet ADO.NET VB.NET Web WebVB COBOLNetCOBOL for.netweb DataSetDataSetWeb Web.NET Framework 4.NET Framework Oracle.NET Framework 130
Windows.NET Framework ADO.NET.NET Framework Data Provider for SQL Server SQL Server for OLE DB OLE DB OLE DB for ODBC ODBC ODBC for Oracle Oracle Client Oracle ODP.NET Microsoft SQL Server V7.0.NET Framework Data ProviderSQL Server SQL Server.NET Framework Data Provider for OLE DB.NET Framework Data Provider for ODBC OLE DBODBC Driver () COMOLE DB.NET FrameworkADO.NET ADO(ActiveX Data Object) ADOOLE DB OLE DBOLE DB OLE DB.NET Framework 131
Data Provider for OLE DB SQL Server 6.5.NET Framework Data Provider for SQL ServerOLE DB Windows ODBCODBC.NET Framework Data Provider for ODBC ODBC WindowsSolarisLinux Oracle Oracle Client(Oracle Net)Oracle Client R8.1.7Oracle Client ODBC Oracle.NET FrameworkOracle ADO.NETOracleOracle Data Provider for.netsql.net Framework.NET Framework.NET Framework ().NET FrameworkConnectionCommand DataReaderDataAdapter4 132
Connection Connection ()Open CloseDispose SQL(Transact-SQL ) SQL(SELECT)ExecuteReader SQL(INSERTDELETEUPDATE)ExecuteNonQuery ExecuteReaderDataReader DataReaderCommand ExecuteReader Read Get (GetStringGetInt32) (GetSQLInt32GetOracleNumber) DataSetDataSet DataSetFillDataSet Update 133
.NET Framework Data Provider for SQL Server SQL Server(STOCK)DataSet.NET Framework 1.Connection SQL Server.NET Framework Data provider for SQL Server Connection 2. SQL Server.NET Framework Data provider for SQL Server Connection 3.DataAdapter SQL Server.NET Framework Data provider for SQL Server Connection DataAdapter 4.DataSet SQL Server.NET Framework Data provider for SQL Server Connection DataAdapter DataSet 5.DataSet SQL Server 6. SQL Server.NET Framework Data provider for SQL Server Connection DataAdapter.NET Framework Data provider for SQL Server Connection DataAdapter DataSet DataTable DataSet DataTable 1. Connection ConnectionNewConnection Connection ConnectionString 2. ConnectionOpen OpenDataAdapterFill 134
3. DataAdapter DataAdapterNewDataAdapter SQL Connection DataAdapterCommand SelectCommand 4. DataSet DataSetNewDataSet DataSet 5. DataAdapterFillSQL ServerDataSet 6. OpenConnection Close 135
DataSetADO.NET.NET Framework DataSet () DataSet 5.2.5 136
.NET Framework Data provider for SQL Server SqlDataAdapter SQL Server NetCOBOL for.net DataSet.NET Framework Data provider for OLE DB OleDbDataAdapter.NET Framework Data provider for ODBC OdbcDataAdapter OLE DB ODBC.NET Framework Data provider for Oracle OracleDataAdapter Oracle Oracle Data Provider for.net OracleDataAdapter DataSet Microsoft ExcelDataSet 5.2.6 (3.1.3 ) 137
DataTableCollection DataSet DataTable DataRow DataRow DataRow DataRowCollection DataRow DataColumn DataColumn DataColumn DataColumn DataColumn DataColumnCollection DataSetDataSet DataSet DataTableCollectionDataSetDataTable DataSet.TablesDataTableCollection DataTableDataTable.NET FrameworkDataAdapter DataTableDataColumnDataRow 138
DataColumnDataTableDataTable DataColumnCollectionDataColumn DataColumnCollection DataTable.Columns DataRowDataTableDataTable DataRow 5.2.5.NET Framework DataSet DataSet(tmpDS) DataTableCollection(tmpTables) Count:DataTable DataTabletmpTable = tmptables(0)) PNO PNAME DataRow (tmprow = tmprows(0)) DataRow (tmprow = tmprows(1)) DataRow (tmprow = tmprows(2)) DataRow (tmprow = tmprows(3)) DataRowCollection(tmpRows) Count:DataRow DataSetDataTableCollection DataTableDataRowCollectionDataRow 139
140
141
COBOL (SQL) NetCOBOL for.net.net Framework NetCOBOL for.net ADO.NET.NET Framework OLEDB ODBC SQL Server Oracle OLE DB ODBC SQL.NET Framework 5.3.1 ODBC 5.3.1.NET Framework.NET Framework.NET Framework COBOL COBOLSQL (EXEC SQL)SQL(END-EXEC) 142
(1) (2) (3) (4) (5) SQL.NET Framework 143
COBOLSQLSQL SQL () SQL CONNECT SET CONNECTION DISCONNECT () SELECTINSERTUPDATE DELETESQL FETCH SQL(SQL) SQLNetCOBOL for.netsql SQL SQL NetCOBOL for.net SQL / NetCOBOL for.netcall SQL Server 2005COBOL 5.6 SQL CLR 144
SQL COMMITROLLBACK NetCOBOL for.netsqlsql @SQL_COMMIT_MODEMANUAL SQL SQLSQL() SQL SQL SQL SQL SQL 145
READ/WRITE (COBOL) = COBOL Btrieve Pervasive NetCOBOL for.net =,BTRV SELECT ASSIGN =,RDM PowerRW+ PowerRDBconnector SQL Server PowerRW+ SQL Server COBOL PowerRDBconnector Oracle Oracle READ/WRITECOBOL (FILE-CONTROL)SELECTASSIGN COBOL READ/WRITE 146
,BTRVBtrieve SEPARATE1088 ( ) PowerRW+ RDM,RDM PowerRW+ PowerRW+COBOLREAD/WRITE COBOL PowerRW+ ASP.NET(Web) PowerRDBconnector,RDMSQL ServerOracle (PowerRDBconnector SQL ServerOracle) PowerRDBconnector DBIO_ENV COBOL PowerRDBconnector 147
148
5.5SQL SQL Server ADO.NETSQL Server 5.6 SQL CLR SQL Server NetCOBOL for.net (SQL) () (SQL) ADO.NET (SQL) NetCOBOL for.net ().NET Framework Windows (SQL Server) 7Web 149
StockLibrary.cobproj SYAIN.COB SYOHIN.COB ZAIKO.COB IODETAIL.CBL MSGTBL.CBL COBOL COBOL StockLibrary.n COBOL COBOL COBOL COBOL TestSYAIN.COB SYAIN.COB TestSYAIN..cobproj TestSYAIN.sln TestSYIHIN..cobproj TestSYOHINN.sln TestZAIKO..cobproj TestZAIKO.sln COBOL TestSYOHIN.COB SYAIN.COB COBOL TestSYAIN.exe.config TestSYOHIN.exe.config TestZAIKO.COB SYAIN.COB COBOL TestSZAIKO.exe.config COBOL IODETAIL.CBL SQL 3 150
SYAIN.COB () SYOHIN.COB () ZAIKO.COB 1(10) 151
() (cobdb.sql)sampledata setupcobdb.batsql Server setupcobdb.batsql Server 2005/2008 Express COBOL SQLCOBOL / 152
1 NetCOBOL for.net[][]- [] 2 [][ ][COBOL][] [] StockLibrary[OK] Class1.cob Class1.cob 3 [StockLibrary] [][StockLibrary] [][]-[ ] 153
(SYAIN.COBSYOHIN.COBZAIKO.COB) 2 [][] SYAIN.cob StockLibrary [] [ ]-[] SYAIN.cob SYOHIN.cob ZAIKO.cob 3 3 SYAIN.COB SYOHIN.COB ZAIKO.COB 154
SYAIN.COB () 155
156
SYOHIN.COB () 157
ZAIKO.COB () 158
159
160
161
162
163
164
2 1 2 IODETAIL.CBL MSGTBL.CBL [StockLibrary][ ][]-[] [] IODETAIL.CBL 165
MSGTBL.CBL (StockLibrary) 3 12(StockLibrary) 3 TestSYAIN.cob(TestSYAIN.cobproj) TestSYOHIN(TestSYOHIN.cobproj) TestZAIKO(TestZAIKO.cobproj) 166
2[2.4.3 ] TestSYAIN.cob TestSYOHIN.COB 167
TestZAIKO.cob 168
4 3 2(StockLibrary) [] [] []-[][] StockLibrary.cobproj (StockLibrary) [] (TextSYOHIN.cobproj)[ ][] 169
2 [] [StockLibrary] TestSYAIN [] [] [StockLibrary] 3 (StockLibrary) [COBOL ] GUI (.config) 1 connectionstrings LocalSqlServer [] 170
cobdb [ ]. SQLEXPRESS cobdb [][SQL] [@SQL_DATASRC]cobdb [] App.config 171
(TestSYAINTestSYOHINTestZAIKO) (StockLibrary) TestSYAIN 172
TestSYOHIN TestZAIKO 173
SQL Server Transact-SQL SQL CLR.NET Framework(CLR) SQL Server 2005 ( ).NET Framework COBOL SQL Server SQL CLRADO.NETSQL Server 2005 174
NetCOBOLSQL SQL CLRSQL 5.5 (SYAIN.COB) NetCOBOL for.net () (SQL) (SQL) (SQL) NetCOBOL for.net ().NET Framework Windows ADO.NET SQL Server SQL Server 175
StockProcedure.sln StockProcedure.cobproj COBOL SP_SYAIN.COB COBOL Test.sql TestSYAIN2.sln TestSYAIN2.cobproj COBOL TestSYAIN2.COB TestSYAIN2.exe.config SYAIN2.COB StockLibrary.n StockLibrary.cobproj COBOL COBOL SYAIN.COB COBOL SYAIN2.COB SYOHIN.COB ZAIKO.COB COBOL COBOL COBOL COBOL IODETAIL.CBL MSGTBL.CBL 5.5[StockLibrary] COBOL(SYAIN2.cob) 5.5.2 cobdb.sqlsetupcobdb.bat SQL Server SQL CLRNetCOBOL (Fujitsu.COBOL.dll) cobdb.sql NetCOBOL 176
SQL Server COBOL SQLCOBOL SQL Server SQL CLR 1 NetCOBOL for.net[][]- [] 2 [] [COBOL]-[Database] [SQL Server] StockProcedures[OK] 177
3 [][ ][ ] [OK][ ][] [] [] 178
. SQLEXPRESS cobdb SQL CLR[] 4 [StockProcedure] [StockProcedure][ ][]-[] [] [] SP_SYAIN.cob[OK][ ]SP_SYAIN.cob 179
5.5.4 SQL(SYAIN.cob) SP_SYAIN.COB 180
SP_SYAIN.COB () 181
SQL Server SQL Server StockProcedures[] 182
COBOL 1 Test.sql SQL [Test.sql]SQL exec SP_SYAIN 200007,N 200007 [Test Scripts] [Test.sql] 2 SP_SYAIN.cob 183
3 Windows COBOL 1 COBOLSP_SYAIN 5.5SYAIN.cob [StockLibrary] SYAIN2.COB 184
SYAIN2.COB 185
2 1(SYAIN2.cob) 5.5.4 [TestSYAIN] TESTSYAIN2.cob 186
TESTSYAIN2.COB 3 2[StockLibrary] 5.5.55.5.6 TestSYAIN2 187
TestSYAIN2 188