Página 14 de 133. A exibir 1,328 resultados (0.187 segundos)
LJ7078 - Customização da Mensagem do Cupom Fiscal para Lei da Transparência 12.741/2012
$ " + Alltrim(Str(nTotaImp)) +" (" + Alltrim(Str(npercVenda)) +"%)" + _CTRL // ou para a implementação por Ente Tributário cMsgCupom := ' Tributos Fed R$ ' + Alltrim(Str(nTotFed)) + ' Est R$ ' + Alltrim(Str(nTotEst)) + ' Mun R$ ' + Alltrim(Str(nTotMun)) + _CTRL Return cMsgCupom Idioma Português(Brasil) VersõesTQueueSvc:PutMsg
" + " Erro: " + AllTrim(Str(nRet))) Return .F. Else ConOut("Setup de Fila OK - " + oTQLS:cName + " nMsgRetPer: " + AllTrim(Str(oTQLS:nMsgRetPer)) + " nVisTimeOut: " + AllTrim(Str(oTQLS:nVisTimeOut))) EndIf // Grava a mensagem nRet := oTQLS:PutMsg( @cMsgId1, cMsg ) If nRet != 0 ConOut("### ERROTQueueSvc:WaitMsg
### " + "Erro ao fazer o Setup" + " Erro: " + AllTrim(Str(nRet))) Return .F. Else ConOut("Setup de Fila OK - " + oTQLS:cName + " nMsgRetPer: " + AllTrim(Str(oTQLS:nMsgRetPer)) + " nVisTimeOut: " + AllTrim(Str(oTQLS:nVisTimeOut))) EndIf // Obtendo valor de indicacao de que nao tem mais mensagens nNO_MSGSGPE02012 - Tabelas P12 RH
GPEA320 RCD Historico de Itens de Visões RCD_FILIAL+RCD_CODIGO+RCD_ITEM+DTOS(RCD_DATA)+STR(RCD_HORA,5,2)+RCD_OPERAC RCE Sindicatos RCE_FILIAL … RCK Conta Corrente Valores Futuros RCK_FILIAL+RCK_MAT+RCK_PD+RCK_PER+RCK_NUMID+STR(RCK_SEQUEN,5) RCL Cadastro de Postos RCL_FILIAL+RCL_POSTODRHPAG-44973 DT Migração da tabela MSA_CONTROL_MARCAC para a tabela RR1
RR1_CODREL+STR(RR1_CODNSR,9) 6 STR(RR1_VALCON,16)+RR1_CODREL+STR(RR1_CODNSR,9) 7 RR1_CODREP+STR(RR1_CODNSR,9) 8 STR(RR1_VALCON,16)+RR1_CODREP+STRPontos de Entrada para fontes Advpl desenvolvidos utilizando o conceito MVC
' cMsg += 'É um FORMGRID com ' + Alltrim( Str( nQtdLinhas ) ) + ; ' linha(s).' + CRLF cMsg += 'Posicionado na linha ' + Alltrim( Str … ).' + CRLF cMsg += 'Onde esta se tentando deletar uma linha' + CRLF cMsg += 'É um FORMGRID com ' + Alltrim( Str( nQtdLinhasDT_Replica_MRP_Gestao_de_Empresas
OP_FILIAL+OP_CDEPCZ+OP_CDESCZ+OP_CDEPGR+OP_CDESGR+STR(OP_NRPYGR) Descrição Grupo + Filial + Grupo + Grupo Filial + Prioridade Proprietário S … Índice SOP Ordem 3 Chave OP_FILIAL+OP_CDEPCZ+OP_EMPRCZ+OP_UNIDCZ+OP_CDESCZ+OP_CDEPGR+OP_EMPRGR+OP_UNIDGR+OP_CDESGR+STR(OP_NRPYGRMNTA6552 - Checagem de Abastecimento
) Return .f. Else For i:= 1 to Day(dDataBase) dDataCheck := CtoD(AllTrim(Str(i))+"/"+AllTrim(Str(Month(dDataBase)))+"/"+AllTrim(Str(Year(dDataBase … (Str(nDiasLim))+"º dia útil permitido somente até "+CHR(10)+" as "+ hHora+":"+hMinu +" horas" Help(" ",1,"ATENÇÃO",,cMsg,3,1) Return .f. ElseDT PE MNTA6552 - Realiza checagem conforme parametrização na rotina de Abastecimento Manual (MNTA655)
) Return .F. Else For i:= 1 to Day(dDataBase) dDataCheck := CtoD(AllTrim(Str(i))+"/"+AllTrim(Str(Month(dDataBase)))+"/"+AllTrim(Str(Year(dDataBase)))) lFeriado := NGFERIADO(dDataCheck) If Dow(dDataCheck) <> 1 .And. Dow(dDataCheck) <> 7 .AND. !lFeriadoMétodo TJsonParser:Json_Hash
== .F. ) ConOut("##### [JSON][ERR] " + "Parser com erro" + " MSG len: " + AllTrim(Str(lenStrJson)) + " bytes lidos: " + AllTrim(Str(nRetParser))) ConOut("Erro a partir: " + SubStr(strJson, (nRetParser+1))) Else ConOut("[JSON] "+ "+++++ PARSER OK num campos: " + AllTrim(Str(Len(aJsonfields))) + " MSG len