×
Linguagem de Programação ADVPL
Perguntas SF1
- Victor
- Autor do Tópico
- Desconectado
- Membro Dourado
-
Menos
Mais
- Postagens: 171
- Obrigados Recebidos: 0
11 anos 5 meses atrás #14795
por Victor
Galera criei 2 campos na tabela SF1 para registrar quem foi o usuário que incluiu a pré-nota porém eles não estão registrando a informação o campo ficou como:
F1_USUDIG
Caractere
Tamanho 15
Formato !@
Inic. Padrão = USRRETNAME(RETCODUDER())
Como o acimo não gravou tentei criar outro que ficou da seguinte forma
F1_USUDIG
Caractere
Tamanho 15
Formato !@
Inic. Padrão = IF(INCLUI,SUBSTR(CUSUARIO,7,15),SF1->SF1_USUDIG)
Alguém ai pode me ajudar ?
F1_USUDIG
Caractere
Tamanho 15
Formato !@
Inic. Padrão = USRRETNAME(RETCODUDER())
Como o acimo não gravou tentei criar outro que ficou da seguinte forma
F1_USUDIG
Caractere
Tamanho 15
Formato !@
Inic. Padrão = IF(INCLUI,SUBSTR(CUSUARIO,7,15),SF1->SF1_USUDIG)
Alguém ai pode me ajudar ?
Por favor Acessar ou Registrar para participar da conversa.
- lalberto
-
- Desconectado
- Administrador
-
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
11 anos 5 meses atrás #14798
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Victor assim não vai funcionar, vc vai precisar usar ponto de entrada:
Exemplo:
#include "rwmake.ch" // incluido pelo assistente de conversao do AP6 IDE em 02/04/03
User Function Sf1100i() // incluido pelo assistente de conversao do AP6 IDE em 02/04/03
_cAlias := GetArea()
If Reclock("SF1",.F.)
SF1->F1_USUDIG := USRRETNAME(__cUserID)
SF1->(MsUnlock())
Endif
RestArea(_cAlias)
Return(NIL)
Exemplo:
#include "rwmake.ch" // incluido pelo assistente de conversao do AP6 IDE em 02/04/03
User Function Sf1100i() // incluido pelo assistente de conversao do AP6 IDE em 02/04/03
_cAlias := GetArea()
If Reclock("SF1",.F.)
SF1->F1_USUDIG := USRRETNAME(__cUserID)
SF1->(MsUnlock())
Endif
RestArea(_cAlias)
Return(NIL)
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Por favor Acessar ou Registrar para participar da conversa.
- mbrigagao
- Desconectado
- Membro Platina
-
Menos
Mais
- Postagens: 350
- Obrigados Recebidos: 1
Tempo para a criação da página:0.086 segundos