Debugando NFe

Algumas vezes, precisamos analisar ( debugar )  os dados que o GRC ou qualquer outro sistema de mensageria esta devolvendo para o R/3.

Para isso, necessitamos de um pequeno passo a passo que um Abap/GRC/PI  experiente em NFe me ensinou.

 

1)      Descobrir em qual  usuário a RFC esta sendo executada....

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

No monitor ( J1BNFE ), faça um clique duplo no campo N. doc – Numero do documento o docnum....

 

 

 

 

 

 

 

 

 

 

Observe na parte inferior do seu monitor que o usuário ( neste caso ) GRC_NFE,

atualizou o Cod. status para 100 – Autorizado....

Ou seja, é este o usuário de RFC para o GRC....que no meu caso é bastante claro....

 

2)      Atualizar o tipo usuário pela SU01, ou solicitar acesso para isso se você não tiver....

 

 

 

 

 

 

 

 

 

 

 

 

 

Alterar o usuário de RFC para Dialogo, para este debug......

Não esquecer de retornar o usuário para o tipo anterior....após o debug...

 

3)      Break Point

 

 

 

 

 

 

 

 

 

 

Executar a transação SE37 e chamar a Função J_1B_NFE_XML_IN_TAB.

Clicar em exibir.

 

 

 

 

 

 

 

 

 

 

 

Entrar em Utilitários e opções...

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Na pasta de depuração, alterar o usuário para o usuário de RFC...

 

 

Criar o break point externo no ponto desejado.

Pode ser no momento que você achar melhor, inclusive na Badi de impressão.

 

Agora é só executar o processo e aguardar o debug aparecer....

 

 

“O ato de compartilhar não é perder ou subtrair, e sim, somar ou multiplicar”

Blog Aparecido Borges

 

AVISO LEGAL

"As informações existentes nesta mensagem e nos arquivos anexados têm caráter confidencial e são para uso restrito. A utilização, divulgação, cópia ou distribuição desta mensagem, ou parte dela, por qualquer pessoa diferente do destinatário é proibida, sujeitando o infrator às sanções legais. Se esta mensagem foi recebida por engano, favor excluí-la e informar ao remetente pelo endereço eletrônico acima. Agradecemos sua cooperação."

DISCLAIMER

"This email and its attachments may contain privileged and/or confidential information. Use, disclosure, copying or distribution of this message, or part thereof, by anyone other than the intended recipient is strictly prohibited, and will submit the infractor to the legal sanctions. If you have received this email in error, please notify the sender by reply email and destroy all copies of this message. Thank you for your cooperation."

Ltttt êeeee

Código Transação Texto da transação                  
LB01    Criar necessidade de transferência  
LB02    Modificar necessidade transferência 
LB03    Exibir necessidade transferência    
LB10    NTs para tipo de depósito           
LB11    NTs para material                   
LB12    NTs e instr.transf.para material    
LB13    NTs para necessidade                
LH01    Atribuir UC picking a OT            
LH03    Atribuir UC picking a OT exibição   
LI01     Criar doc.inventário                
LI01N  Criar doc.inventário                
LI02     Modificar doc.inventário            
LI02N  Modificar doc.inventário            
LI03     Exibir doc.inventário               
LI03N  Exibir documento de inventário      
LI04     Imprimir doc.inventário             
LI05     Hist.invent.p/posição no depós.     
LI11     Entrar contagem inventário          
LI11N  Entrar contagem inventário          
LI12     Modificar contagem inventário       
LI12N  Modificar contagem inventário       
LI13     Exibir contagem inventário          
LI13N  Exibir contagem inventário          
LI14     Efetuar recontagem                  
LI20     Retificar diferenças inventário WM  
LI21     Retificar diferenças inventár.MM-IM 
LP10    Picking direto para OP              
LP11    Coloc.à disposição WM peças de caixa
LP11W Disponibiliz.WM peça de caixa (IAC) 
LP12    Colocar à disp.peças sol.rem.(WM/PP)
LS01    Criar mestre de depósito            
LS01N Criar mestre de depósito            
LS02    Modificar mestre de depósito        
LS02N Modificar mestre de depósito        
LS03    Exibir mestre de depósito           
LS03N Exibir mestre de depósito           
LS04    Exibir posições vazias              
LS05    Criação de posições no depósito     
LS22    Modificar quantos                   
LS23    Exibir quantos                      
LS24    Exibir quantos para material        
LS25    Exibir quantos por posição no depós.
LS26    Estoques em depósito para material  
LS27    Exibir quantos para unidade estoque 
LS28    Exibição de unidades estoq./posição 
LS32    Modificar unidade de estoque        
LS33    Exibir unidade de estoque           
LT01    Criar ordem de transferência        
LT02    Criar OT para diferença inventário  
LT03    Criar OT para fornecimento          
LT04    Criar OT da NT                      
LT05    Processar instrução transferência   
LT06    Criar OT para doc.material          
LT07    Criar OT para unid.estoque mista    
LT08    Entrada adic.manual em unid.estoque 
LT09    Função ponto ID para unidades estoq.
LT0A    Planjmto.preliminar de unidades estq
LT0B    Entrada em depósito UCs existentes  
LT0C    Saída de depósito UCs existentes    
LT0D   Transferência UCs existentes        
LT0E    Criar OT retirada p/picking 2 etapas
LT0F    Gerar OT para recebimento           
LT0H   Entrada em depós./transferência UCs 
LT0I     Saída de depósito UCs               
LT0J     Armazenar unidade comercial         
LT0S    Criar OT válida p/vários fornecim.  
LT11    Confirmar item de ordem transferênc.
LT12    Confirmar ordem de transferência    
LT13    Confirmar OT para unidade de estoque
LT14    Confirmar item OT de planj.prelimin.
LT15    Estornar ordem de transferência     
LT16    Estornar OT para unidade depósito   
LT17    Entrada individual dados reais      
LT1A   Modificar ordem de transferência    
LT21    Exibir ordem de transporte          
LT31    Impressão manual de OT              
LT32    Impressão de OT para unidade estoque
LT41    Preparar NTs para process.coletivo  
LT42    Criar OT no processmto.coletivo     
LT43    Formar grupos para remessas         
LT44    ProcColetivo Liberação              
LT72    Determinar procedimento de 2 etapas 
LT73    Exibir característica de duas etapas
LU01    Criar instrução de transferência    
LU02    Modificar instrução de transferência
LU03    Exibir instrução de transferência   
LU04    Seleção instrução de transferência  
VM01   Criar substância perigosa           
VM02   Modificar substância perigosa       
VM03   Exibir subst.perig.  

