VERSION 5.00
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Object = "{F0D2F211-CCB0-11D0-A316-00AA00688B10}#1.0#0"; "MSDATLST.OCX"
Object = "{C4DED68B-C40F-11D6-AD1A-000795CA0957}#50.0#0"; "pry_list.ocx"
Object = "{2FF9B179-0BCC-11D7-8EF7-000795CE4721}#1.0#0"; "pry_listpicture.ocx"
Begin VB.Form Finicioinventario 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "Inicio de Inventario Fisico (10.150.00)"
   ClientHeight    =   5925
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   9555
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MDIChild        =   -1  'True
   ScaleHeight     =   5925
   ScaleWidth      =   9555
   Begin TabDlg.SSTab SSTab1 
      Height          =   5895
      Left            =   0
      TabIndex        =   0
      Top             =   0
      Width           =   9495
      _ExtentX        =   16748
      _ExtentY        =   10398
      _Version        =   393216
      Tab             =   2
      TabHeight       =   617
      TabCaption(0)   =   "Seleccion Agrupamiento (1)"
      TabPicture(0)   =   "1015000.frx":0000
      Tab(0).ControlEnabled=   0   'False
      Tab(0).Control(0)=   "cmd_grabar"
      Tab(0).Control(1)=   "cmd_cancelar"
      Tab(0).Control(2)=   "Frame2"
      Tab(0).ControlCount=   3
      TabCaption(1)   =   "Seleccion  Articulos (2)"
      TabPicture(1)   =   "1015000.frx":001C
      Tab(1).ControlEnabled=   0   'False
      Tab(1).Control(0)=   "Frame3"
      Tab(1).Control(1)=   "CMD_CANCELAART"
      Tab(1).Control(2)=   "CMD_GRABAART"
      Tab(1).ControlCount=   3
      TabCaption(2)   =   "Activar Toma inventario (3)"
      TabPicture(2)   =   "1015000.frx":0038
      Tab(2).ControlEnabled=   -1  'True
      Tab(2).Control(0)=   "cmdSalir"
      Tab(2).Control(0).Enabled=   0   'False
      Tab(2).Control(1)=   "cmdAceptar"
      Tab(2).Control(1).Enabled=   0   'False
      Tab(2).Control(2)=   "Frame1"
      Tab(2).Control(2).Enabled=   0   'False
      Tab(2).ControlCount=   3
      Begin VB.Frame Frame1 
         Height          =   3855
         Left            =   240
         TabIndex        =   22
         Top             =   600
         Width           =   9135
         Begin VB.TextBox txt_fechainicio 
            Enabled         =   0   'False
            Height          =   375
            Left            =   960
            TabIndex        =   28
            Top             =   1680
            Width           =   1695
         End
         Begin VB.Frame fr_opciones 
            Caption         =   "Cambiar a"
            Height          =   2055
            Left            =   4800
            TabIndex        =   24
            Top             =   1440
            Width           =   3615
            Begin VB.OptionButton opt_desactivado 
               Caption         =   "Desactivado"
               Height          =   855
               Left            =   2160
               Picture         =   "1015000.frx":0054
               Style           =   1  'Graphical
               TabIndex        =   26
               Top             =   600
               Width           =   1095
            End
            Begin VB.OptionButton opt_activado 
               Caption         =   "Activado"
               Height          =   855
               Left            =   240
               Picture         =   "1015000.frx":0496
               Style           =   1  'Graphical
               TabIndex        =   25
               Top             =   600
               Width           =   1095
            End
         End
         Begin VB.TextBox txt_estado 
            Enabled         =   0   'False
            Height          =   375
            Left            =   960
            TabIndex        =   23
            Top             =   720
            Width           =   3135
         End
         Begin VB.Label Label11 
            Caption         =   $"1015000.frx":08D8
            Height          =   855
            Left            =   360
            TabIndex        =   5
            Top             =   2400
            Width           =   3135
         End
         Begin VB.Label Label2 
            Caption         =   "Fecha Inicio Ultimo Inventario:"
            Height          =   255
            Left            =   960
            TabIndex        =   29
            Top             =   1440
            Width           =   2175
         End
         Begin VB.Image Image3 
            Height          =   480
            Left            =   240
            Picture         =   "1015000.frx":095F
            Top             =   600
            Width           =   480
         End
         Begin VB.Label Label1 
            Caption         =   "Estado Actual del Inventario Fisico"
            Height          =   255
            Left            =   960
            TabIndex        =   27
            Top             =   360
            Width           =   2655
         End
      End
      Begin VB.CommandButton cmdAceptar 
         Caption         =   "&Grabar"
         Height          =   735
         Left            =   6360
         Picture         =   "1015000.frx":0DA1
         Style           =   1  'Graphical
         TabIndex        =   21
         Top             =   4680
         Width           =   1215
      End
      Begin VB.CommandButton cmdSalir 
         Caption         =   "Sa&lir"
         Height          =   735
         Left            =   7680
         Picture         =   "1015000.frx":12D3
         Style           =   1  'Graphical
         TabIndex        =   20
         Top             =   4680
         Width           =   1215
      End
      Begin VB.CommandButton cmd_grabar 
         Caption         =   "&Grabar"
         Height          =   795
         Left            =   -68400
         Picture         =   "1015000.frx":15DD
         Style           =   1  'Graphical
