VERSION 5.00
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
Object = "{F0D2F211-CCB0-11D0-A316-00AA00688B10}#1.0#0"; "MSDATLST.OCX"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Object = "{00025600-0000-0000-C000-000000000046}#5.2#0"; "crystl32.ocx"
Object = "{C4DED68B-C40F-11D6-AD1A-000795CA0957}#49.0#0"; "pry_list.ocx"
Begin VB.Form FRegistroVentas 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "Registro de Ventas (05.150.00)"
   ClientHeight    =   5190
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   10695
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MDIChild        =   -1  'True
   ScaleHeight     =   5190
   ScaleWidth      =   10695
   Begin TabDlg.SSTab SSTab1 
      Height          =   5175
      Left            =   0
      TabIndex        =   0
      Top             =   0
      Width           =   10695
      _ExtentX        =   18865
      _ExtentY        =   9128
      _Version        =   393216
      Tabs            =   2
      TabsPerRow      =   2
      TabHeight       =   520
      TabCaption(0)   =   "Datos Generales"
      TabPicture(0)   =   "0515000.frx":0000
      Tab(0).ControlEnabled=   -1  'True
      Tab(0).Control(0)=   "Image1"
      Tab(0).Control(0).Enabled=   0   'False
      Tab(0).Control(1)=   "Line1"
      Tab(0).Control(1).Enabled=   0   'False
      Tab(0).Control(2)=   "Shape1"
      Tab(0).Control(2).Enabled=   0   'False
      Tab(0).Control(3)=   "lblMoneda"
      Tab(0).Control(3).Enabled=   0   'False
      Tab(0).Control(4)=   "Label2"
      Tab(0).Control(4).Enabled=   0   'False
      Tab(0).Control(5)=   "Label5"
      Tab(0).Control(5).Enabled=   0   'False
      Tab(0).Control(6)=   "lstCriterios"
      Tab(0).Control(6).Enabled=   0   'False
      Tab(0).Control(7)=   "dtcMoneda"
      Tab(0).Control(7).Enabled=   0   'False
      Tab(0).Control(8)=   "crRegistroVentas"
      Tab(0).Control(8).Enabled=   0   'False
      Tab(0).Control(9)=   "Frame1"
      Tab(0).Control(9).Enabled=   0   'False
      Tab(0).Control(10)=   "Frame2"
      Tab(0).Control(10).Enabled=   0   'False
      Tab(0).Control(11)=   "cmdGenerar"
      Tab(0).Control(11).Enabled=   0   'False
      Tab(0).Control(12)=   "cmdSalir"
      Tab(0).Control(12).Enabled=   0   'False
      Tab(0).ControlCount=   13
      TabCaption(1)   =   "Almacenes"
      TabPicture(1)   =   "0515000.frx":001C
      Tab(1).ControlEnabled=   0   'False
      Tab(1).Control(0)=   "Label6"
      Tab(1).Control(0).Enabled=   0   'False
      Tab(1).Control(1)=   "Line4"
      Tab(1).Control(1).Enabled=   0   'False
      Tab(1).Control(2)=   "Line5"
      Tab(1).Control(2).Enabled=   0   'False
      Tab(1).Control(3)=   "Image2"
      Tab(1).Control(3).Enabled=   0   'False
      Tab(1).Control(4)=   "Shape2"
      Tab(1).Control(4).Enabled=   0   'False
      Tab(1).Control(5)=   "Label1"
      Tab(1).Control(5).Enabled=   0   'False
      Tab(1).Control(6)=   "lstAlmacen"
      Tab(1).Control(6).Enabled=   0   'False
      Tab(1).Control(7)=   "cmdGenerar2"
      Tab(1).Control(7).Enabled=   0   'False
      Tab(1).Control(8)=   "cmdSalir2"
      Tab(1).Control(8).Enabled=   0   'False
      Tab(1).ControlCount=   9
      Begin VB.CommandButton cmdSalir2 
         Cancel          =   -1  'True
         Caption         =   "&Salir"
         Height          =   855
         Left            =   -66000
         Picture         =   "0515000.frx":0038
         Style           =   1  'Graphical
         TabIndex        =   1
         Top             =   2760
         Width           =   1335
      End
      Begin VB.CommandButton cmdSalir 
         Caption         =   "&Salir"
         Height          =   855
         Left            =   2160
         Picture         =   "0515000.frx":0342
         Style           =   1  'Graphical
         TabIndex        =   3
         Top             =   4020
         Width           =   1335
      End
      Begin VB.CommandButton cmdGenerar 
         Caption         =   "&Generar"
         Height          =   855
         Left            =   810
         Picture         =   "0515000.frx":064C
         Style           =   1  'Graphical
         TabIndex        =   12
         Top             =   4005
         Width           =   1335
      End
      Begin VB.Frame Frame2 
         Caption         =   "Rango de Fechas"
         Height          =   855
         Left            =   240
         TabIndex        =   7
         Top             =   1980
         Width           =   3735
         Begin MSComCtl2.DTPicker dtpFechaFin 
            Height          =   315
            Left            =   2280
            TabIndex        =   8
            Top             =   360
            Width           =   1335
            _ExtentX        =   2355
            _ExtentY        =   556
            _Version        =   393216
            Format          =   62259201
            CurrentDate     =   37533
         End
         Begin MSComCtl2.DTPicker dtpFechaIni 
            Height          =   315
            Left            =   480
            TabIndex        =   9
            Top             =   360
            Width           =   1335
            _ExtentX        =   2355
            _ExtentY        =   556
            _Version        =   393216
            Format          =   62259201
            CurrentDate     =   37533
         End
         Begin VB.Label Label3 
            AutoSize        =   -1  'True
            Caption         =   "Del"
            Height          =   195
            Left            =   120
            TabIndex        =   11
            Top             =   360
            Width           =   240
         End
         Begin VB.Label Label4 
            AutoSize        =   -1  'True
            Caption         =   "Al"
            Height          =   195
            Left            =   2040
            TabIndex        =   10
            Top             =   360
            Width           =   135
         End
      End
      Begin VB.Frame Frame1 
         Caption         =   "Formato"
         Height          =   855
         Left            =   240
         TabIndex        =   4
         Top             =   2940
         Width           =   3735
         Begin VB.OptionButton optDetallado 
            Caption         =   "Detallado"
            Height          =   255
            Left            =   2040
            TabIndex        =   6
            Top             =   360
            Value           =   -1  'True
            Width           =   1095
         End
         Begin VB.OptionButton optResumido 
            Caption         =   "Resumido"
            Enabled         =   0   'False
            Height          =   255
            Left            =   600
            TabIndex        =   5
            Top             =   360
            Width           =   1095
         End
      End
      Begin VB.CommandButton cmdGenerar2 
         Caption         =   "&Generar"
         Height          =   855
         Left            =   -66000
         Picture         =   "0515000.frx":0956
         Style           =   1  'Graphical
         TabIndex        =   2
         Top             =   1920
         Width           =   1335
      End
      Begin Crystal.CrystalReport crRegistroVentas 
         Left            =   3600
         Top             =   4185
         _ExtentX        =   741
         _ExtentY        =   741
         _Version        =   348160
         PrintFileLinesPerPage=   60
      End
      Begin MSDataListLib.DataCombo dtcMoneda 
         Height          =   315
         Left            =   1320
         TabIndex        =   13
         Top             =   1260
         Width           =   2655
         _ExtentX        =   4683