AVISO LEGAL

"As informações existentes nesta mensagem e nos arquivos anexados têm caráter confidencial e são para uso restrito. A utilização, divulgação, cópia ou distribuição desta mensagem, ou parte dela, por qualquer pessoa diferente do destinatário é proibida, sujeitando o infrator às sanções legais. Se esta mensagem foi recebida por engano, favor excluí-la e informar ao remetente pelo endereço eletrônico acima. Agradecemos sua cooperação."

DISCLAIMER

"This email and its attachments may contain privileged and/or confidential information. Use, disclosure, copying or distribution of this message, or part thereof, by anyone other than the intended recipient is strictly prohibited, and will submit the infractor to the legal sanctions. If you have received this email in error, please notify the sender by reply email and destroy all copies of this message. Thank you for your cooperation."

vai danadaaaa vaiiiii

Eita lele,

 

No block

 

Código correto EXCEL 2010

 

Sub DesprotegerPlanilhaAtiva()

Dim i, i1, i2, i3, i4, i5, i6 As Integer, j As Integer, k As Integer, l As Integer, m As Integer, n As Integer

On Error Resume Next

For i = 65 To 66

For j = 65 To 66

For k = 65 To 66

For l = 65 To 66

For m = 65 To 66

For i1 = 65 To 66

For i2 = 65 To 66

For i3 = 65 To 66

For i4 = 65 To 66

For i5 = 65 To 66

For i6 = 65 To 66

For n = 32 To 126

ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

If ActiveSheet.ProtectContents = False Then

MsgBox "Planilha desprotegida com sucesso!!!"

Exit Sub

End If

Next

Next

Next

Next

Next

Next

Next

Next

Next

Next

Next

Next

End Sub

 

ohhh bendita - abreee fiaaaa abreeee

Na maioria das vezes, nossas planilhas contêm informações sigilosas ou algumas informações que não podem ser alteradas. Para resolver este problema, é muito comum proteger as planilhas com senha. Entretanto, às vezes pode acontecer de o usuário da planilha esquecer qual é a senha! Como provavelmente o trabalho é muito complexo para ser refeito ou até mesmo pode ter sido feito por outra pessoa, nos perguntamos se há algo que pode ser feito neste caso, para desproteger uma planilha no Excel.

Existe sim uma solução para este caso. Ela é simples, de certa forma rápida para implantar e explora uma falha de segurança do Microsoft Office. Vamos então ao passo a passo para desproteger a planilha.

1.        Pressione Alt + F11 para abrir a janela de criação de código VBA, como mostrado abaixo:

2.        Em seguida, clique com o botão direito na sua planilha e depois em “Exibir código”:

