Rodrigo Rodriguez (Pragmatismo)
48c1ae0b51
- Add startup wizard module for first-run configuration - Add white-label branding system with .product file support - Add bot manager for lifecycle, MinIO buckets, and templates - Add version tracking registry for component updates - Create comparison doc: BASIC vs n8n/Zapier/Make/Copilot - Add WhatsApp-style sample dialogs to template documentation - Add data traceability SVG diagram ```
92 lines
2.3 KiB
QBasic
92 lines
2.3 KiB
QBasic
REM Executa a cada dois dias, 23h.
|
|
SET SCHEDULE "0 0 0 */2 * *"
|
|
|
|
REM Variables from config.csv: admin1, admin2, host, limit, pages
|
|
REM Using admin1 for notifications
|
|
admin = admin1
|
|
|
|
REM Pagination settings for Bling API
|
|
pageVariable = "pagina"
|
|
limitVariable = "limite"
|
|
syncLimit = 100
|
|
|
|
REM ============================================
|
|
REM Sync Contas a Receber (Accounts Receivable)
|
|
REM ============================================
|
|
SEND EMAIL admin, "Sincronizando Contas a Receber..."
|
|
|
|
page = 1
|
|
totalReceber = 0
|
|
|
|
DO WHILE page > 0 AND page <= pages
|
|
url = host + "/contas/receber?" + pageVariable + "=" + page + "&" + limitVariable + "=" + syncLimit
|
|
res = GET url
|
|
WAIT 0.33
|
|
|
|
IF res.data THEN
|
|
items = res.data
|
|
itemCount = UBOUND(items)
|
|
|
|
IF itemCount > 0 THEN
|
|
MERGE "maria.ContasAReceber" WITH items BY "Id"
|
|
totalReceber = totalReceber + itemCount
|
|
page = page + 1
|
|
|
|
IF itemCount < syncLimit THEN
|
|
page = 0
|
|
END IF
|
|
ELSE
|
|
page = 0
|
|
END IF
|
|
ELSE
|
|
page = 0
|
|
END IF
|
|
|
|
res = null
|
|
items = null
|
|
LOOP
|
|
|
|
SEND EMAIL admin, "Contas a Receber sincronizadas: " + totalReceber + " registros."
|
|
|
|
REM ============================================
|
|
REM Sync Contas a Pagar (Accounts Payable)
|
|
REM ============================================
|
|
SEND EMAIL admin, "Sincronizando Contas a Pagar..."
|
|
|
|
page = 1
|
|
totalPagar = 0
|
|
|
|
DO WHILE page > 0 AND page <= pages
|
|
url = host + "/contas/pagar?" + pageVariable + "=" + page + "&" + limitVariable + "=" + syncLimit
|
|
res = GET url
|
|
WAIT 0.33
|
|
|
|
IF res.data THEN
|
|
items = res.data
|
|
itemCount = UBOUND(items)
|
|
|
|
IF itemCount > 0 THEN
|
|
MERGE "maria.ContasAPagar" WITH items BY "Id"
|
|
totalPagar = totalPagar + itemCount
|
|
page = page + 1
|
|
|
|
IF itemCount < syncLimit THEN
|
|
page = 0
|
|
END IF
|
|
ELSE
|
|
page = 0
|
|
END IF
|
|
ELSE
|
|
page = 0
|
|
END IF
|
|
|
|
res = null
|
|
items = null
|
|
LOOP
|
|
|
|
SEND EMAIL admin, "Contas a Pagar sincronizadas: " + totalPagar + " registros."
|
|
|
|
REM ============================================
|
|
REM Summary
|
|
REM ============================================
|
|
SEND EMAIL admin, "Transferência do ERP (Contas) para BlingBot concluído. Total: " + (totalReceber + totalPagar) + " registros."
|