NetTalk Central

Author Topic: WebServer Hanging  (Read 4460 times)

lanmicro

  • Full Member
  • ***
  • Posts: 112
    • View Profile
    • Email
WebServer Hanging
« on: October 20, 2015, 08:29:32 AM »
Hi Guys,

I have a webserver that is hanging several times a day when it loses its connection to the Scalable database.

It appears to occur when a p_web.Open is issued at the beginning of a procedure.  I have placed a prop:disconnect before the p_web.Opens, but the hangs are still occurring.

Is there some way to capture the fact of the lost connection before the p_web.Open and issue a prop:disconnect and reopen all of my files?
Gregory C. Bailey

Bruce

  • Global Moderator
  • Hero Member
  • *****
  • Posts: 11250
    • View Profile
Re: WebServer Hanging
« Reply #1 on: October 20, 2015, 11:37:51 PM »
I'm not the SQL guy here Greg, but maybe someone else can jump in with a suggestion?

lanmicro

  • Full Member
  • ***
  • Posts: 112
    • View Profile
    • Email
Re: WebServer Hanging
« Reply #2 on: October 27, 2015, 11:17:11 AM »
Hi Bruce,  I placed code like the following in the OpenFiles routine:
    loop 5 times
        ds_OutputDebugString( 'Opening Files' )
        ds_OutputDebugString( clip( GLO:UCABATCH )&' '&GLO:FILESPEC:Batch )       
        State{ PROP:Disconnect }
        accdef{ prop:Disconnect }
        batch{ PROP:Disconnect }
        open( Company, 42h )
        if errorcode()   
            ds_OutputDebugString( 'Company error '& errorcode() )
            cycle
        end!if   
        open( Activity, 42h )
        if errorcode()   
            ds_OutputDebugString( 'Activity error '& errorcode() )
            cycle
        end!if   
        open( Flags, 42h )
        if errorcode()   
            ds_OutputDebugString( 'Flags error '& errorcode() )
            cycle
        end!if         
        open( Client2, 42h )
        if errorcode()   
            ds_OutputDebugString( 'Client2 error '& errorcode() )
            cycle
        end!if   
        open( SITE, 42h )
        if errorcode()   
            ds_OutputDebugString( 'Site error '& errorcode() )
            cycle
        end!if   
        if errorcode()   
            ds_OutputDebugString( 'Batch error '& errorcode() )
            cycle
        end!if   
        if errorcode()      then cycle.               
        break
    end!loop   

This appears to have resolved the problem with the server disconnecting. 
Gregory C. Bailey

Bruce

  • Global Moderator
  • Hero Member
  • *****
  • Posts: 11250
    • View Profile
Re: WebServer Hanging
« Reply #3 on: October 28, 2015, 11:29:17 PM »
Hi Greg,

Instead of putting this in OpenFiles, which is very far down the tree (so to speak), perhaps it would be better to add this to the FileManager object itself? that's the "root" of all the opens in the program, and so would be best equipped to deal with a problem which happens during Open.

Is it worth experimenting with this?

cheers
Bruce

lanmicro

  • Full Member
  • ***
  • Posts: 112
    • View Profile
    • Email
Re: WebServer Hanging
« Reply #4 on: November 02, 2015, 08:48:54 AM »
Hi Bruce,

Not sure if it is worth pursuing.  Sometimes the error about the connection dropping happens between opening of consecutive files.  That's why I have the code inside a loop.  So that all files are attempted to be opened at the same time again if an error occurs.
Gregory C. Bailey