uvadgdaservice.dfm

Software Requirements1. Delphi 6 SP22. Oracle 8i R33. Raize 3.0.94. ExpressQuantumGrid 4.505. Expres

inherited VADGDAService: TVADGDAService
  Width = 487
  inherited RzPanel1: TRzPanel
    Width = 487
    inherited RzBackground1: TRzBackground
      Width = 487
    end
    inherited RzPanel2: TRzPanel
      Width = 487
      inherited Grid: TcxGrid
        Width = 487
        inherited GridDBTableView: TcxGridDBTableView
          DataController.Filter.Criteria = {FFFFFFFF0000000000}
          object GridDBTableViewServiceSelect: TcxGridDBColumn
            Caption = #26381#21153#39033#30446#36873#25321
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'SERVICEID'
            Properties.ListColumns = <
              item
                FieldName = 'SERVICEID'
              end>
            Properties.ListSource = ServiceId
            Properties.OnPopup = GridDBTableViewDBColumn1PropertiesPopup
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 80
            DataBinding.FieldName = 'SERVICEID'
          end
          object GridDBTableViewSERVICEID: TcxGridDBColumn
            Caption = #26381#21153#39033#30446#21517#31216
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'SERVICEID'
            Properties.ListColumns = <
              item
                FieldName = 'CAPTION'
              end>
            Properties.ListSource = ServiceId
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Options.Editing = False
            SortOrder = soAscending
            Width = 80
            DataBinding.FieldName = 'SERVICEID'
          end
          object GridDBTableViewServiceCharge: TcxGridDBColumn
            Caption = #21333#20215
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'SERVICEID'
            Properties.ListColumns = <
              item
                FieldName = 'CHARGE'
              end>
            Properties.ListSource = ServiceId
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Options.Editing = False
            Width = 80
            DataBinding.FieldName = 'SERVICEID'
          end
          object GridDBTableViewServiceCode: TcxGridDBColumn
            Caption = #26381#21153#39033#30446#32534#30721
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'SERVICEID'
            Properties.ListColumns = <
              item
                FieldName = 'CODE'
              end>
            Properties.ListSource = ServiceId
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Options.Editing = False
            Width = 80
            DataBinding.FieldName = 'SERVICEID'
          end
          object GridDBTableViewServiceCatalog: TcxGridDBColumn
            Caption = #26381#21153#39033#30446#20998#31867
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'SERVICEID'
            Properties.ListColumns = <
              item
                FieldName = 'SERVICECATALOG'
              end>
            Properties.ListSource = ServiceId
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Options.Editing = False
            Width = 80
            DataBinding.FieldName = 'SERVICEID'
          end
          object GridDBTableViewDASERVICEID: TcxGridDBColumn
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 80
            DataBinding.FieldName = 'DASERVICEID'
          end
          object GridDBTableViewDAYTIMES: TcxGridDBColumn
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 80
            DataBinding.FieldName = 'DAYTIMES'
          end
          object GridDBTableViewISTEMPORARY: TcxGridDBColumn
            PropertiesClassName = 'TcxCheckBoxProperties'
            Properties.DisplayUnchecked = 'False'
            Properties.ValueChecked = 1
            Properties.ValueUnchecked = 0
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 80
            DataBinding.FieldName = 'ISTEMPORARY'
          end
          object GridDBTableViewISACTIVE: TcxGridDBColumn
            Caption = #26159#21542#20572#29992
            PropertiesClassName = 'TcxCheckBoxProperties'
            Properties.DisplayUnchecked = 'False'
            Properties.ValueChecked = 1
            Properties.ValueUnchecked = 0
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 80
            DataBinding.FieldName = 'ISACTIVE'
          end
          object GridDBTableViewSTOPDATE: TcxGridDBColumn
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 80
            DataBinding.FieldName = 'STOPDATE'
          end
          object GridDBTableViewEXECUTED: TcxGridDBColumn
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 80
            DataBinding.FieldName = 'EXECUTED'
          end
          object GridDBTableViewISVALID: TcxGridDBColumn
            PropertiesClassName = 'TcxCheckBoxProperties'
            Properties.DisplayUnchecked = 'False'
            Properties.ValueChecked = 1
            Properties.ValueUnchecked = 0
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 80
            DataBinding.FieldName = 'ISVALID'
          end
          object GridDBTableViewCREATED: TcxGridDBColumn
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 80
            DataBinding.FieldName = 'CREATED'
          end
          object GridDBTableViewUPDATED: TcxGridDBColumn
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 80
            DataBinding.FieldName = 'UPDATED'
          end
          object GridDBTableViewINPATIENTID: TcxGridDBColumn
            Visible = False
            HeaderAlignmentHorz = taCenter
            HeaderAlignmentVert = vaCenter
            HeaderGlyphAlignmentHorz = taCenter
            Width = 80
            DataBinding.FieldName = 'INPATIENTID'
          end
        end
      end
    end
  end
  inherited ComponentPrinter: TdxComponentPrinter
    PreviewOptions.PreviewBoundsRect = {00000000000000002003000058020000}
  end
  inherited DataSource: TDataSource
    DataSet = MADDAService.ClientDataSet
  end
  object ServiceId: TDataSource
    DataSet = MADService.ClientDataSet
    Left = 136
    Top = 16
  end
end