Web Service Proxy Generator
web service call not working in project
Messages
Reply
Edit
Delete
this is the code in the proxy:
************************************************************************ * ScrapDragonData_PositiveCheck ****************************************FUNCTION ScrapDragonData_PositiveCheck(type as String,strSyTran as String,strNetCard as String,routingNumber as String,accountNumber as String,checkNumber as String,strCheckDate as String,printCode as String,photoID as String,strDob as String,State as String,providerID as String,strRC as String,RC1 as String,RC2 as String) as BooleanLOCAL loException as Exception, lvResult as BooleanTHIS.lError = .F.this.cErrorMsg = "" lvResult = .F. TRY lvResult = this.oService.ScrapDragonData_PositiveCheck(type,strSyTran,strNetCard,routingNumber,accountNumber,checkNumber,strCheckDate,printCode,photoID,strDob,State,providerID,@strRC,@RC1,@RC2)CATCHto loExceptionTHIS.GetErrorDetail(loException)ENDTRYRETURN lvResultENDFUNC* ScrapDragonData_PositiveCheck
this is my test program code:
DO checkservicesproxyLOCAL loservice as checkservicesproxy loservice = CREATEOBJECT("CheckServicesProxy") gctransnum='1234567' totpaid='98.28' routingno='1234567' acctno='987654' gccheckno='4444' drvlicno='T512-733-87-690-0' drvlicst='FL' birthdate='05/30/1987'LOCAL RC as string,rc1 as String,rc2 as String RC='0' RC1='0' RC2='0' llresult=loService.ScrapDragonData_PositiveCheck('C',gctransnum,totpaid,routingno,acctno,gccheckno,'04/01/2013','Y',drvlicno,birthdate,drvlicst,'4566',@RC,@RC1,@RC2)WAITWINDOW'service error? = '+TRANSFORM(loservice.lerror)WAITWINDOW'error code= '+loservice.cerRORMSGWAITWINDOW'RESULT = '+TRANSFORM(llresult)WAITWINDOW'rc = '+RCWAITWINDOW'RC1 = '+RC1WAITWINDOW'RC2 = '+rc2