Etiqueta: compartiendo codigo

Publicado el por — Dejar un comentario

Compartiendo Codigo (Numero de Registros)

Buenas Tardes Estimados Usuarios/Distribuidores

Se nos consulto para saber el numero de registros realizados en una captura de inventario, les comparto la sintaxis

Icono

Alta Rápida - Inventario v20

1 archivo(s) 16.18 KB
Descargar

Icono

Alta rápida - Inventario 2012

1 archivo(s) 16.18 KB
Descargar

FUNCION COUNT()
Para averiguar la cantidad sin necesidad de contarlos manualmente usamos la función “count()”:

select count(*) from nombre de la tabla where invemtario (en este caso se debia tomar un valor de una caja de texto).

Sintaxis empleada en un formulario de MybusinessPOS

Se hace la cadena de conexion a la tabla articulo
Set rsttprods = CreaRecordSet (“select COUNT(articulo) As prodst FROM partinv WHERE inventario = ‘” & inventario.text & “‘” , Ambiente.Connection)
If Not rsttprods.EOF Then
txtarticuloscontados= “” & rsttprods( “prodst” ) ‘se asigna el valor devuelto de la cadena
end if
el

Sintaxis empleada en Sql Server

select count(articulo) from partinv where inventario = ‘numero de inv ‘

En este Caso condicionamos para que nos devuelva el conteo de los registros en el inventario

Grupo Help MBP
Nestor Guzman
Lo mejor que puedes compartir es el conocimiento.

Publicado el por — Dejar un comentario

Compartiendo Codigo (Extraer una cadena de texto).

Se nos consulto para extraer una cadena de un cuadro de texto de Mybusinesspos les compartimos la sentencia.

Nota: Mid (cadena, inicio, longitud)

El parámetro cadena es la cadena a extraer caracteres. El parámetro Inicio es donde comenzar y el parámetro longitud, es la cantidad de caracteres a extraer de la cadena de caracteres

utilizamos la informacion de 2 objetos (Cuadro de Texto)

txtCodigo = trim (Mid(txtModelo,1,3))&trim(Mid(txtcolor,1,2))

txtCodigo = objeto a colocar la extraccion de caracteres
txtModelo,1,3 = comenzaremos con el primer caracter (1), la longitud de caracteres (3)

Lo mejor que se puede compartir es el Conocimiento
Grupo Help MBP
@NestorGuzmanMBP

Publicado el por — Dejar un comentario

Compartiendo Codigo (Captura de Inventario).

Nota Urgente : Cabe mencionar que es necesario realizar un Respaldo de nuestra base de Datos.

En esta ocacion se nos consulto para capurar un inventario, deseaban borrar los movimientos al nventario (Entradas,Salidas,Compras), asi como colocar las existencias en 0.

Esta es la sintaxis que utilizamos
1.-Abrir Sql Managment Studio
2.-Seleccionar la Base de Datos
3.-Nueva Consulta

Colocar las existencias en 0
Actualizamos la tabla Prods donde se concentra el catalogo de Productos
update prods set existencia = ‘0’

Actualizamos la tabla existenciaalmacen donde se concentra el las existencias por Almacen
update existenciaalmacen set existencia = ‘0’
Estas Dos tablas son relacionadas.

Para borrar los movimientos al Inventario
DELETE FROM partinv
DELETE FROM movsinv

Para borrar Salidas
DELETE FROM salpart
DELETE FROM salidas

Para borrar Compras
DELETE FROM compart
DELETE FROM compras

Para borrar Entadas
DELETE FROM entpart
DELETE FROM entradas

Con estas lineas de Sentencias Sql Logramos Limpiar paricial la Base de datos.
El uso de estas Sentencias es Resposabilidad del usuario

Grupo Help MBP
@NestorGuzmanMBP

Publicado el por — Dejar un comentario

Compartiendo Codigo Actualizando Registro de ClaveSat.

Excelente dia Estimado Usuario/Distribuidor

Me encontre con la necesidad de Actualizar la tabla de productos, el registro de Clave Sat (claveprodserv) , de una linea especifica, ya que contenia la clave de Articulo no encontrado en Catalogo (01010101), me dieron la Clave asignada a dichos productos del catalogo del sat, ahora bien les comparto la sintaxis que utilize para actualizar dicho campo y asignar la clave unidad (claveunidad).

1.-Abrir Sql MAnagment Studio
2.-Seleccionar la Base de datos
3.-Nueva Consulta
4.-Escribir la Siguiente Sintaxis

Update prods set claveprodserv = ‘23456789’ where linea = ‘031’
go

Descripcion de la SIntaxis

prods = Tabla Productos.
claveprodserv = Clave del Sat.
linea = Linea en donde se encuentra el producto

Grupo Help MBP
@NestorGuzmanMBP


Publicado el por — Dejar un comentario

Compartiendo Codigo Limpieza de Registros.

Nos dimos a la tarea de Crear una sintaxis para Eliminar de la Base de datos informacion que ya no se ocupara como es :

+Cobranza.
+Entradas.
+Salidas
+Ventas
+Colocar en 0 las Existencias

Esto con el Fin de Limpiar la Base de Datos.

Es importante realizar un Respaldo antes de Ejecutar la Siguiente Consulta

1.- Abrir el Sql Managment

1.1.-Elije la Base de datos

2.-Nuevo Consulta

3.-Copia y pega el Siguiente

DELETE FROM cobdet
DELETE FROM cobranza
DELETE FROM partvta
DELETE FROM ventas
DELETE FROM movsinv
DELETE FROM salpart
DELETE FROM salidas
DELETE FROM comppart
DELETE FROM compras
DELETE FROM entpart
DELETE FROM entradas

UPDATE prods SET existencia = ‘0’
UPDATE existenciaalmacen SET existencia = ‘0’

Si lo deseas en Mybusiness

1.-Procedimientos de Usuarios

2.-Nuevo

Pega este Codigo y coloca un Nombre y una descripcion

Ambiente.Connection.Execute “DELETE FROM cobdet”
Ambiente.Connection.Execute “DELETE FROM cobranza”
Ambiente.Connection.Execute “DELETE FROM partvta”
Ambiente.Connection.Execute “DELETE FROM ventas”
Ambiente.Connection.Execute “DELETE FROM movsinv”
Ambiente.Connection.Execute “DELETE FROM salpart”
Ambiente.Connection.Execute “DELETE FROM salidas”
Ambiente.Connection.Execute “DELETE FROM comppart”
Ambiente.Connection.Execute “DELETE FROM compras”
Ambiente.Connection.Execute “DELETE FROM entpart”
Ambiente.Connection.Execute “DELETE FROM entradas”
Ambiente.Connection.Execute “UPDATE prods SET existencia = ‘0’”
Ambiente.Connection.Execute “UPDATE existenciaalmacen SET existencia = ‘0’”

MsgBox(“Limpieza Ejecutada”)