SQLServer2005 ReportingService テーブセル結合

★SQLServer2005　ReportingService

テーブルのセル結合
列列結合のみ。行結合はできない。

MSDNライブラリ
http://msdn.microsoft.com/ja-jp/library/ms159169%28SQL.90%29.aspx

SQLServer2008はできるようです

phpリンク

■スタティックメンバ／クラス定数
http://www.shigeweb.jp/php/project_p/?page=static&section=php5oop

■global,$GLOBAL配列
http://nyx.pu1.net/reference/variable/global.html

日付変換（yyyymmdd→yyyy/m(m)/d(d))

'-----------------------------------------------------------------------
' Function outline : 日付変換（yyyymmdd→yyyy/m(m)/d(d))
'
' argument ： 変換対象日付
'
' return value ： 変換日付
'-----------------------------------------------------------------------
Public Shared Function ConvertYYYYMD(ByVal strYmd As String) As String

Dim strConvYmd As String = ""

strYmd = strYmd.Trim(CChar(" "))

If Not strYmd.Equals("") Then
Dim strYmdWk As String = strYmd.Substring(0, 4) & "/" & strYmd.Substring(4, 2) & "/" & strYmd.Substring(6, 2)
strConvYmd = CDate(strYmdWk).ToString("yyyy/M/d", System.Globalization.CultureInfo.CreateSpecificCulture("en-US"))
End If

Return strConvYmd

End Function

ReportingService改頁

参考ページ

改頁を追加する方法
http://msdn.microsoft.com/ja-jp/library/ms156434.aspx

テーブル行をグループ化する方法
http://msdn.microsoft.com/ja-jp/library/bb677372.aspx

取得データ分サブレポートを呼び出す方法

サブレポートをテーブルまたはマトリックスの動的列または動的行に追加することもできます。
メイン レポートを処理するとき、各行のサブレポートが処理されます。

テーブルまたはマトリックスを作成し、サブレポートを追加し設定すればＯＫ。



参考ページ
http://technet.microsoft.com/ja-jp/library/ms160348.aspx



追記
一覧を利用すれば1レポートでできるとわかりました。
一覧の上にテキストボックス等のレポートアイテムを配置、一覧のプロパティの全般タブで「グループの詳細を編集」を選択。
データセットで取得したレコードが一意をなるグループ化の条件を設定し、「末尾で改ページする」にチェック

これでデータセットで取得した結果分ページが作成されます

Excel出力でエラー「テーブルまたはマトリックスのセル内にあるサブレポートは無視されます。」

Reporting Service（SqlServer2005)で作成した帳票をEXCEL出力すると、
「テーブルまたはマトリックスのセル内にあるサブレポートは無視されます。」とエクセル内でエラーが表示された。

☆Reporting Serviceで実装内容
テーブルにサブレポートを追加し、データセットで取得したデータ分サブレポートをネストして呼び出し。

☆原因
SqlServer2005の仕様のため。
「テーブルまたはマトリックス データ領域内で入れ子になったデータ領域は、サポートされません。このようなレイアウトが検出された場合、Excel ではエラーが表示されます。」
複数レコード分の帳票を作成するためには、テーブル内にサブレポートをおき、取得データ分ネストして、サブレポート（実際出力する帳票フォーマット）を呼び出しているため、帳票の作成はできるがエクセルを出力するとエラーとなる。
SqlServer2005ではサポートされていない。2008からサポートされている。

☆参考ページ
http://msdn.microsoft.com/ja-jp/library/ms155976%28v=SQL.90%29.aspx
「メモ」参照
http://msdn.microsoft.com/ja-jp/library/ms143200.aspx
「Excel の入れ子になったサブレポートとデータ領域」について参照

sqlserverでoracleのrownumと同じ機能の実装

以下のように書けばsqlserverでもoracleのrownumと同じことができる

---

select
row_number() over(order by col1) as no,
col1,
col2,
col3
from table1

---

※ただし、SQL Server 2005～

Cursor_Status

カーソルがOpenしていたらclose

IF Cursor_Status('local', 'カーソル名') >= 0
BEGIN
CLOSE 'カーソル名'
DEALLOCATE 'カーソル名'
END

ステータス一覧



Microsoftページ
http://msdn.microsoft.com/ja-jp/library/ms177609.aspx

遷移元ＰＧの判定

If (InStr(LCase(Me.Request.ServerVariables("HTTP_REFERER")), "Form1.aspx") > 0) Then
　"Form1.aspx"から遷移
Else
"Form1.aspx"以外から遷移
End IF

コントロールにjavascriptを組み込む

DropDownListにjavascript:OnChangeを組み込む

DropDownListでvalue=0の行が選択された場合に、削除確認ダイアログメッセージを出力する

---

DropDownList.Attributes("onChange") = _
"javascript:if(this.value=='0'){if(!confirm('削除してもよろしいでしょうか')){return this.options.selectedIndex=1;}}"

---

GridViewのCommandButtonにjavascript:OnClickを組み込む

---

Protected Sub grv_RowDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles grv.RowDataBound

Dim lnkBtn1 As LinkButton = DirectCast(DirectCast(e.Row.Cells(0).Controls(2), System.Web.UI.Control), LinkButton)
If String.Equals(lnkBtn1.Text, "Delete") Then
lnkBtn1.Attributes("OnClick") = "return confirm('削除してもよろしいでしょうか')"[
End If
End Sub

---