sub Init_Components1
with PlatOrdForm
 .Left = 143
 .Top = 110
 .BorderStyle = "bsDialog"
 .Caption = " "
 .ClientHeight = 513
 .ClientWidth = 561
 .Color = "clBtnFace"
 .Font.Charset = 204
 .Font.Color = "clWindowText"
 .Font.Height = -11
 .Font.Name = "MS Sans Serif"
 .Font.Style = ""
 .OldCreateOrder = False
 .PixelsPerInch = 96
 PlatOrdForm.add "POFGroupBox1", "TGroupBox"
 with POFGroupBox1
  .Left = 0
  .Top = 15
  .Width = 561
  .Height = 75
  .Align = "alTop"
  .Ctl3D = False
  .Font.Charset = 204
  .Font.Color = "clWindowText"
  .Font.Height = -11
  .Font.Name = "Arial"
  .Font.Style = ""
  .ParentCtl3D = False
  .ParentFont = False
  .TabOrder = 0
  .Caption = ""
  POFGroupBox1.add "POFTBXLabel1", "TLabel"
 with POFTBXLabel1
   .Left = 129
   .Top = 11
   .Width = 31
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox1.add "POFTBXLabel2", "TLabel"
 with POFTBXLabel2
   .Left = 8
   .Top = 12
   .Width = 38
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox1.add "POFTBXLabel3", "TLabel"
 with POFTBXLabel3
   .Left = 241
   .Top = 12
   .Width = 77
   .Height = 15
   .Caption = " "
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox1.add "POFPAYKIND", "TDBEditEh"
 with POFPAYKIND
   .Left = 320
   .Top = 12
   .Width = 120
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 3
   .Visible = True
   end with
  POFGroupBox1.add "POFPDOCNUM", "TDBEditEh"
 with POFPDOCNUM
   .Left = 51
   .Top = 11
   .Width = 74
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 4
   .Visible = True
   end with
  POFGroupBox1.add "POFTBXLabel10", "TLabel"
 with POFTBXLabel10
   .Left = 444
   .Top = 11
   .Width = 75
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox1.add "POFPAYQUEUE", "TDBEditEh"
 with POFPAYQUEUE
   .Left = 523
   .Top = 10
   .Width = 30
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 6
   .Visible = True
   end with
  POFGroupBox1.add "POFTBXLabel33", "TLabel"
 with POFTBXLabel33
   .Left = 53
   .Top = 57
   .Width = 101
   .Height = 15
   .Caption = " "
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox1.add "POFSUMPROP", "TDBEditEh"
 with POFSUMPROP
   .Left = 159
   .Top = 54
   .Width = 394
   .Height = 18
   .TabStop = False
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = "fsBold"
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 8
   .Visible = True
   end with
  POFGroupBox1.add "IPFTBXLabel13", "TLabel"
 with IPFTBXLabel13
   .Left = 9
   .Top = 35
   .Width = 81
   .Height = 15
   .Caption = " "
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox1.add "POFPDOCDATE", "TDBEditEh"
 with POFPDOCDATE
   .Left = 161
   .Top = 11
   .Width = 74
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 9
   .Visible = True
   end with
  POFGroupBox1.add "POFTBXLabel9", "TLabel"
 with POFTBXLabel9
   .Left = 135
   .Top = 36
   .Width = 50
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox1.add "POFSUM", "TDBEditEh"
 with POFSUM
   .Left = 179
   .Top = 33
   .Width = 134
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 11
   .Visible = True
   end with
  end with
 PlatOrdForm.add "POFGroupBox5", "TGroupBox"
 with POFGroupBox5
  .Left = 0
  .Top = 90
  .Width = 561
  .Height = 108
  .Align = "alTop"
  .Caption = ""
  .Ctl3D = False
  .Font.Charset = 204
  .Font.Color = "clBlack"
  .Font.Height = -12
  .Font.Name = "Arial"
  .Font.Style = "fsBold"
  .ParentCtl3D = False
  .ParentFont = False
  .TabOrder = 1
  POFGroupBox5.add "POFLabel1", "TLabel"
 with POFLabel1
   .Left = 6
   .Top = 18
   .Width = 56
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox5.add "POFTBXLabel20", "TLabel"
 with POFTBXLabel20
   .Left = 349
   .Top = 16
   .Width = 31
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox5.add "POFTBXLabel21", "TLabel"
 with POFTBXLabel21
   .Left = 31
   .Top = 38
   .Width = 30
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox5.add "POFPAYERNAME", "TDBEditEh"
 with POFPAYERNAME
   .Left = 67
   .Top = 16
   .Width = 275
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 0
   .Visible = True
   end with
  POFGroupBox5.add "POFPAYERACC", "TDBEditEh"
 with POFPAYERACC
   .Left = 388
   .Top = 15
   .Width = 165
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 3
   .Visible = True
   end with
  POFGroupBox5.add "POFPAYERINN", "TDBEditEh"
 with POFPAYERINN
   .Left = 67
   .Top = 37
   .Width = 146
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 4
   .Visible = True
   end with
  POFGroupBox5.add "POFTBXLabel29", "TLabel"
 with POFTBXLabel29
   .Left = 29
   .Top = 61
   .Width = 31
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox5.add "POFPAYERBANKNAME", "TDBEditEh"
 with POFPAYERBANKNAME
   .Left = 67
   .Top = 60
   .Width = 487
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 6
   .Visible = True
   end with
  POFGroupBox5.add "POFTBXLabel26", "TLabel"
 with POFTBXLabel26
   .Left = 225
   .Top = 84
   .Width = 27
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox5.add "POFPAYERBIC", "TDBEditEh"
 with POFPAYERBIC
   .Left = 256
   .Top = 81
   .Width = 129
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 8
   .Visible = True
   end with
  POFGroupBox5.add "POFTBXLabel27", "TLabel"
 with POFTBXLabel27
   .Left = 8
   .Top = 84
   .Width = 56
   .Height = 15
   .Caption = ". "
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox5.add "POFPAYERCORACC", "TDBEditEh"
 with POFPAYERCORACC
   .Left = 67
   .Top = 81
   .Width = 151
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 10
   .Visible = True
   end with
  end with
