View source for Litigation Form

<pre>Code on inpClient button changed to properly display name of problem code.
7350                  If mys.EOF Then
7360                      mys.Close
7370                      Set mys = Nothing
7380                      Set mydb = Nothing
7390                      DoCmd.OpenForm "inpLitigation", , , , A_ADD
7400                      Forms![inpLitigation]![CASENUM] = Me![CASENUM]
                          'Forms![inpLitigation]![Label113].Caption = Me![PCodef].Form![PNAME]
7410                      Forms![inpLitigation]![Label113].Caption = Me![subPname]
7420                  Else
7430                      mys.Close
7440                      Set mys = Nothing
7450                      Set mydb = Nothing
7460                      mstrCrit = "Casenum = '" & MstrFCase & "'"
7470                      DoCmd.OpenForm "inpLitigation", , , mstrCrit
7480                      'Forms![inpLitigation]![Label113].Caption = Me![PCodef].Form![PNAME]
                          Forms![inpLitigation]![Label113].Caption = Me![subPname]
</pre>
Litigation Sheet Changed

1.	Court Automatically Selected as the first blank one

2.	‘Room 1’ changed to ‘Court 1 Room #:’ (for 1, 2, and 3)

3.	Field order slightly adjusted.

4.	Field caption changed from 

End 1:   to

Date Ended 1:  (for 1, 2, and 3)

5.	Tab Order of fields adjusted

[[File:Litigation1.png|thumb|none]]