Base de Conocimientos (KB)
Facturación Electrónica : SUNAT > Help Desk : VFPS CPE > Base de Conocimientos (KB)

Ayuda de búsqueda:


Agregar usuario a la página de custodia

Solución

Cuando tenemos integrado el módulo web (página de custodia), vamos a ingresar un usuario o cliente para que este puede consultar sus documentos emitidos con el siguiente código:

Visual Foxpro

*!* SE AGREGA EL CLIENTE A LA TABLA DE USUARIOS DE LA PÁGINA DE CUSTODIA

*!* PARAMETROS
*!* lcNameCli   = &&NOMBRE O RAZON SOCIAL DEL CLIENTE
*!* lcRucCli    = &&NÚMERO DE RUC DEL CLIENTE
*!* lcCorreoCli = &&CORREO DEL CLIENTE
*!* lcBaseWS    = &&NOMBRE DE LA BASE DE DATOS QUE USA LA PÁGINA DE CUSTODIA
 
lcNameCli   = "VFPSTEAM BI SOLUTIONS"
lcRucCli    = "20100066603"
lcCorreoCli = "luis_rea200@siaadsa.com"
lcBaseWS    = "vfps_cpe"
 
*!* VER MENSAJES DE EVENTOS EL SISTEMA
_SCREEN.loCPE.llUsaWait = .T. 
 
*!* DIRECCION WEB O RUTA DEL WEB SERVICES DE LA PAGINA DE CUSTODIA
_SCREEN.loCPE.lcRutaWebWsCPE = "http://www.facturacionelectronicasunat.solutions/pruebacpe/ws/vfpswscpe.php"
 
IF !_SCREEN.loCPE.Add_User_Pagina_CPE (lcNameCli,lcRucCli,lcCorreoCli,lcBaseWS)
   RETURN .F.
ENDIF
*!* TODO OK SE AGREGO CORRECTAMENTE EL USUARIO
 
Visual Basic .NET
 
'COLOCA EN True SI SE DESEA VER LOS MENSAJES WAIT
loCPE.llusawait = True   
 
'DIRECCION WEB O RUTA DEL WEB SERVICES DE LA PAGINA DE CUSTODIA
loCPE.lcrutawebwscpe = "http://www.facturacionelectronicasunat.solutions/pruebacpe/ws/vfpswscpe.php"
 
Dim lcBaseWS AsString
Dim lcNameCli AsString
Dim lcRucCli AsString
Dim lcCorreoCli AsString
 
'SE AGREGA EL CLIENTE A LA TABLA DE USUARIOS DE LA PÁGINA DE CUSTODIA
'PARAMETROS
'lcNameCli   = NOMBRE O RAZON SOCIAL DEL CLIENTE
'lcRucCli    = NÚMERO DE RUC DEL CLIENTE
'lcCorreoCli = CORREO DEL CLIENTE
'lcBaseWS    = NOMBRE DE LA BASE DE DATOS QUE USA LA PÁGINA DE CUSTODIA
 
lcNameCli   = "VFPSTEAM BI SOLUTIONS"
lcRucCli    = "20100066603"
lcCorreoCli = "luis_rea200@siaadsa.com"
lcBaseWS    = "vfps_cpe"
 
If Not loCPE.add_user_pagina_cpe(lcNameCli, lcRucCli, lcCorreoCli, lcBaseWS) Then
   Return
EndIf
 
'TODO OK CLIENTE AGREGADO Y/O MODIFICADO CORRECTAMENTE

 

VFPSTEAM BI SOLUTIONS

 
¿Le ha sido útil este artículo? si / no
Artículos relacionados Agregar documentos a la página de custodia
Enviar correo electrónico en segundo plano
Instalación página de custodia de documentos electrónicos
Subir archivos XML y PDF a página de custodia
Uso de API componente VFPs CPE
Detalles del artículo
ID de artículo: 5
Categoria: Knowledgebase
Fecha de alta: 2016-08-08 16:46:34
Vistas: 1378
valoración (Votar): valoración del artículo 2.1/5.0 (7)

 
« Volver atras

 
Powered by Help Desk Software HESK, brought to you by SysAid