' PlatOrdForm.add "POFTBXLabel13", "TLabel"
' with POFTBXLabel13
'  .Left = 9
'  .Top = 53
'  .Width = 81
'  .Height = 15
'  .Caption = " "
'  .Font.Charset = 204
'  .Font.Color = "clWindowText"
'  .Font.Height = -12
'  .Font.Name = "Arial"
'  .Font.Style = ""
'  .ParentFont = False
'  end with
 PlatOrdForm.add "POFPAYCODE", "TDBEditEh"
 with POFPAYCODE
  .Left = 95
  .Top = 49
  .Width = 30
  .Height = 18
  .Alignment = "taLeftJustify"
  .Color = "clWhite"
  .Ctl3D = False

  .Font.Charset = 204
  .Font.Color = "clWindowText"
  .Font.Height = -11
  .Font.Name = "Arial"
  .Font.Style = ""
  .Flat = True
  .ParentCtl3D = False
  .ParentFont = False
  .ReadOnly = True
  .TabOrder = 3
  .Visible = True
  end with
 PlatOrdForm.add "POFGroupBox2", "TGroupBox"
 with POFGroupBox2
  .Left = 0
  .Top = 198
  .Width = 561
  .Height = 108
  .Align = "alTop"
  .Caption = ""
  .Ctl3D = False
  .Font.Charset = 204
  .Font.Color = "clMaroon"
  .Font.Height = -12
  .Font.Name = "Arial"
  .Font.Style = "fsBold"
  .ParentCtl3D = False
  .ParentFont = False
  .TabOrder = 4
  POFGroupBox2.add "POFLabel2", "TLabel"
 with POFLabel2
   .Left = 6
   .Top = 18
   .Width = 56
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox2.add "POFTBXLabel5", "TLabel"
 with POFTBXLabel5
   .Left = 31
   .Top = 38
   .Width = 30
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox2.add "POFRECIPIENTACC", "TDBEditEh"
 with POFRECIPIENTACC
   .Left = 388
   .Top = 15
   .Width = 165
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 1
   .Visible = True
   end with
  POFGroupBox2.add "POFRECIPIENTINN", "TDBEditEh"
 with POFRECIPIENTINN
   .Left = 67
   .Top = 37
   .Width = 146
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 2
   .Visible = True
   end with
  POFGroupBox2.add "POFTBXLabel6", "TLabel"
 with POFTBXLabel6
   .Left = 29
   .Top = 61
   .Width = 31
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox2.add "POFRECEIVERBANKNAME", "TDBEditEh"
 with POFRECEIVERBANKNAME
   .Left = 67
   .Top = 60
   .Width = 487
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 4
   .Visible = True
   end with
  POFGroupBox2.add "POFTBXLabel7", "TLabel"
 with POFTBXLabel7
   .Left = 225
   .Top = 84
   .Width = 27
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox2.add "POFRECIPIENTBIC", "TDBEditEh"
 with POFRECIPIENTBIC
   .Left = 256
   .Top = 81
   .Width = 129
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 6
   .Visible = True
   end with
  POFGroupBox2.add "POFTBXLabel8", "TLabel"
 with POFTBXLabel8
   .Left = 8
   .Top = 84
   .Width = 56
   .Height = 15
   .Caption = ". "
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox2.add "POFRECEIVERCORACC", "TDBEditEh"
 with POFRECEIVERCORACC
   .Left = 67
   .Top = 81
   .Width = 151
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 8
   .Visible = True
   end with
  POFGroupBox2.add "POFTBXLabel4", "TLabel"
 with POFTBXLabel4
   .Left = 349
   .Top = 16
   .Width = 31
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox2.add "POFRECEIVERNAME", "TDBEditEh"
 with POFRECEIVERNAME
   .Left = 67
   .Top = 16
   .Width = 275
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 10
   .Visible = True
   end with
  end with
 PlatOrdForm.add "POFPanel1", "TPanel"
 with POFPanel1
  .Left = 0
  .Top = 484
  .Width = 561
  .Height = 29
  .Align = "alBottom"
  .TabOrder = 5
  .Caption = ""
  POFPanel1.add "POFBitBtn1", "TBitBtn"
 with POFBitBtn1
   .Left = 461
   .Top = 2
   .Width = 97
   .Height = 25
   .Caption = ""
   .TabOrder = 0
   .Kind = "bkCancel"
   end with

  POFPanel1.add "POFPrevOrderBtn", "TBitBtn",TRUE
 with POFPrevOrderBtn
   .Left = 337
   .Top = 2
   .Width = 117
   .Height = 25
   .Caption = "&. "
   .TabOrder = 1
   end with
  end with
 PlatOrdForm.add "POFPanel", "TPanel"
 with POFPanel
  .Left = 0
  .Top = 0
  .Width = 561
  .Height = 15
  .Align = "alTop"
  .BevelOuter = "bvNone"
  .Color = 10972474
  .Font.Charset = 204
  .Font.Color = "clWhite"
  .Font.Height = -11
  .Font.Name = "MS Sans Serif"
  .Font.Style = "fsBold"
  .ParentFont = False
  .TabOrder = 6
  .Caption = ""
  end with
 PlatOrdForm.add "POFGroupBox4", "TGroupBox"
 with POFGroupBox4
  .Left = 0
  .Top = 361
  .Width = 561
  .Height = 55
  .Align = "alTop"
  .Ctl3D = False
  .Font.Charset = 204
  .Font.Color = "clBlack"
  .Font.Height = -12
  .Font.Name = "Arial"
  .Font.Style = "fsBold"
  .ParentCtl3D = False
  .ParentFont = False
  .TabOrder = 7
  .Caption = ""
  POFGroupBox4.add "POFTBXLabel12", "TLabel"
 with POFTBXLabel12
   .Left = 6
   .Top = 11
   .Width = 28
   .Height = 15
   .Caption = "KBK"
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox4.add "POFTBXLabel16", "TLabel"
 with POFTBXLabel16
   .Left = 63
   .Top = 11
   .Width = 41
   .Height = 15
   .Caption = "OKATO"
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox4.add "POFTBXLabel17", "TLabel"
 with POFTBXLabel17
   .Left = 159
   .Top = 11
   .Width = 64
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox4.add "POFKBK", "TDBEditEh"
 with POFKBK
   .Left = 5
   .Top = 27
   .Width = 55
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 3
   .Visible = True
   end with
  POFGroupBox4.add "POFOKATO", "TDBEditEh"
 with POFOKATO
   .Left = 63
   .Top = 27
   .Width = 93
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 4
   .Visible = True
   end with
  POFGroupBox4.add "POFOSN", "TDBEditEh"
 with POFOSN
   .Left = 160
   .Top = 27
   .Width = 65
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 5
   .Visible = True
   end with
  POFGroupBox4.add "POFTBXLabel18", "TLabel"
 with POFTBXLabel18
   .Left = 229
   .Top = 11
   .Width = 74
   .Height = 15
   .Caption = ". "
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox4.add "POFNALPER", "TDBEditEh"
 with POFNALPER
   .Left = 229
   .Top = 27
   .Width = 66
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 7
   .Visible = True
   end with
  POFGroupBox4.add "POFTBXLabel19", "TLabel"
 with POFTBXLabel19
   .Left = 304
   .Top = 11
   .Width = 40
   .Height = 15
   .Caption = " ."
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox4.add "POFNOMERDOC", "TDBEditEh"
 with POFNOMERDOC
   .Left = 303
   .Top = 27
   .Width = 93
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 9
   .Visible = True
   end with
  POFGroupBox4.add "POFTBXLabel22", "TLabel"
 with POFTBXLabel22
   .Left = 399
   .Top = 11
   .Width = 28
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox4.add "POFEDATEDOC", "TDBEditEh"
 with POFEDATEDOC
   .Left = 399
   .Top = 27
   .Width = 93
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 11
   .Visible = True
   end with
  POFGroupBox4.add "POFTBXLabel23", "TLabel"
 with POFTBXLabel23
   .Left = 495
   .Top = 11
   .Width = 22
   .Height = 15
   .Caption = ""
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox4.add "POFTYPE1", "TDBEditEh"
 with POFTYPE1
   .Left = 495
   .Top = 27
   .Width = 32
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 13
   .Visible = True
   end with
  end with
 PlatOrdForm.add "POFGroupBox3", "TGroupBox"
 with POFGroupBox3
  .Left = 0
  .Top = 416
  .Width = 561
  .Height = 66
  .Align = "alTop"
  .Caption = " "
  .Ctl3D = False
  .Font.Charset = 204
  .Font.Color = "clBlack"
  .Font.Height = -12
  .Font.Name = "Arial"
  .Font.Style = "fsBold"
  .ParentCtl3D = False
  .ParentFont = False
  .TabOrder = 8
  POFGroupBox3.add "POFGROUND", "TMemo"
 with POFGROUND
   .Left = 1
   .Top = 16
   .Width = 559
   .Height = 49
   .Align = "alClient"
   .Color = "clWhite"
   .Font.Charset = 204
   .Font.Color = "clBlack"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   .ReadOnly = False
   .ScrollBars = "ssVertical"
   .TabOrder = 0
   end with
  end with
 PlatOrdForm.add "POFGroupBox6", "TGroupBox"
 with POFGroupBox6
  .Left = 0
  .Top = 306
  .Width = 561
  .Height = 55
  .Align = "alTop"
  .Ctl3D = False
  .Font.Charset = 204
  .Font.Color = "clBlack"
  .Font.Height = -12
  .Font.Name = "Arial"
  .Font.Style = "fsBold"
  .ParentCtl3D = False
  .ParentFont = False
  .TabOrder = 9
  .Caption = ""
  POFGroupBox6.add "POFTBXLabel11", "TLabel"
 with POFTBXLabel11
   .Left = 6
   .Top = 11
   .Width = 139
   .Height = 15
   .Caption = " "
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox6.add "POFTBXLabel14", "TLabel"
 with POFTBXLabel14
   .Left = 163
   .Top = 11
   .Width = 60
   .Height = 15
   .Caption = " . ."
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox6.add "POFTBXLabel15", "TLabel"
 with POFTBXLabel15
   .Left = 226
   .Top = 11
   .Width = 98
   .Height = 15
   .Caption = " . ."
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox6.add "POFDBEditEh1", "TDBEditEh"
 with POFDBEditEh1
   .Left = 5
   .Top = 27
   .Width = 136
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 3
   .Visible = True
   end with
  POFGroupBox6.add "POFDBEditEh2", "TDBEditEh"
 with POFDBEditEh2
   .Left = 163
   .Top = 27
   .Width = 61
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 4
   .Visible = True
   end with
  POFGroupBox6.add "POFDBEditEh3", "TDBEditEh"
 with POFDBEditEh3
   .Left = 227
   .Top = 27
   .Width = 97
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 5
   .Visible = True
   end with
  POFGroupBox6.add "POFTBXLabel24", "TLabel"
 with POFTBXLabel24
   .Left = 327
   .Top = 11
   .Width = 74
   .Height = 15
   .Caption = " . ."
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox6.add "POFDBEditEh4", "TDBEditEh"
 with POFDBEditEh4
   .Left = 327
   .Top = 27
   .Width = 77
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 7
   .Visible = True
   end with
  POFGroupBox6.add "POFTBXLabel25", "TLabel"
 with POFTBXLabel25
   .Left = 407
   .Top = 11
   .Width = 91
   .Height = 15
   .Caption = " . ."
   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -12
   .Font.Name = "Arial"
   .Font.Style = ""
   .ParentFont = False
   end with
  POFGroupBox6.add "POFDBEditEh5", "TDBEditEh"
 with POFDBEditEh5
   .Left = 407
   .Top = 27
   .Width = 93
   .Height = 18
   .Alignment = "taLeftJustify"
   .Color = "clWhite"
   .Ctl3D = False

   .Font.Charset = 204
   .Font.Color = "clWindowText"
   .Font.Height = -11
   .Font.Name = "Arial"
   .Font.Style = ""
   .Flat = True
   .ParentCtl3D = False
   .ParentFont = False
   .ReadOnly = True
   .TabOrder = 9
   .Visible = True
   end with
  end with
 end with
