PIP Administrator Displays Error When All Records Are Deleted (304144)


The information in this article applies to:

  • Microsoft BizTalk Server Accelerator for RosettaNet 1.0
This article was previously published under Q304144

SYMPTOMS

When you use the PIP Administrator, you may receive the following error message after you delete the last record:
PIP Administrator
Run-time error '3021':
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

CAUSE

This error occurs because the PIP Administrator fails to check for an empty recordset before deleting records.

RESOLUTION

To resolve this problem, modify the code of the PIP Administrator. To make the modification and rebuild the PIP Administrator, you must have Microsoft Visual Basic 6.0 installed.
  1. Open the Project \Program Files\Microsoft BizTalk Server Accelerator for RosettaNet\PIP SDK\Source\Maintenance\PRNMaintenance.vbp.
  2. In the code for FMain.frm, locate mnuDelete_Click() sub.
  3. Change the following line: 
    If m_rsPIPs.RecordCount = 0 Then
    to: 
    If m_rsPIPs.RecordCount < 0 then
  4. Build the executable and replace the old PIP Administrator.

MORE INFORMATION

Steps to Reproduce Behavior:

  1. Open the PIP Administrator.
  2. Delete all records that are listed.
  3. After the last item is deleted, try to use the delete function again.
Modification Type:MajorLast Reviewed:9/12/2001
Keywords:kbprb KB304144
©2002 Microsoft Corporation. All rights reserved.