Herramientas Informaticas

Etiqueta: SAP BUSINESS ONE

🚀 Mejora PRO en SAP Business One: Validaciones Inteligentes de Odómetro y Horómetro

Entrada fija

Si trabajas con SAP Business One y manejas maquinaria o activos… esto te va a ahorrar MUCHOS dolores de cabeza 👇


🤯 El problema

Errores genéricos como:

❌ “Debe indicar el Odómetro al producto Aceite hidráulico”

Y tú:

  • 🤔 ¿Cuál línea?
  • 🤔 ¿Qué activo?
  • 🤔 ¿Dónde corrijo?

Resultado:

  • ⏳ Pierdes tiempo
  • 😤 Corriges mal
  • 🔁 El error vuelve a salir

💡 La solución

Ahora los mensajes muestran:

  • ✅ Código del activo
  • ✅ Nombre del activo
  • ✅ Línea exacta

🔥 Ejemplo:

Debe indicar el Odómetro al activo EQ-001 – Excavadora CAT (Línea 3)


🧠 ¿Qué se hizo?

  • ✔ Se usa el activo desde OcrCode
  • ✔ Se hace fallback al artículo si no hay activo
  • ✔ Se corrige LineNum + 1

🔧 Código completo listo para pegar

IF (:transaction_type = 'A') AND :object_type = '60' AND error_message = 'Ok'
THEN  

     select 
       max(
         case 

           when ifnull(t1."U_TypeMov",'') = '' 
                and ifnull(t1."BaseType",0) <> 202 then 
             'Seleccione el tipo de movimiento'

           when ifnull(t2."QryGroup11",'N') = 'Y' 
                and ifnull(t1."OcrCode",'') = '' 
                and ifnull(t1."U_TypeMov",'') = 'CONSUMO' then 
             'El articulo ' || t1."Dscription" || ' se especifico que debe seleccionarse la maquinaria'

           when ifnull(t4."QryGroup9",'N') = 'Y' 
                and ifnull(t2."QryGroup11",'N') = 'Y' 
                and ifnull(t1."U_Odometro",0) = 0 
                and ifnull(t1."U_TypeMov",'') = 'CONSUMO' then 
             'Debe indicar el Odometro al activo ' 
             || IFNULL(t4."ItemCode", t2."ItemCode")
             || ' - ' || IFNULL(t4."ItemName", t2."ItemName")
             || ' (Línea ' || (ifnull(t1."LineNum",0) + 1) || ')'

           when ifnull(t4."QryGroup9",'N') = 'N' 
                and ifnull(t1."U_Odometro",0) <> 0 then 
             'Quite el valor del campo Odometro en el activo ' 
             || IFNULL(t4."ItemCode", t2."ItemCode")
             || ' - ' || IFNULL(t4."ItemName", t2."ItemName")
             || ' (Línea ' || (ifnull(t1."LineNum",0) + 1) || ')'

           when ifnull(t4."QryGroup8",'N') = 'Y' 
                and ifnull(t2."QryGroup11",'N') = 'Y' 
                and ifnull(t1."U_Horometro",0) = 0  
                and ifnull(t1."U_TypeMov",'') = 'CONSUMO' then 
             'Debe indicar el Horometro al activo ' 
             || IFNULL(t4."ItemCode", t2."ItemCode")
             || ' - ' || IFNULL(t4."ItemName", t2."ItemName")
             || ' (Línea ' || (ifnull(t1."LineNum",0) + 1) || ')'

           when ifnull(t4."QryGroup8",'N') = 'N' 
                and ifnull(t1."U_Horometro",0) <> 0 then 
             'Quite el valor del campo Horometro en el activo ' 
             || IFNULL(t4."ItemCode", t2."ItemCode")
             || ' - ' || IFNULL(t4."ItemName", t2."ItemName")
             || ' (Línea ' || (ifnull(t1."LineNum",0) + 1) || ')'

           when ifnull(t2."QryGroup11",'N') = 'Y' 
                and (ifnull(t4."QryGroup8",'N') = 'Y' or ifnull(t4."QryGroup9",'N') = 'Y') 
                and ifnull(t1."U_Empleado",0) = 0  
                and ifnull(t1."U_TypeMov",'') = 'CONSUMO' then 
             'Debe indicar el empleado que recibe el producto ' || t1."Dscription"

           when ifnull(t2."QryGroup11",'N') = 'Y' 
                and (ifnull(t4."QryGroup8",'N') = 'Y' or ifnull(t4."QryGroup9",'N') = 'Y') 
                and ifnull(t1."U_HoraMovto",0) = 0  
                and ifnull(t1."U_TypeMov",'') = 'CONSUMO' then 
             'Debe indicar la hora en que se recibe el producto ' || t1."Dscription"

           when ifnull(t2."QryGroup11",'N') = 'Y' 
                and (ifnull(t4."QryGroup8",'N') = 'Y' or ifnull(t4."QryGroup9",'N') = 'Y') 
                and LENGTH(ifnull(t1."U_HoraMovto",0)) < 3  
                and ifnull(t1."U_TypeMov",'') = 'CONSUMO' then 
             'Verifique la hora del producto ' || t1."Dscription"

           else '' 
         end
       ) ERROR
     INTO error_message
     from OIGE t0
     inner join IGE1 t1 on t0."DocEntry" = t1."DocEntry"
     inner join OITM t2 on t2."ItemCode" = t1."ItemCode"
     left join OITM t4 on t4."ItemCode" = t1."OcrCode"
     left join "QUA_PermisosWhsUser" t3 
           on t3."WhsCode" = t1."WhsCode" 
          and t3."userId"  = t0."UserSign"
     where t0."DocEntry" = :list_of_cols_val_tab_del;

     IF IFNULL(:error_message, N'') <> N'' THEN 
        error := -10046;
     ELSE 
        error_message := N'Ok';
     END IF;
