...
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 |