...
| Bloco de código | ||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||||
#Include "Protheus.ch"
/*/{Protheus.doc} User Function PCINV01
Devuelve el camino del archivo generado para download en el Portal del cliente - FIN.
@type user function
@author Totvs
@since 09/10/2023
@version 1.0
/*/
User Function PCINV01()
Local cCaminho := "" as Character
Local aClientes := PARAMIXB[1] as Array // lista de clientes seleccionados en el portal
Local cUsuario := PARAMIXB[2] as Character // código de usuario del portal
Local cTable := PARAMIXB[3] as Character // Tabla
Local cKey := PARAMIXB[4] as Character // Clave de la tabla separado por PIPE F2_FILIAL|F2_DOC|F2_SERIE|F2_CLIENTE|F2_LOJA
Local aKey := {} as Array
// transforma a chave em array ficand [1]F2_FILIAL;[2]F2_DOC;[3]F2_SERIE;[4]F2_CLIENTE;[5]F2_LOJA
aKey := StrTokArr2(cKey, "|", .T.)
// lógica para generar el informe
cCaminho := "spool/PCINV01_001.pdf"
Return cCaminho |