END IF;

📈 Beneficios

  • 🔥 Mensajes claros
  • 🔥 Menos errores
  • 🔥 Más productividad
  • 🔥 Mejor control de activos

🧩 Conclusión

Pequeño cambio… GRAN impacto 🚀

Tu sistema pasa de:

❌ Confuso
✅ Profesional y claro


💬 ¿Quieres más mejoras como esta?

Puedo ayudarte con:

  • ⚙️ Validaciones avanzadas
  • 🚀 Optimización de SQL
  • 🧠 Automatización en SAP

Solo dime 👇

🔒 Cómo validar documentos copiados en SAP Business One usando SBO_SP_TransactionNotification (Guía completa)

Entrada fija

🔒 Cómo validar documentos copiados en SAP Business One usando SBO_SP_TransactionNotification (Guía completa)

En SAP Business One es muy común que los usuarios copien documentos para agilizar procesos. Por ejemplo, copiar una Salida de Mercancía y convertirla en una Entrada de Mercancía.

Sin embargo, esto puede generar un problema serio: los usuarios podrían modificar las líneas del documento (cambiar cantidades, precios o incluso eliminar artículos) antes de guardar.

Esto rompe la integridad de los datos del inventario.

La buena noticia es que SAP Business One permite evitar esto usando el procedimiento almacenado SBO_SP_TransactionNotification.

En esta guía aprenderás:

  • ✅ Qué es SBO_SP_TransactionNotification
  • ✅ Cómo validar documentos copiados
  • ✅ Cómo impedir cambios en líneas
  • ✅ Cómo evitar eliminar o agregar artículos
  • ✅ Cómo detectar si un documento fue copiado desde otro
  • ✅ Ejemplo completo listo para usar

📌 ¿Qué es SBO_SP_TransactionNotification?

SBO_SP_TransactionNotification es un procedimiento almacenado que se ejecuta automáticamente cada vez que se crea, actualiza o elimina un documento en SAP Business One.

Esto permite validar reglas de negocio personalizadas antes de que el documento se guarde.

Por ejemplo:

  • 🚫 Bloquear precios incorrectos
  • 🚫 Impedir documentos incompletos
  • 🚫 Validar campos obligatorios
  • 🚫 Evitar cambios en documentos copiados

Si una validación falla, SAP muestra un mensaje al usuario y el documento no se guarda.


