gilmer Posted July 11, 2018 Report Share Posted July 11, 2018 Bom Dia, Foi inserido tags novas, como também ajustado o manifesto para versão 4.0. Inserido métodos para NFC-e, contribuição Marcelo Marca. vonfeutil2g_v4_2.zip Quote Link to comment Share on other sites More sharing options...
kapiaba Posted July 11, 2018 Report Share Posted July 11, 2018 Boa tarde, Gilmer, como se invoca esse Método, sem que ele se torne chato para o usuário? Explico: Não pode ficar mostrando sempre que se entra na NF-e. Method StatusInternet() Class TVoNFeUtil2G Quote Link to comment Share on other sites More sharing options...
kapiaba Posted July 11, 2018 Report Share Posted July 11, 2018 Seria assim? IF oNFEUtil:StatusInternet() // NADA A FAZER? ELSE ? "Problemas na Internet" ENDIF Quote Link to comment Share on other sites More sharing options...
gilmer Posted July 11, 2018 Author Report Share Posted July 11, 2018 Na rotina ele já ira apresentar uma mensagem com o MsgStop que teve erro, já esta dentro da rotina. Eu sugiro usar apenas uma vez antes de iniciar o processo de transmissão de nota, ou seja, na primeira vez da criação do objeto TVoNfeUtil2G kapiaba 1 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted July 11, 2018 Report Share Posted July 11, 2018 ok, kapiskey(). many thanks. Quote Link to comment Share on other sites More sharing options...
gilmer Posted July 12, 2018 Author Report Share Posted July 12, 2018 Bom Dia, Em anexo uma nova atualização. vonfeutil2g_v4_3.zip JUDSON ROSA 1 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted August 1, 2018 Report Share Posted August 1, 2018 Achei. Obg. Quote Link to comment Share on other sites More sharing options...
gilmer Posted August 1, 2018 Author Report Share Posted August 1, 2018 Boa Tarde, Amanha estarei disponibilizando outra. kapiaba 1 Quote Link to comment Share on other sites More sharing options...
Luiz Fernando Posted August 2, 2018 Report Share Posted August 2, 2018 Uma coisa que tive que alterar aqui foi cST = 90, coloquei 0 aonde estava 1, pois estava indo as tag vazia , e dava erro no retorno. aadd( axArray, {"ICMS90" , {}, 1 } ); nPos := len(axArray) aadd( axArray[nPos][2], {"orig" , TVoNFeItem():New("N", 1, 1, 1 ,,,oItem:orig ) } ) aadd( axArray[nPos][2], {"CST" , TVoNFeItem():New("N", 1, 2, 2 ,,,oItem:cCST ) } ) aadd( axArray[nPos][2], {"modBC" , TVoNFeItem():New("N", 1, 1, 1 ,,,oItem:modBC) } ) aadd( axArray[nPos][2], {"vBC" , TVoNFeItem():New("N", 1, 1, 15,2,,oItem:vBC ) } ) aadd( axArray[nPos][2], {"pRedBC" , TVoNFeItem():New("N", 0, 5, 5 ,2,,oItem:pRedBC) } ) aadd( axArray[nPos][2], {"pICMS" , TVoNFeItem():New("N", 1, 5, 5 ,2,,oItem:pICMS) } ) aadd( axArray[nPos][2], {"vICMS" , TVoNFeItem():New("N", 1, 1, 15,2,,oItem:vICMS) } ) aadd( axArray[nPos][2], {"modBCST" , TVoNFeItem():New("N", 0, 1, 1 , ,,oItem:modBCST ) } ) // alterado aadd( axArray[nPos][2], {"pMVAST" , TVoNFeItem():New("N", 0, 5, 5 ,2 ,,oItem:pMVAST ) } ) // alterado aadd( axArray[nPos][2], {"pRedBCST" , TVoNFeItem():New("N", 0, 5, 5 ,2 ,,oItem:pRedBCST ) } ) // alterado aadd( axArray[nPos][2], {"vBCST" , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vBCST ) } ) // alterado aadd( axArray[nPos][2], {"pICMSST" , TVoNFeItem():New("N", 0, 5, 5 ,2 ,,oItem:pICMSST ) } ) // alterado aadd( axArray[nPos][2], {"vICMSST" , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vICMSST ) } ) // alterado aadd( axArray[nPos][2], {"vICMSDeson" , TVoNFeItem():New("N", 0, 1, 15,2,,oItem:vICMSDeson ) } ) aadd( axArray[nPos][2], {"motDesICMS" , TVoNFeItem():New("N", 0, 1, 02,,,oItem:motDesICMS ) } ) aadd( axArray[nPos][2], {"vBCFCP" , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vBCFCP ) } ) aadd( axArray[nPos][2], {"pFCP" , TVoNFeItem():New("N", 0, 1, 6 ,2 ,,oItem:pFCP ) } ) aadd( axArray[nPos][2], {"vFCP" , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vFCP ) } ) aadd( axArray[nPos][2], {"vBCFCPST" , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vBCFCPST ) } ) aadd( axArray[nPos][2], {"pFCPST" , TVoNFeItem():New("N", 0, 1, 6 ,2 ,,oItem:pFCPST ) } ) aadd( axArray[nPos][2], {"vFCPST" , TVoNFeItem():New("N", 0, 1, 15,2 ,,oItem:vFCPST ) } ) kapiaba 1 Quote Link to comment Share on other sites More sharing options...
gilmer Posted August 6, 2018 Author Report Share Posted August 6, 2018 Vou atualizar! obrigado Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.