{
        FUNCION:        ipControlOrden
        FECHA:          Junio 05, 2025
        DESARROLLADO:   Ing. Juan Soto
}

FUNCTION controlOrden(pcodn,pcodgrupo,pcodtipo,pcodsec,orden,requisicion,cantidad)
    DEFINE pcodn,pcodgrupo,pcodtipo,pcodsec,orden,requisicion,cod_msg INT,
           cantidadConduce,cantidad DEC(12,4) 

    #CONTROL REQUISICION
     SELECT SUM(a.cantidad) INTO cantidadConduce
     FROM cctb00026 a 
     WHERE a.cod_n = pcodn AND
           a.cod_grupo = pcodgrupo AND
           a.cod_tipo = pcodtipo AND
           a.cod_sec = pcodsec AND
           a.num_req = requisicion

           
END FUNCTION