🏗️ Cómo funciona la copia de documentos en SAP Business One

Cuando copias un documento en SAP Business One, el sistema guarda referencias al documento original.

Por ejemplo:

  • Salida de mercancía → Entrada de mercancía

Las tablas involucradas son:

DocumentoEncabezadoDetalle
Salida de mercancíaOIGEIGE1
Entrada de mercancíaOIGNIGN1

La relación entre documentos se guarda en las líneas del documento destino.


🔗 Campos que conectan los documentos

Cuando un documento se copia, SAP guarda estos campos en la tabla del detalle:

CampoDescripción
BaseEntryDocEntry del documento origen
BaseLineLínea del documento origen
BaseTypeTipo de documento origen
BaseRefNúmero visible del documento origen

Esto permite reconstruir la relación entre documentos.


📊 Ejemplo de relación entre documentos

Supongamos que existe esta salida de mercancía:

OIGE
DocEntry = 120
DocNum = 4500

Detalle:

IGE1
DocEntry = 120
LineNum = 0
ItemCode = ITEM001
Quantity = 5

Luego se crea una entrada copiando ese documento:

IGN1
DocEntry = 300
BaseEntry = 120
BaseLine = 0
BaseType = 60

Esto indica que la entrada proviene de esa salida.


⚠️ Problema común en SAP Business One

Cuando un usuario copia un documento, puede modificar datos antes de guardarlo:

  • ✏️ Cambiar cantidades
  • ✏️ Cambiar precios
  • ✏️ Eliminar líneas
  • ✏️ Agregar artículos

Esto puede provocar inconsistencias en inventario y contabilidad.


🎯 Objetivo de nuestra validación

La validación debe impedir:

  • ❌ eliminar líneas
  • ❌ agregar líneas
  • ❌ cambiar artículo
  • ❌ cambiar descripción
  • ❌ cambiar cantidad
  • ❌ cambiar precio
  • ❌ cambiar almacén
  • ❌ cambiar centro de costo

Pero solo cuando el documento proviene de una Salida de Mercancía.


🧠 Detectar si un documento fue copiado

La forma más sencilla es revisar si el campo BaseEntry tiene valor.

SELECT BaseEntry
FROM IGN1
WHERE DocEntry = :DocEntry

Si el valor existe, el documento proviene de otro.


🧾 Código completo de validación

IF :object_type = '59' AND (:transaction_type = 'A' OR :transaction_type = 'U') THEN

DECLARE v_base_doc INT;
DECLARE v_lineas_base INT;
DECLARE v_lineas_doc INT;
DECLARE v_changes INT;

SELECT TOP 1 "BaseEntry"
INTO v_base_doc
FROM "IGN1"
WHERE "DocEntry" = :list_of_cols_val_tab_del;

IF v_base_doc IS NOT NULL THEN

SELECT COUNT(*)
INTO v_lineas_base
FROM "IGE1"
WHERE "DocEntry" = v_base_doc;

SELECT COUNT(*)
INTO v_lineas_doc
FROM "IGN1"
WHERE "DocEntry" = :list_of_cols_val_tab_del;

IF v_lineas_base <> v_lineas_doc THEN
error := -9200;
error_message := 'No se permite eliminar o agregar lineas del documento copiado.';
END IF;

SELECT COUNT(*)
INTO v_changes
FROM "IGN1" A
JOIN "IGE1" B
ON A."BaseEntry" = B."DocEntry"
AND A."BaseLine" = B."LineNum"
WHERE A."DocEntry" = :list_of_cols_val_tab_del
AND (
IFNULL(A."ItemCode",'') <> IFNULL(B."ItemCode",'')
OR IFNULL(A."Dscription",'') <> IFNULL(B."Dscription",'')
OR IFNULL(A."Quantity",0) <> IFNULL(B."Quantity",0)
OR IFNULL(A."Price",0) <> IFNULL(B."Price",0)
OR IFNULL(A."WhsCode",'') <> IFNULL(B."WhsCode",'')
OR IFNULL(A."OcrCode",'') <> IFNULL(B."OcrCode",'')
);

