Registrar Cliente
: IU Registrar Cliente
: Vendedor
: Registrador Cliente
: Dcliente
Registrar Cliente
Dar Click Buscar
Buscar Cliente
Leer ()
ObjetoCliente
Si ObjetoCliente=Null Msj "No encontrado"
Si ObjetoCliente<>Null.Mostrar Datos
Dar Click Nuevo
Limpiar controles
Dar click Registrar Registrar Cliente Registrar ()
VariableCliente Si VariableCliente=1 Msj "Datos Registrados" Si VariableCliente <>1 Msj "Error Registrado"
Dar Click Actualizar Actualizar Cliente Actualizar ()
VariableCliente
Registrar Producto
: Vendedor
: IU Registrar Producto
: Dproducto
: Registrador Producto
Registrar Producto
Dar Click Buscar Producto
Buscar Producto
Leer ()
ObjetoProducto
Si ObjetoProducto=Null Msj "No Encontrado"
Si ObjetoProducto<>Null Mostrar Datos
Dar Click Nuevo
Limpiar Controles
Dar Click Registrar Registrar Producto Registrar ()
VariableProducto
Si VariableProducto=1 Msj "Datos Registrados"
Si VariableProducto<>1 Msj "Error Registrado" Dar Click en Actualizar
Actualizar Producto Actualizar ()
VariableProducto
Registrar Documento de Pedido de Producto
: Vendedor
: IU Registrar Doc Pedido Producto
: Buscador Producto
: Registrador Doc Pedido Producto
: Dproducto
Registrar Doc Pedido Producto Dar Click Buscar Doc Pedido Producto
Buscar Doc Pedido Producto Leer ()
ObjetoDocPedidoProducto
Si ObjetoDocPedidoProducto=Null Msj "No Encontrado"
Si ObjetoDocPedidoProducto<>Null Mostrar Datos
Dar Click Nuevo Limpiar Controles
Dar Click Buscar Producto Buscar Producto Leer ()
ObjetoProducto Si ObjetoProducto=Null Msj "No Encontrado" Si ObjetoProducto<>Null Mostrar Datos Dar Click Registrar Doc Pedido Producto Registrar Doc Pedido Producto
Registrar ()
VariableDocPedidoProducto Si VariableDocPedidoProducto=1 Msj "Datos Registrados"
Si VariableDocPedidoProducto<>1 Msj "Error Registrado"
Dar Click en Actualizar Actualizar Doc Pedido Producto Actualizar ()
VariableDocPedidoProducto
: DDocPedidoProducto
Registrar Documento de Orden de Venta
: Vendedor
: IU Registrar Doc Orden Venta
: Buscador Doc Pedido Producto
: Buscador Cliente
: Registrador Doc Orden Venta
: DDocPedidoProducto
Registrar Orden Venta
Dar click en Buscar Buscar Doc Orden Venta
Leer ()
ObjetoDocOrdenVenta
Si ObjetoDocOrdenVenta=Null Msj "No Encontrado"
Si ObjetoDocOrdenVenta<>Null Mostrar Datos
Dar Click Nuevo
Limpiar Controles Dar Click Buscar Cliente Buscar Cliente
Leer ()
ObjetoCliente Si ObjetoCliente=Null Msj "No Encontrado"
Si ObjetoCliente<>Null Mostrar Datos
Dar Click Buscar Doc Pedido Producto
Buscar Doc Pedido Producto
Leer ()
ObjetoDocPedidoProducto
Si ObjetoDocPedidoProducto=Null Msj "No Encontrado"
Si ObjetoDocPedidoProducto<>Null Mostrar Datos
Dar Click en Registrar Registrar Doc Orden Venta Registrar ()
VariableDocOrdenVenta
Si VariableDocOrdenVenta=1 Msj "Datos Registrados"
Si VariableDocOrdenVenta<>1 Msj "Error Registrado"
Dar Click en Actualizar Atualizar Doc Orden Venta
Actualizar ()
VariableDocOrdenVenta
: Dcliente
: DDocOrdenVenta
Consultar_Orden_Venta
: Jefe de Ventas
: IU Consultar Doc Orden Venta : Buscador Doc Orden
: DDocOrdenVenta
Venta Buscar Doc Orden Venta
Dar Click en Buscar
Buscar Doc Orden Venta
Leer ()
ObjetoDocOrdenVenta
Si ObjetoDocOrdenVenta=Null Msj "No Encontrado"
Si ObjetoDocOrdenVenta<>Null Mostrar Datos
Registrar Documento de Consolidado de Orden de Venta
: Jefe de Ventas
: IU Registrar Doc Consolidado Orden Venta
: Buscador Doc Orden Venta
: Registrador Doc consolidado Orden Venta
: DDocOrdenVenta
Registrar Doc Consolidado Orden Venta
Dar Click en Buscar Buscar Doc Consolidado Orden Venta Leer ()
ObjetoDocConsolidadoOrdenVenta
Si ObjetoDocConsolidadoOrdenVenta=Null Msj "No Encontrado"
Si ObjetoDocConsolidadoOrdenVenta<>Null Mostrar Datos
Dar Click Nuevo
Limpiar Controles
Dar Click Buscar Buscar Doc Orden Venta Leer ()
ObjetoDocOrdenVenta
Si ObjetoDocOrdenVenta=Null Msje "No encontrado" Si ObjetoDocOrdenVenta<>Null Mostrar Datos Dar Click en Registrar Registrar Doc Consolidado de Orden Venta Registrar () VariableDocConsolidadoOrdenVenta
Si VariableDocConsolidadoOrdenVenta=1 Msj "Datos Registrados"
Si VariableDocConsolidadoOrdenVenta<>1 Msj "Error Registrado"
Dar Click en Actualizar Actualizar Doc Consolidado Orden Venta
Actualizar
VariableDocConsolidadoOrdenVenta
: DDocConsolidadoOrdenVenta
Registrar Orden de Compra
: Buscador Insumo : Jefe de Compras
: IU Registrar Orden Compra
: Buscador Doc Requerimientos Faltantes
: Buscador Proveedor
: Registrador Orden Compra
: DDocRequerimientosFaltantes
: DInsumo
Registrar Orden Compra
Dar click en Buscar
Buscar Orden Compra
Leer ()
ObjetoOrdenCompra
Si ObjetoOrdenCompra=Null Msje "No encontrado"
Si ObjetoOrdenCompra<>Null Mostrar Datos
Dar Click Nuevo
Limpiar Controles
Dar Click Buscar Buscar Doc Requerimientos Faltantes Leer ()
ObjetoDocRequerimientosFaltantes
Si ObjetoDocRequerimientosFaltantes=Null Msje "No Encontrado"
Si ObjetoDocRequerimientosFaltantes<>Null Mostrar Datos Dar Click en Buscar Buscar Insumo
Leer ()
ObjetoInsumo
Si ObjetoInsumo=Null Msje "No Encontrado"
Si ObjetoInsumo<>Null Mostrar Datos
Dar Click en Buscar Buscar Proveedor
Leer ()
ObjetoProveedor
Si ObjetoProveedor=Null Msje "No Encontrado"
Si ObjetoProveedor<>Null Mostrar Datos
Dar Click en Registrar Registrar Orden Compra
Registrar ()
VariableOrdenCompra
Si VariableOrdenCompra=1 Msje "Datos Registrados"
Si VariableOrdenCompra<>1 Msje "Error Registrado"
Dar Click en Actualizar
Actualizar Orden Compra
Actualizar ()
VariableOrdenCompra
: DProveedor
: DOrdenCompra
Consultar Documento Consolidado de Orden de Venta
: Jefe de Produccion
: IU Consultar Doc Consolidado : Buscador Doc Orden Venta Consolidado Orden Venta Buacar Doc Consolidado Orden Venta
: DDocConsolidadoOrdenVenta
Dar Click en Buscar Buscar Doc Consolidado Orden Venta Leer ()
ObjetoDocConsolidadoOrdenVenta
Si ObjetoDocConsolidadoOrdenVenta=Null Msje "No Encontrado"
Si ObjetoDocConsolidadoOrdenVenta<>Null Mostrar Datos
Consultar Insumo
: IU Consultar Insumo
: Jefe de Produccion
: Buscador Insumo
: DInsumo
Buscar Insumo
Dar Click en Buscar Buscar Insumo Leer ()
ObjetoInsumo
Si ObjetoInsumo=Null Msje "No Encontrado"
Si ObjetoInsumo<>Null Mostrar Datos
Consultar Documento de Requerimientos
: Jefe de Almacen
: Buscador Doc Requerimientos
: IU Consultar Doc Requerimientos
: DDocRequerimientos
Buscar Doc Requerimientos
Dar Click en Buscar
Buscar Doc Requerimientos
Leer ()
ObjetoDocRequerimientos
Si ObjetoDocRequerimientos=Null Msje "No Encontrado"
Si ObjetoDocRequerimientos<>Null Mostrar Datos
Consultar Documento de Requerimiento
: Almacenero
: IU Consultar Doc Requerimientos Buscar Doc Requerimientos
: Buscador Doc Requerimientos
: DDocRequerimientos
Dar Click en Buscar
Buscar Doc Requerimientos Leer ()
ObjetoDocRequerimientos
Si ObjetoDocRequerimientos=Null Msje "No Encontrado"
Si ObjetoDocRequerimientos<>Null Mostrar Datos
Emitir Reporte de Orden de Compra
: IU Emitir Orden Compra
: Jefe de Compras
: Buscador Orden Compra
: DOrdenCompra
Emitir Orden Compra
Dar Click en Emitir
Emitir Orden Compra Leer ()
ObjetoOrdenCompra
Si ObjetoOrdenCompra=Null Msje "No Encontrado"
Si ObjetoOrdenCompra<>Null Mostrar Datos
Consultar Despacho de Orden de Compra
: Almacenero
: IU Consultar Doc Despacho Orden Compra
: Buscador Doc Despacho Orden Compra
: DDocDespachoOrdenCompra
Buscar Doc Despacho Orden Compra Dar click en Buscar
Buscar Doc Despacho Orden Compra Leer ()
ObjetoDocDespachoOrdenCompra
Si ObjetoDocDespachoOrdenCompra=Null Msje "No Encontrado"
Si ObjetoDocDespachoOrdenCompra<>Null Mostrar Datos
Registrar Documento de Envío de Sustancia Química
: Operario de Elaboracion
: IU Registrar Doc Env io Sust Quimica
: Buscador Doc Conf ormidad Sust Quimica
: Registrador Doc Env io Sust Quimica
: DDocConf ormidadSustQuimica
Registrar Doc Env io Sust Quimica
Dar Click en Buscar
Buscar Doc Env io Sust Quimica
Leer ()
ObjetoDocEnv ioSustQuimica
Si ObjetoDocEnv ioSustQuimica=Null Msje "No Encontrado"
Si ObjetoDocEnv ioSustQuimica<>Null Mostrar Datos
Dar Click Nuev o
Limpiar Controles
Dar Click en Buscar
Buscar Doc Conf ormidad Sust Quimica
Leer ()
ObjetoDocConf omidadSustQuimica
Si ObjetoDocConf ormidadSustQuimica=Null Msje "No Encontrado"
Si ObjetoDocConf ormidadSustQuimica<>Null Mostrar Datos
Dar Click en Registrar Registrar Doc Env io Sust Quimica
Registrar ()
VariableDocEnv ioSustQuimica
Si VariableDocEnv ioSustQuimica=1 Msje "Datos Registrados" Si VariableDocEnv ioSustQuimica<>1 Msje "Error Registrado"
Dar Click en Actualizar
Actualizar Doc Env io Sust Quimica
Actualizar ()
Variable Doc Env io Sust Quimica
: DDocConf ormidadSustQuimica