edutraini

Entendi vou continuar trabalhando assim por enquanto criando o temporario no disco local e depois mando para sql quando clicar em gravar Obrigado a todos

a minha duvida se continuo usando dessa forma ou para sql tenho que trabalhar de outra forma. Pois o arquivo temporario e gravado fisicamente na maquina e usando sql nas nuvens eu continuo criando o arquivo temporario ou existe alguma outra forma

Bom dia, Pessoal Estou mudando o meu sistema para SQL usando SQLRDD Na rotina que faço o Pedido de Vendas com dbf eu crio um arquivo temporario aonde vou incluindo os itens do pedido e na hora de gravar o pedido pego esse conteudo e gravo dentro do banco de dados como tenho que trabalhar com sql usando comando xbase No exemplo abaixo eu abro meu arquivo de itens do pedido e dou copy stru para o temporario e vou adicionando os itens e depois replace no arquivo principal SELE PEDI copy stru to &vn_arqiTEM

Bom dia Pessoal Estou mudando o meu sistema de dbf para sql Gostaria de tirar uma duvida em relação a logica de trabalhar com SQL. No Dbf eu travava o registro para que outro usuario nao tivesse acesso a mesma informacao que estava sendo editada o famoso rl() Qual melhor logica para trabalhar no SQL Exemplo : Tenho um agenda de medicos com seu devidos horarios .Alguem liga para marca uma consulta as 8:00 hs, para que dois atendentes, nao marquem no mesmo horario. Eu faço a consistencia na hora de gravar ou seja alguem vai primeiro ? Como vcs trabalham nessa situacao Obrigado

Boa tarde, pessoal Sabem me dizer se sqlrdd funciona com o banco de dados Mariadb Obrigado

Bom dia, Pessoal O Antivirus Mcafee fica excluindo o meu executavel alegando que tem um virus chamado generic vb.fu Alguem poderia me dar uma dica de como corrigir isso Obrigado

Boa tarde Gostaria de saber se consigo usar o banco de dados sql da microsoft usando a sqllib Obrigado

Method DC_ModEsp( c_Banco, mBSDG, mFGCB, mNMOG, lMult10 ) Class MR_Boleto LOCAL mVLDG LOCAL mSMMD LOCAL mCTDG LOCAL mSQMP LOCAL mRSDV LOCAL mDCMD := 0 IF c_Banco == "033" // Banespa mSMMD := 0 mSQMP := 3 FOR mCTDG := 1 TO Len( mNMOG ) mVLDG := Val( SubStr( mNMOG,Len(mNMOG ) - mCTDG + 1,1 ) ) * ( mSQMP ) mSMMD += mVLDG - ( Int( mVLDG / 10 ) * 10 ) mSQMP := IF( mSQMP == 3, 7, IF( mSQMP == 7,9,IF(mSQMP == 9,1,3 ) ) ) NEXT mRSDV := mSMMD - ( Int( mSMMD / 10 ) * 10 ) mDCMD := IF( mRSDV == 0, 0, 10 - mRSDV ) ENDIF * IF c_Banco == "756" // Sicoob mSMMD := 0 mSQMP := 3 FOR mCTDG := 1 TO LEN(mNMOG) mVLDG := VAL( SUBSTR( mNMOG , mCTDG, 1 ) ) * mSQMP mSMMD += mVLDG DO CASE CASE mSQMP == 3 ; mSQMP := 1 CASE mSQMP == 1 ; mSQMP := 9 CASE mSQMP == 9 ; mSQMP := 7 CASE mSQMP == 7 ; mSQMP := 3 ENDCASE NEXT mRSDV := Int( Mod( mSMMD, 11) ) IF mRSDV == 0 .OR. mRSDV == 1 mDCMD := 0 ELSE mDCMD := 11 - mRSDV ENDIF Endif RETURN Str( mDCMD, 1 )

Method Banco_756() Class MR_Boleto ::Banco_Dv_____ := "0" ::Banco_Nome___ := "Siccob" IF EMPTY( ::Prefixo______ ) ::Prefixo______ := ::Conta________ ::Conta________ := '' ::Prefixo_DV___ := ::Conta_DV_____ ::Conta_DV_____ := '' ENDIF ::NossoNumer_DV := ::DC_ModEsp( ::Banco________, 9, .F., ::Banco_Agencia + STRZERO(VAL(::Prefixo______),9) + ::Prefixo_DV___ + PADL( ALLTRIM( Left( ::NossoNumero__, 07 ) ), 07, '0' ), .F. ) ::NossoNumero_z := ::NossoNumero__ + "-" + ::NossoNumer_DV ::Banco_Agencia := PADL( ALLTRIM( Left( ::Banco_Agencia, 4 ) ), 4, '0' ) ::Ag_Cod_Cedent := TRAN( ::Banco_Agencia + '/' + strzero(val(::Prefixo______),6) + '-' + ::Prefixo_DV___ , "@!") *--> ::cCarteira := ::Carteira_____ ::cNumAgencia := ::Banco_Agencia ::cTipoCob := "01" ::cCDPF := strzero(val(::Prefixo______ ),6) ::cDVCDPF := ::Prefixo_DV___ ::cNsNm := ::NossoNumero__ +::NossoNumer_DV ::Campo_Livre__ := ::cCarteira + ::cNumAgencia + StrZero( Val( ::cTipoCob ),2 ) + ::cCDPF + ::cDVCDPF + ::cNsNm + "001" // teste eroni Return NIL

