| function Get-IniContent ($filePath) | |
| { | |
| $ini = @{} | |
| switch -regex -file $FilePath | |
| { | |
| “^\[(.+)\]” # Section | |
| { | |
| $section = $matches[1] | |
| $ini[$section] = @{} | |
| $CommentCount = 0 |
Install Team Explorer Everywhere Command Line Client
ruby -e "$(curl -fsSL https://raw.githubusercontent.com/Homebrew/install/master/install)" < /dev/null 2> /dev/null
| //---------------------------------------------------- | |
| // Verifico a necessidade de criar/atualizar cliente | |
| //---------------------------------------------------- | |
| dbSelectArea("SA1") | |
| SA1->( dbSetOrder(3) ) | |
| lInsere := !SA1->( MsSeek( xFilial('SA1') + oPedido['cliente']['cpf_cnpj'] ) ) | |
| nRec := ::updCustomer(lInsere, oPedido) |
| Nomes das Tabelas | |
| SX1 Manutenção de Perguntas de parametrização (movimentações, consultas e relatórios) | |
| SX2 Manutenção dos Arquivos | |
| SX3 Manutenção dos Campos | |
| SX4 Configuração de Agenda de Relatórios e Processos | |
| SX5 Manutenção de Tabelas | |
| SX6 Manutenção de Parâmetros | |
| SX7 Manutenção de Gatilhos de Campos (SX3) | |
| SX9 Manutenção de Relacionamento entre Arquivos (SX2) | |
| SXA Manutenção de Pastas Cadastrais dos Arquivos (SX2) |
| #include 'totvs.ch' | |
| User Function zUpload(cUploadDir) | |
| Local cArq := cGetFile('Arquivo *|*.*','Todos os Drives',0,'C:\Dir\',.T.,GETF_LOCALHARD,.T.) | |
| Default cUploadDir := "\uploads\" | |
| If !Empty( cArq ) | |
| If !ExistDir( cUploadDir ); MakeDir( cUploadDir ); EndIf; | |
| If CpyT2S(cArq, cUploadDir) |
| const pouchDB = require('pouchdb-node') | |
| const db = new pouchDB('database_name') | |
| let options = { limit: 5 } | |
| async function fetchNextPage () { | |
| try { | |
| const result = await db.allDocs(options) | |
| console.log(result.rows) | |
| if (result.rows.length > 0) { |
| #include 'totvs.ch' | |
| #include "TBICONN.CH" | |
| // EXEMPLO DE CHAMADA DA FUNCAO | |
| User Function Intel01tst() | |
| Local oPedidoEnvio, cPed, oVolume | |
| Local aItens := {} | |
| PREPARE ENVIRONMENT EMPRESA "01" FILIAL "0103" USER "ADMIN" PASSWORD "589@corp" MODULO "FAT" | |
| cPed := "000131" |
| import speech_recognition as sr | |
| from pyautogui import press, typewrite, hotkey | |
| r = sr.Recognizer() | |
| with sr.Microphone() as source: | |
| while True: | |
| try: | |
| audio = r.listen(source) | |
| result = r.recognize_google(audio,language="pt-BR") |
| #INCLUDE "TOTVS.CH" | |
| User Function RemoveEspec(cWord) | |
| cWord := OemToAnsi(AllTrim(cWord)) | |
| cWord := FwNoAccent(cWord) | |
| cWord := FwCutOff(cWord) | |
| cWord := strtran(cWord,"ã","a") | |
| cWord := strtran(cWord,"º","") | |
| cWord := strtran(cWord,"%","") | |
| cWord := strtran(cWord,"*","") |
| #include "PROTHEUS.ch" | |
| #include "RESTFUL.ch" | |
| #xtranslate @{Header <(cName)>} => ::GetHeader( <(cName)> ) | |
| #xtranslate @{Param <n>} => ::aURLParms\[ <n> \] | |
| #xtranslate @{EndRoute} => EndCase | |
| #xtranslate @{Route} => Do Case | |
| #xtranslate @{When <path>} => Case NGIsRoute( ::aURLParms, <path> ) | |
| #xtranslate @{Default} => Otherwise |