end sub


sub main1
  set FS=CreateObject("Scripting.FileSystemObject")
  tt=FS.GetFolder("macroses")
  tt=tt+"\..\pictures\PreView.bmp"
  POFPrevOrderBtn.Glyph.LoadFromFile(tt)
  POFGROUND.ReadOnly = True
  
  set qPOV=Self.Controls("IBQuery1")


  ' 
  POFPDOCNUM.Text = ""
  POFPDOCDATE.Text = ""
  POFPAYKIND.Text = ""
  POFPAYQUEUE.Text = ""
  POFPAYCODE.Text = ""
  POFSUM.Text = ""
  POFSUMPROP.Text = ""
  POFPAYERNAME.Text = ""
  POFPAYERACC.Text = ""
  POFPAYERINN.Text = ""
  POFPAYERBANKNAME.Text = ""
  POFPAYERCORACC.Text = ""
  POFPAYERBIC.Text = ""
  POFRECEIVERNAME.Text = ""
  POFRECIPIENTACC.Text = ""
  POFRECIPIENTINN.Text = ""
  POFRECEIVERBANKNAME.Text = ""
  POFRECEIVERCORACC.Text = ""
  POFRECIPIENTBIC.Text = ""
  POFKBK.Text = ""
  POFOKATO.Text = ""
  POFOSN.Text = ""
  POFNALPER.Text = ""
  POFNOMERDOC.Text = ""
  POFEDATEDOC.Text = ""
  POFTYPE1.Text = ""
  POFGROUND.Lines.Clear

  '  
  '
  POFPDOCNUM.Text = qPOV.FieldByNameString("PDOCNUM")
  '
  POFPDOCDATE.Text = qPOV.FieldByNameString("PDOCDATE")
  ' 
  POFPAYKIND.Text = qPOV.FieldByNameString("PAYKIND")
  '
  POFPAYQUEUE.Text = qPOV.FieldByNameString("PAYQUEUE")
  ' 
  POFPAYCODE.Text = qPOV.FieldByNameString("PAYCODE")
  '
  POFSUM.Text = qPOV.FieldByNameString("SUM")
  ' 
  POFSUMPROP.Text = qPOV.FieldByNameString("SUM")

  '------------------------------

  '
  '
  POFPAYERNAME.Text = qPOV.FieldByNameString("PAYERNAME")
  '
  POFPAYERACC.Text = qPOV.FieldByNameString("PAYERACC")
  '
  POFPAYERINN.Text = qPOV.FieldByNameString("PAYERINN")
  '
  POFPAYERBANKNAME.Text = qPOV.FieldByNameString("PAYERBANKNAME")
  '. 
  POFPAYERCORACC.Text = qPOV.FieldByNameString("PAYERCORACC")
  '
  POFPAYERBIC.Text = qPOV.FieldByNameString("PAYERBIC")

  '------------------------------

  '
  '
  POFRECEIVERNAME.Text = qPOV.FieldByNameString("RECEIVERNAME")
  '
  POFRECIPIENTACC.Text = qPOV.FieldByNameString("RECIPIENTACC")
  '
  POFRECIPIENTINN.Text = qPOV.FieldByNameString("RECIPIENTINN")
  '
  POFRECEIVERBANKNAME.Text = qPOV.FieldByNameString("RECEIVERBANKNAME")
  '. 
  POFRECEIVERCORACC.Text = qPOV.FieldByNameString("RECEIVERCORACC")
  '
  POFRECIPIENTBIC.Text = qPOV.FieldByNameString("RECIPIENTBIC")

  '------------------------------

  '  
  '  

  '

  POFKBK.Text = qPOV.FieldByNameString("KBK")
  'OKATO
  POFOKATO.Text = qPOV.FieldByNameString("OKATO")
  '
  POFOSN.Text = qPOV.FieldByNameString("NALOSNOVAN")
  '. 
  POFNALPER.Text = qPOV.FieldByNameString("NALPER")
  ' .
  POFNOMERDOC.Text = qPOV.FieldByNameString("NOMNALDOC")
  '
  POFEDATEDOC.Text = qPOV.FieldByNameString("DATNALDOC")
  '
  POFTYPE1.Text = qPOV.FieldByNameString("TPNALPLAT")

  '----------------------
  
  ' 
  POFDBEditEh1.Text = ""
'  POFDBEditEh1.Text = qPO.FieldByNameString("")
  ' . .
  POFDBEditEh2.Text = qPOV.FieldByNameString("PARTPAYNUM")
  '  
  POFDBEditEh3.Text = qPOV.FieldByNameString("PARTPAYCODE")
  ' . .
  POFDBEditEh4.Text = qPOV.FieldByNameString("PARTPLATDOCNUM")
  ' . .
  POFDBEditEh5.Text = qPOV.FieldByNameString("PARTPLATDOCDATE")

  

  ' 
  POFGROUND.Lines.Clear
  POFGROUND.Lines.Add(qPOV.FieldByNameString("GROUND"))

  set fs=nothing
end sub

'  

if(isEmpty(PlatOrdForm)) then
 self.Add "PlatOrdForm","TForm"
 call Init_Components1
end if

call main1()
PlatOrdForm.ShowModal
