Object: | frmcustomers |
LPARAMETERS nError, cMethod, nLine DO CASE CASE nError = 1884 && Primary key violated thisform.pageframe1.page1.cntCustomerInfo.Error(nError, cMethod, nLine) CASE nError = 1582 && Field rule violated thisform.pageframe1.page1.cntCustomerInfo.Error(nError, cMethod, nLine) OTHERWISE tsMaintForm::Error(nError, cMethod, nLine) ENDCASE