IF v_changes > 0 THEN
error := -9201;
error_message := 'No se permite modificar las lineas del documento base.';
END IF;

END IF;

END IF;

🧪 Cómo probar la validación

Para verificar que todo funcione:

  1. Crear una salida de mercancía
  2. Copiarla a entrada de mercancía
  3. Intentar cambiar cantidad
  4. Intentar borrar una línea
  5. Intentar agregar una línea

Si la validación funciona correctamente, SAP mostrará un mensaje de error.


💡 Consejos profesionales

Los consultores SAP suelen aplicar estas recomendaciones:

  • 🔹 Validar siempre BaseType
  • 🔹 Comparar líneas con BaseLine
  • 🔹 Bloquear cambios críticos
  • 🔹 Usar mensajes claros para el usuario

🚀 Beneficios de esta validación

  • ✔ Evita errores humanos
  • ✔ Protege la integridad del inventario
  • ✔ Mantiene trazabilidad entre documentos
  • ✔ Mejora auditorías
  • ✔ Reduce inconsistencias contables

📚 Conclusión

El procedimiento SBO_SP_TransactionNotification es una herramienta poderosa para implementar reglas de negocio en SAP Business One.

Con la validación adecuada puedes garantizar que los documentos copiados mantengan exactamente la misma información que el documento original.

Esto mejora la calidad de los datos, reduce errores y asegura que el inventario refleje la realidad operativa de la empresa.

Si trabajas con SAP Business One, dominar este procedimiento es una habilidad clave para cualquier consultor o desarrollador.

💡 Implementar controles como este puede ahorrar muchos problemas en producción.

Obtener la lista de precios de SAP a través Service Layer

Para traer la el catalogo de listas de precios usaremos la siguiente URL en GET

https://localhost:50000/b1s/v1/PriceLists?$select=PriceListNo,PriceListName&$filter=Active eq 'tYES'  and substringof('TRIT',PriceListNo) or substringof('TRIT',PriceListName)

Como pueden observar usamos la funcion substringof como el equivalente al like de SQL

Quedaría mas o menos de esta forma

Ahora la función quedaría de la siguiente forma

    /* =============================================
      MOSTRAR
      ============================================= */

    static public function ctrMostrar($cookie, $filtro) {


        $curl = curl_init();

        curl_setopt_array($curl, [
            CURLOPT_PORT => "50000",
            CURLOPT_URL => "https://localhost:50000/b1s/v1/PriceLists?%24select=PriceListNo%2CPriceListName&%24filter=Active%20eq%20'tYES'%20%20and%20substringof('$filtro'%2CPriceListNo)%20or%20substringof('$filtro'%2CPriceListName)",
            CURLOPT_RETURNTRANSFER => true,
            CURLOPT_ENCODING => "",
            CURLOPT_COOKIE => $cookie,
            CURLOPT_SSL_VERIFYHOST => false,
            CURLOPT_SSL_VERIFYPEER => false,
            CURLOPT_MAXREDIRS => 10,
            CURLOPT_TIMEOUT => 30,
            CURLOPT_HTTP_VERSION => CURL_HTTP_VERSION_1_1,
            CURLOPT_CUSTOMREQUEST => "GET",
            CURLOPT_HTTPHEADER => [
                "Accept: */*",
                "User-Agent: Thunder Client (https://www.thunderclient.com)"
            ],
        ]);

        $response = curl_exec($curl);
        $err = curl_error($curl);

        curl_close($curl);

        if ($err) {
            return "cURL Error #:" . $err;
        } else {
            return json_decode($response);
        }


        $response = json_decode($response);

        return $response;
    }

Y bien saben el resto es historia

Obtener lista de usuarios SAP a través de Service Layer

Lo que haremos en esta ocasión en hacer la consulta al service layer para usarlo en un Select2 vía AJAX y PHP primera mente usaremos la siguiente petición de tipo GET URL

https://localhost:50000/b1s/v1/Users?$select=InternalKey,UserCode,Group,UserName&$filter=Group eq 'ug_Regular'  and substringof('Julio',UserName)  or substringof('Julio',UserCode)&$orderby=InternalKey