3.        Na janela que abriu, copie e cole o código abaixo:

Sub DesprotegerPlanilhaAtiva()

Dim i, i1, i2, i3, i4, i5, i6 As Integer, j As Integer, k As Integer, l As Integer , m As Integer, n As Integer

On Error Resume Next

For i = 65 To 66

For j = 65 To 66

For k = 65 To 66

For l = 65 To 66

For m = 65 To 66

For i1 = 65 To 66

For i2 = 65 To 66

For i3 = 65 To 66

For i4 = 65 To 66

For i5 = 65 To 66

For i6 = 65 To 66

For n = 32 To 126

ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & Chr(l) & Chr(m) & Chr (i1) & Chr(i2) & Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

If ActiveSheet.ProtectContents = False Then

MsgBox “Planilha desprotegida com sucesso!!!”

Exit Sub

End If

Next

Next

Next

Next

Next

Next

Next

Next

Next

Next

Next

Next

End Sub

4.        Salve seu trabalho e clique no botão “Executar”, no alto da janela:

 

5.        Agora é aguardar a execução. Pode ser que demore bastante, dependendo do tamanho e complexidade da senha que está sendo quebrada. É normal aparecer a mensagem “(Não está respondendo”), dado a impressão que o Excel está travado; ele não está. Espere até o final da execução da macro em VBA que desprotege a planilha.

Isto pode aparecer e não significará que o Excel travou!

6.        O trecho de código em VBA MsgBox “Planilha desprotegida com sucesso!!!” fará que uma mensagem aparece na sua tela quanto esta tarefa estiver concluída.

 

Estes 6 passos descritos acima mostram como desprotegemos uma planilha quando esquecermos ou não soubermos a senha. Entretanto, em alguns casos, pode acontecer também de a planilha estar travada logo na abertura, sendo impossível abrir o arquivo sem a senha. Neste caso, o procedimento que devemos fazer é outro mais complicado e exige um pouco mais de sorte e investimento para termos sucesso.

 

Programas como o encontrado no site http://www.lostpassword.com/vba.htm servem para desbloquear o arquivo logo na abertura.

O código fonte para este artigo está disponível originalmente emhttp://www.hardware.com.br/comunidade/desproteger-planilha/299297/

 

cockipt ME2O para estoque disponível no Fornecedor

ME2O, saúde!!!

 

Cockipt fornecedor SUBCONTRATADO

 

Para controlar quantidades no estoque fornecedor

 

Além da tradicional MMBE, MB51 MC.9 (aff), agora para controlar datas... Só “”Z”” filhote!!!

 

RK_SE16N NA SE38

Dica rápida!!!

 

Apenas a título de informação, existem clientes que bloqueiam o acesso à "SE37″ e "SE16N"/"N", porém, geralmente, não limitam a SE38…
Uma solução rápida, seria executar o programa RK_SE16N 

 

Aff que lutaaaaa!!!!

Mais um artigo em auxílio dos que buscam a subversão.

 

Espiões, reparem como editar uma tabela que não pode (e provavelmente não deve) ser editada. Apresento-vos 3 técnicas.

 

A primeira já caducou há anos, a segunda está em vias de caducar e a terceira vamos ver quando caducará.

 

1. SE16 /H OK_CODE EDIT
O primeiro sistema é já do século XX e usar a velha transacção SE16.

na transacção SE16 escolhe a tabela a editar

selecciona os dados e vai para o detalhe de um dos registos

/H para debug

muda o valor da variável OK_CODE para “EDIT”

F8 para continuar

Se tudo tiver corrido bem agora o registo está editável. Depois é só gravar.

 

2. SE16N &sap_edit

na transacção SE16N escolhe a tabela a editar

selecciona os dados se quiseres filtrar registos

no campo da transacção escreve &sap_edit e enter

F8 para ires para a lista de dados

Um Service Pack recente da SAP inibe esta técnica. Se, com um bocado de sorte, o teu sistema estiver desactualizado, agora o registo está editável. Depois é só gravar. Se não der, experimenta a mesma coisa mas com a transacção UASE16N ao invés.

 

3. Função SE16N_INTERFACE

transacção SE37, função SE16N_INTERFACE

F8 para testar

parâmetros:

I_TAB = KNA1 :-)

I_EDIT = X

I_SAPEDIT = X

IT_SELFIELDS preenchido opcionalmente para restringir os registos a editar

novamente F8 para executar

Se tudo tiver corrido bem agora aparece uma lista de registos editável. Depois é só gravar.

Vá, agora não comeces para aí a sabotar tabelas como se não houvesse amanhã!

 

Congratulations abapinho.com