cAliasCarácterObligatorio
Alias de la tabla que se posicionará.
FUNCIóNPublicado
Posicione
Posicione( <cAlias>, <nOrdem>, <cSeek>, <cField>, [cNickName] ) --> xRetPosiciona una tabla Protheus mediante una clave de índice y devuelve directamente el contenido del campo solicitado.
Descripción general
Posicione() busca un registro en una tabla Protheus usando un orden de índice y una expresión de búsqueda. Al localizar el registro correspondiente, devuelve el contenido del campo indicado en cField. El parámetro opcional cNickName permite seleccionar el orden por nickname; la documentación oficial indica que nOrdem se ignora cuando cNickName está informado.
Sintaxis
Posicione( <cAlias>, <nOrdem>, <cSeek>, <cField>, [cNickName] ) --> xRetParámetros
nOrdemNuméricoObligatorio
Número del orden de índice utilizado en la búsqueda. Se ignora cuando se informa cNickName.
cSeekCarácterObligatorio
Expresión/clave utilizada para localizar el registro en el orden seleccionado.
cFieldCarácterObligatorio
Nombre técnico del campo cuyo contenido será devuelto.
cNickNameCarácterOpcional
Nickname del orden de índice. Cuando se informa, tiene precedencia sobre nOrdem.
Retorno
xRet, variante. Contenido del campo indicado en cField para el registro localizado.
Devolviendo el nombre del cliente
User Function ExPosicione()
Local cNombre := ""
// Orden 1 de SA1: valida la expresión del índice en el entorno objetivo.
// F2_CLIENTE significa “Cliente”, F2_LOJA significa “Tienda” y A1_NOME significa “Nombre”.
// La clave utiliza sucursal + cliente + tienda desde el encabezado de la factura de salida.
cNombre := Posicione("SA1", 1, ;
xFilial("SA1") + SF2->F2_CLIENTE + SF2->F2_LOJA, ;
"A1_NOME")
// Los identificadores técnicos permanecen exactamente como existen en Protheus.
ConOut(cNombre)
ReturnResultado esperado
La función posiciona SA1 mediante la clave informada y devuelve directamente el contenido de A1_NOME.
Usando cNickName
User Function ExPosicioneNick()
Local cNickName := U_MiNickIndice()
Local cClave := U_MiClave()
Local xValor
// Ejemplo estructural: usa solamente un nickname que exista realmente en el entorno.
// Cuando se informa cNickName, nOrdem se ignora. A1_NOME significa “Nombre”.
xValor := Posicione("SA1", 0, cClave, "A1_NOME", cNickName)
Return xValorResultado esperado
El ejemplo demuestra la precedencia de cNickName sin inventar un nickname específico de índice.
- Construye cSeek exactamente según la expresión del orden de índice seleccionado.
- Cuando la clave de la tabla incluya sucursal, usa xFilial() según las reglas de la tabla.
- Usa el identificador técnico real en cField; no renombres campos Protheus en el fuente.
- Documenta qué índice se utiliza, especialmente cuando nOrdem sea numérico.
- Si el código depende de un nickname de índice, valida que exista en la release y diccionario del entorno.
- No trates nOrdem como parte de la clave de búsqueda; solamente selecciona el orden usado para interpretar cSeek.
- No construyas cSeek sin todos los componentes de la expresión del índice, como sucursal, código y tienda cuando correspondan.
- No supongas que Posicione() devuelve solamente .T. o .F.; devuelve el contenido del campo solicitado.
- No traduzcas identificadores de campos en el código. Explica su significado manteniendo el nombre original de Protheus.
Comentarios
Todavía no hay comentarios aprobados.
Inicia sesión con Google o Microsoft para comentar.