File: eaf_n_cst_dwnativeproviderservice.sru
Size: 3705
Date: Tue, 22 Jan 2008 23:40:17 +0100
$PBExportHeader$eaf_n_cst_dwnativeproviderservice.sru
forward
global type eaf_n_cst_dwnativeproviderservice from n_cst_contentproviderservice
end type
end forward

global type eaf_n_cst_dwnativeproviderservice from n_cst_contentproviderservice
end type
global eaf_n_cst_dwnativeproviderservice eaf_n_cst_dwnativeproviderservice

forward prototypes
public function long createcontentmain (ref n_cst_datasetattrib anv_datasetattrib, ref s_mimedataset astr_mimedataset)
public function long preparecontentmain (ref n_cst_datasetattrib anv_datasetattrib, ref s_mimedataset astr_mimedataset, ref n_cst_dataset anv_dataset)
end prototypes

public function long createcontentmain (ref n_cst_datasetattrib anv_datasetattrib, ref s_mimedataset astr_mimedataset);////////////////////////////////////////////////////////////////
// Description:
//    Main method for the DW Native createContent process
// Revisions
//    3.0   - Initial version
// Arguments:  
//    n_cst_datasetattrib  -  REF
//    s_mimerequest        -  REF   
// Returns: 
//     1 - Success
//    -1 - Failure
////////////////////////////////////////////////////////////////
// Copyright © 2000 - 2007 Youngsoft, Inc.  All rights reserved.
// Any distribution of the Youngsoft, Inc. Enterprise Application Framework
// source code in whole or part by other than Youngsoft, Inc. is prohibited.
//////////////////////////////////////////////////////////////// 

constant string METHOD_NAME = "createContentMain (REF n_cst_datasetattrib, REF s_mimedataset)"

blob           lbl_state

if anv_datasetattrib.is_action = inv_constants.RETRIEVE_DATAONLY then
   lbl_state = Blob(String(anv_datasetattrib.ids_working.Object.DataWindow.Data), inv_constants.STRING_BLOB_CONVERSION_ENCODING)
else
   if anv_datasetattrib.ids_working.getFullState( lbl_state ) = -1 then
      addError( METHOD_NAME, "Failed to get state of datastore" )
      return -1
   end if
end if

astr_mimedataset.data.binary = lbl_state

return 1

end function

public function long preparecontentmain (ref n_cst_datasetattrib anv_datasetattrib, ref s_mimedataset astr_mimedataset, ref n_cst_dataset anv_dataset);////////////////////////////////////////////////////////////////
// Description:
//    Main method in prepareContent process
// Revisions
//    3.0   - Initial version
// Arguments:  
//    n_cst_datasetattrib  -  REF
//    s_mimerequest        -  REF
//    anv_dataset          -  REF
// Returns: 
//     1 - Success
//    -1 - Failure
////////////////////////////////////////////////////////////////
// Copyright © 2000 - 2004 Youngsoft, Inc.  All rights reserved.
// Any distribution of the Youngsoft, Inc. Enterprise Application Framework
// source code in whole or part by other than Youngsoft, Inc. is prohibited.
//////////////////////////////////////////////////////////////// 

String METHOD_NAME = "prepareContentMain ( REF n_cst_datasetattrib, REF s_mimedataset, REF n_cst_dataset )"

try
   
   if anv_datasetattrib.is_action = inv_constants.UPDATE_SENDCHANGESONLY then
      if anv_datasetattrib.ids_working.setChanges (astr_mimedataset.data.binary ) < 0 Then
         addError(METHOD_NAME, "prepareContent() failed during application of changes")
         Return -1
      End If
   elseif anv_datasetattrib.is_action = inv_constants.UPDATE_SENDALL then
      if anv_datasetattrib.ids_working.SetFullState (astr_mimedataset.data.binary ) < 0 Then
         addError(METHOD_NAME, "prepareContent() failed during application of changes")
         Return -1
      End If
   end if
   
finally
   
   
end try

return 1

end function

on eaf_n_cst_dwnativeproviderservice.create
call super::create
end on

on eaf_n_cst_dwnativeproviderservice.destroy
call super::destroy
end on