Pular para o conteúdo principal

Postagem em destaque

BlackTDN :: Como Criar Relatórios de Cotações com Dados Agrupados Usando SQL

img: DALL·E 2024-08-09 07.00.00 - A high-quality image showcasing a detailed SQL query being written in a code editor, such as VS Code, on a dark theme background. ... ## Como Criar Relatórios de Cotações com Dados Agrupados Usando SQL Quando trabalhamos com sistemas ERP e precisamos gerar relatórios de cotações que apresentam dados de múltiplos fornecedores, é comum encontrarmos a necessidade de pivotar registros que, originalmente, são apresentados de forma vertical. Isso é especialmente útil quando o objetivo é comparar preços ou condições de diferentes fornecedores para um mesmo produto em uma única linha do relatório. Neste artigo, vamos explorar uma abordagem para transformar registros verticais em colunas, facilitando a impressão de relatórios que consolidam informações de vários fornecedores em uma única linha. Vamos utilizar SQL com técnicas de pivotagem, e ao final, mostraremos como estender essa técnica para um número variável de fornecedores. ### Estrutura do Relatór

BlackTDN :: Descompactando arquivos includes .ch e .th



 O pessoal da Imsys já tinha criado uma versão para descompactar arquivos include. Mas, por algum motivo a versão deles não estã funcionando. Sendo assim. Disponibilizo, aqui, duas novas versões.

*decompress.py

import zlib
import sys

with open(sys.argv[1], 'rb') as f:
    content = f.read()

decompress = zlib.decompressobj(-zlib.MAX_WBITS)
inflated = decompress.decompress(content[14:])
inflated += decompress.flush()

print(inflated[:-1].decode('utf-8', errors='ignore'))

Exemplo (python):

./decompress.py .\includes\sigawin.ch > sigawin.ch

*decompress.ps1

param (
    [string]$filePath
)

Add-Type -AssemblyName System.IO.Compression

$bytes = [System.IO.File]::ReadAllBytes($filePath)
$compressedContent = $bytes[14..($bytes.Length - 1)]
$stream = New-Object System.IO.MemoryStream
$stream.Write($compressedContent, 0, $compressedContent.Length)
$stream.Position = 0

$decompressor = New-Object System.IO.Compression.DeflateStream($stream, [System.IO.Compression.CompressionMode]::Decompress)
$reader = New-Object System.IO.StreamReader($decompressor, [System.Text.Encoding]::UTF8)

$inflated = $reader.ReadToEnd()
$reader.Close()

Write-Output ($inflated.Trim())

Exemplo (pwsh):

pwsh .\decompress.ps1 -filePath ".\includes\sigawin.ch" > .\sigawin.ch

[]s.

Comentários

Postagens mais visitadas