Reports

Best regards to all here!

I get this message (In Spanish):

C:\PathfrmForm.scx denied access to the file.

I am using Visual FOxPro 9.0 with Service Pack 2 for the Administrative Software named profit Plus 2K8 here in Venezuela which has its database in SQL Server 2014.

This is the code that I am using in a .prg that executes when the Document like an INVOICE has been ALREADY saved:

LOCAL pforma

pforma = _screen.ActiveForm

SET DEFAULT TO "E:\Program Files (x86)\Softech Consultores\Profit Plus Administrativo\reporadi"     &&\"

DO FORM "E:\Program Files (x86)\Softech Consultores\Profit Plus Administrativo\reporadi\frmNotaRecepcion.scx"

MESSAGEBOX(MESSAGE())

********************************************************************************************* THIS COMES FROM THE FORM

** LOAD 
SET PROCEDURE TO SET DEFAULT TO "E:\Program Files (x86)\Softech Consultores\Profit Plus Administrativo\reporadi" ADDITIVE       


SET PROCEDURE TO E:\Program Files (x86)\Softech Consultores\Profit Plus Administrativo\reporadi\frmNotaRecepcion.prg ADDITIVE       

*** SET PROCEDURE TO prgs\cupertino_functions.prg ADDITIVE 
&&\"prgs\cupertino_functions.prg ADDITIVE 

MESSAGEBOX("Load!" + MESSAGE())
******************************************************************************************

LOCAL lcResult as Integer
lcResult = cupertinoYesNo("Atencion","Mensaje estilo cupertino Info","Si","No")
IF lcResult = 1
    ***ejecutar metodos
    cupertinoInfo("Atencion","Desea Crear una Nota de Recepción? 1: Si","Ok")
ELSE
    cupertinoInfo("Atencion","Cerrar 2: No","Ok")
ENDIF 
******************************************************************************************
MESSAGEBOX("Activate!" + MESSAGE())

Can anybody helpme to get a simple Messagebox with 2 options to execute. If the user clicks Yes then I must send 3 parameters to a Store Procedure that is already tested in SQL Server 2014 or even Superior?

Thank you in advance!!!
ENG. Franklin Gutiérrez.

PD: I can send any capture of the app of specific files that ANYBODY needs and asks me! Or even give him remote access to my Laptop to see how to solvie it or show him/her how it works the app and how do I work with it to solve these kind of requiriments.  I can send a TIP!

79567761