of_Undo

pfcdwsrv.pbl   >   pfc_n_cst_dwsrv_report   >   of_Undo

Name	Datatype
li_Count	Integer
li_End	Integer
ls_Modify	String
ls_Return	String

public function string of_Undo (integer ai_numlevels);//////////////////////////////////////////////////////////////////////////////
//
//	Function:  of_Undo
//
//	Access:  public
//
//	Arguments:
//	ai_NumLevels				The number of levels of changes to undo.  If 0 is
//									passed, all changes will be undone.
//
//	Returns:		String
//					The output of the Modify command (the error text or "").
//
//	Description:	Undo changes made by the Report Service functions.
//
//////////////////////////////////////////////////////////////////////////////
//
//	Revision History
//
//	Version
//	5.0   Initial version
//
//////////////////////////////////////////////////////////////////////////////
//
//	Copyright © 1996-1997 Sybase, Inc. and its subsidiaries.  All rights reserved.
//	Any distribution of the PowerBuilder Foundation Classes (PFC)
//	source code by other than Sybase, Inc. and its subsidiaries is prohibited.
//
//////////////////////////////////////////////////////////////////////////////

String	ls_Modify, ls_Return
Integer	li_Count, li_End

If ai_NumLevels = 0 Or ai_NumLevels >= ii_UndoLevel Then
	li_End = 1
Else
	li_End = (ii_UndoLevel - ai_NumLevels) + 1
End if

For li_Count = ii_UndoLevel To li_End Step -1
	ls_Modify = ls_Modify + " " + is_Undo[li_Count]
Next

If ai_NumLevels = 0 Or ai_NumLevels >= ii_UndoLevel Then
	ii_UndoLevel = 0
Else
	ii_UndoLevel = ii_UndoLevel - ai_NumLevels
End if

ls_Return = idw_Requestor.Modify(ls_Modify)

Return ls_Return

end function

Name	Owner
pfc_n_cst_dwsrv_report.of_printreport	pfc_n_cst_dwsrv_report
pfc_n_cst_dwsrv_report.of_Undo	pfc_n_cst_dwsrv_report

Name	Owner
datawindow.modify	datawindow