 
 /*------------------------------------------------------------------------
    File        :  
    Purpose     :  
    Syntax      :
    Description :
    Author(s)   :  
    Created     :  
    Notes       :
  ----------------------------------------------------------------------*/

USING Progress.Lang.*.

ROUTINE-LEVEL ON ERROR UNDO, THROW.

CLASS SingleRow ABSTRACT:    

        DEFINE PRIVATE PROPERTY BufferContext AS HANDLE NO-UNDO 
        GET.
        SET. 
        
        DEFINE PRIVATE PROPERTY ClientPrincipal AS HANDLE NO-UNDO 
    GET.
    SET. 
    
    /*------------------------------------------------------------------------------
            Purpose:  
            Notes  :
               
               
    ------------------------------------------------------------------------------*/
        CONSTRUCTOR PUBLIC SingleRow ( INPUT iphBufferContext AS HANDLE , INPUT iphClienPrincipal AS HANDLE):
                ASSIGN BufferContext   = iphBufferContext
                       ClientPrincipal = iphClienPrincipal.
                /* using the context (eg bufferHandle) and the profile ( eg allowed user groups)
                   We can create a mechanism to check if the user has access to this buffer */
        END CONSTRUCTOR.
        
        METHOD PROTECTED LOGICAL ReadRecord():      
                /* Placeholder for general dataaccess functionallity */
        END METHOD.

        METHOD PROTECTED LOGICAL CreateRecord(  ):
                /* Placeholder for general dataaccess functionallity */
        END METHOD.

        METHOD PROTECTED LOGICAL UpdateRecord():
                /* Placeholder for general dataaccess functionallity */
        END METHOD.

        METHOD PROTECTED LOGICAL DeleteRecord():
                /* Placeholder for general dataaccess functionallity */
        END METHOD.

END CLASS.