Como ven usamos la función substringof que seria el equivalente en SQL al like ‘%%’

Quedando mas o menos asi

Ahora transformamos la petición a una función de PHP en la que recibimos la cookie y el filtro para buscar los usuarios

    /* =============================================
      MOSTRAR
      ============================================= */

    static public function ctrMostrar($cookie, $filtro) {


        $curl = curl_init();

        curl_setopt_array($curl, [
            CURLOPT_PORT => "50000",
            CURLOPT_URL => "https://localhost:50000/b1s/v1/Users?%24select=InternalKey%2CUserCode%2CGroup%2CUserName&%24filter=Group%20eq%20'ug_Regular'%20%20and%20substringof('$filtro'%2CUserName)%20%20or%20substringof('$filtro'%2CUserCode)&%24orderby=InternalKey",
            CURLOPT_RETURNTRANSFER => true,
            CURLOPT_ENCODING => "",
            CURLOPT_COOKIE => $cookie,
            CURLOPT_SSL_VERIFYHOST => false,
            CURLOPT_SSL_VERIFYPEER => false,
            CURLOPT_MAXREDIRS => 10,
            CURLOPT_TIMEOUT => 30,
            CURLOPT_HTTP_VERSION => CURL_HTTP_VERSION_1_1,
            CURLOPT_CUSTOMREQUEST => "GET",
            CURLOPT_HTTPHEADER => [
                "Accept: */*",
                "User-Agent: Thunder Client (https://www.thunderclient.com)"
            ],
        ]);

        $response = curl_exec($curl);
        $err = curl_error($curl);

        curl_close($curl);

        if ($err) {
            return "cURL Error #:" . $err;
        } else {
            return json_decode($response);
        }


        $response = json_decode($response);

        return $response;
    }

Ahora en el archivo de consulta se usaría de la siguiente forma, hacemos el Login, consultamos, hacemos el Logout, y formamos la cadena JSON de la siguiente forma

   $busqueda = $_POST["searchTerm"];

    $conexionSAP = ServiceLayer::login();

    $cookie = "B1SESSION=" . $conexionSAP->SessionId . ";  ROUTEID=.node1";

    $usuariosSAP = ControladorUsuariosSAP::ctrMostrar($cookie, $busqueda);

    $usuariosSAPLista = $usuariosSAP->value;

    $usuariosSAP = ServiceLayer::logout($cookie);

    $jsonVariable = ' { "results": [';

    foreach ($usuariosSAPLista as $keyUsuarios1 => $valueUsuarios1) {


        $jsonVariable .= ' {
      "id": "' . $valueUsuarios1->UserCode . '",
      "text": "' . utf8_encode($valueUsuarios1->UserCode . " - " . $valueUsuarios1->UserName) . '"
    },';
    }

    $jsonVariable = substr($jsonVariable, 0, -1);

    $jsonVariable .= ' ]
}';

    echo ($jsonVariable);

Y listo ya esto obtenemos los datos requeridos

Haciendo Logout en Service Layer en SAP y pasar el código en PHP 8.3

Bien ahora vamos a mostrar como hacer el logout, es decir, cerrar la sesión, vamos hacer la petición tipo GET con la siguiente URL

https://localhost:50000/b1s/v1/Logout

Quedando de la siguiente forma

La función en PHP seria la siguiente

 static public function logout($cookie) {

        $curl = curl_init();

        curl_setopt_array($curl, [
            CURLOPT_PORT => "50000",
            CURLOPT_URL => "https://hanagusa:50000/b1s/v1/Logout",
            CURLOPT_RETURNTRANSFER => true,
            CURLOPT_ENCODING => "",
            CURLOPT_MAXREDIRS => 10,
            CURLOPT_TIMEOUT => 30,
            CURLOPT_COOKIE => $cookie,
            CURLOPT_SSL_VERIFYHOST => false,
            CURLOPT_SSL_VERIFYPEER => false,
            CURLOPT_HTTP_VERSION => CURL_HTTP_VERSION_1_1,
            CURLOPT_CUSTOMREQUEST => "POST",
            CURLOPT_HTTPHEADER => [
                "Accept: */*",
                "User-Agent: Gisa Web Client (https://www.thunderclient.com)"
            ],
        ]);

        $response = curl_exec($curl);
        $err = curl_error($curl);

        curl_close($curl);

        if ($err) {
            return "cURL Error #:" . $err;
        } else {
            return $response;
        }
    }