Boa tarde, Pessoal Tenho uma tela de atendimento que uso define window para criar a janela DEFINE WINDOW oWndAtendimento FROM nRow, nCol TO nWAlto + nRow, nWAncho + nCol ; // MDI ; PIXEL COLOR CLR_WHITE, Rgb( 220, 220, 220 ) TITLE cTitulo ; BORDER NONE Precisava criar uma janelad em formato popup no canto da tela dentro dessa tela mostrando algumas informacoes sem interferir na janela principal Caso o usuario nao precise mais da popup ele fecha Como poderia criar Obrigado

Ja voltou

Bom dia Pessoal Varios clientes aqui em Sao Paulo estao com problema no certificado digital Esse problema começou hoje ate ontem tudo normal Alguem sabe me dizer se e problema no sefaz

Boa tarde Kapi Realmente estava com problemas ja voltou Abraço

Bom dia Pessoal Varios clientes estao tendo problemas para emissao de nota fiscal eletronica em Sao Paulo para os clientes deles que nao tem inscricao estadual As notas estao sendo denegadas pelo codigo 302 Irregularidade Fiscal Ate ontem esta tirando nota normal para esses mesmos clientes Alguem sabe me dizer se teve alguma mudança Lembrando que no cadastro deles esta a opcao 9-Nao contribuinte

Method Banco_756() Class MR_Boleto ::Banco_Dv_____ := "0" ::Banco_Nome___ := "Siccob" IF EMPTY( ::Prefixo______ ) ::Prefixo______ := ::Conta________ ::Conta________ := '' ::Prefixo_DV___ := ::Conta_DV_____ ::Conta_DV_____ := '' ENDIF ::NossoNumer_DV := ::DC_ModEsp( ::Banco________, 9, .F., ::Banco_Agencia + STRZERO(VAL(::Prefixo______),9) + ::Prefixo_DV___ + PADL( ALLTRIM( Left( ::NossoNumero__, 07 ) ), 07, '0' ), .F. ) ::NossoNumero_z := ::NossoNumero__ + "-" + ::NossoNumer_DV ::Banco_Agencia := PADL( ALLTRIM( Left( ::Banco_Agencia, 4 ) ), 4, '0' ) ::Ag_Cod_Cedent := TRAN( ::Banco_Agencia + '/' + strzero(val(::Prefixo______),6) + '-' + ::Prefixo_DV___ , "@!") *--> ::cCarteira := ::Carteira_____ ::cNumAgencia := ::Banco_Agencia ::cTipoCob := "01" ::cCDPF := strzero(val(::Prefixo______ ),6) ::cDVCDPF := ::Prefixo_DV___ ::cNsNm := ::NossoNumero__ +::NossoNumer_DV ::Campo_Livre__ := ::cCarteira + ::cNumAgencia + StrZero( Val( ::cTipoCob ),2 ) + ::cCDPF + ::cDVCDPF + ::cNsNm + "001" // teste eroni Return NIL

Bom dia, Pessoal Um cliente meu quer fazer uma etiqueta com esse formato de codigo de barras caixa master (DUN/GTIN-14) Alguem sabe me dizer na tabela FastReport qual e o modelo devo configurar Obrigado

Bom dia, Pessoal Um cliente quer enviar o arquivo do sped fiscal com o registros das notas de vendas e compras Alguem teria um exemplo de quais registros preciso colocar no arquivo pois hj so mando o bloco K Obrigado

Obrigado Kapi vou ver como conseguir essa URL

Bom dia, Pessoal Um cliente perguntou se existe alguma forma de exporta a venda do mercado livre para dentro do meu sistema para poder emitir a nota fiscal de venda Para que nao fique dois emissores de nota fiscal de venda Obrigado

Foi publicada, no final do mês de agosto de 2020, a Nota Técnica 2020.004 no Portal da Nota Fiscal Eletrônica. As novidades desta NT impactam somente a Nota Fiscal Eletrônica (NF-e), modelo 55. O documento esclarece quais são os campos obrigatórios da NF-e para a geração do DANFE Simplificado, modelo Etiqueta. Confira as alterações e prepare seu software! Alguem ja esta fazendo essa etiqueta

bom dia no mrboleto ja esta tudo pronto Varios bancos Muito simples

emtinformatica

Bom dia Eu tenho uma rotina que meus clientes usam se puder ajudar me chama no skype emtinformatica