Ya al momento de usarlo en PHP desde el Login has ta el Logout seria de la siguiente forma

$conexionSAP = ServiceLayer::login();

// Construimos la cookie

$cookie = "B1SESSION=" . $conexionSAP->SessionId . ";  ROUTEID=.node1";

$sucursalesSAP = ControladorSucursalSAP::ctrMostrar($cookie);

$sucursalesSAP = $sucursalesSAP->value;

// Cerramos la session enviando la Cookie
$conexionSAP = ServiceLayer::logout($cookie);

Ejemplos Service Layer SAP

A continuación pondremos a su disposición algunos ejemplos de peticiones al Service Layer del SAP así como el código en PHP

  1. Postman en Visual Studio Code
  2. Haciendo Login en Service Layer en SAP y pasar el código en PHP 8.3
  3. Haciendo Logout en Service Layer en SAP y pasar el código en PHP 8.3
  4. Obtener lista de usuarios SAP a través de Service Layer
  5. Obtener la lista de precios de SAP a través Service Layer
  6. Crear Consultas Personalizadas en Service Layer SAP
  7. Modificar consultas Personalizadas en Service Layer SAP
  8. Leer consultas Personalizadas en Service Layer SAP

Haciendo Login en Service Layer en SAP y pasar el código en PHP 8.3

El primer paso para comenzar usar el service layer es lógicamente hacer el login para posteriormente hacer las consultas necesarias

En la extensión Thunder Client abrimos la petición de tipo POST y ponemos la siguiente URL

https://localhost:50000/b1s/v1/Login

Lógicamente en donde dice localhost va la IP de su servidor

En la sección de Body elegimos el contenido JSON y le ponemos el siguiente código con los datos de inicio de sesión

{
    "CompanyDB": "TEST_GUSA",
    "Password": "sap123",
    "UserName": "LMPROGRAM"
}

Quedaría tal y como se ve en la imagen de arriba

Como resultado dará el código que se muestra abajo

{
  "odata.metadata": "https://localhost:50000/b1s/v1/$metadata#B1Sessions/@Element",
  "SessionId": "1d66ff02-6169-11ef-c000-000c2949cf9d-139784632008704-3563",
  "Version": "1000201",
  "SessionTimeout": 30
}

Ahora creamos nuestra función para hacer esa petición desde el código PHP

    static public function login() {


        $curl = curl_init();

        curl_setopt_array($curl, [
            CURLOPT_PORT => "50000",
            CURLOPT_URL => "https://localhost:50000/b1s/v1/Login",
            CURLOPT_RETURNTRANSFER => true,
            CURLOPT_ENCODING => "",
            CURLOPT_SSL_VERIFYHOST => false,
            CURLOPT_SSL_VERIFYPEER => false,
            CURLOPT_MAXREDIRS => 10,
            CURLOPT_TIMEOUT => 30,
            CURLOPT_HTTP_VERSION => CURL_HTTP_VERSION_1_1,
            CURLOPT_CUSTOMREQUEST => "POST",
            CURLOPT_POSTFIELDS => "{\n    \"CompanyDB\": \"BASE DE DATOS PRUEBA\",\n    \"Password\": \"PASWORD\",\n    \"UserName\": \"NOMBREUSUARIO\"\n}\n",
            CURLOPT_HTTPHEADER => [
                "Accept: */*",
                "Content-Type: application/json",
                "User-Agent: (https://www.thunderclient.com)"
            ],
        ]);

        $response = curl_exec($curl);
        $err = curl_error($curl);

        curl_close($curl);

        if ($err) {
            return "cURL Error #:" . $err;
        } else {

            return json_decode($response);
        }
    }

Y listo ya con eso iniciamos sesión desde PHP, y nos regresa las variables necesarias para crear la cookie

Creado con WordPress & Tema de Anders Norén