Content Supported by Sourcelens Consulting
� ! C:\XSAMPLE\BIZRULES.PJX C:\XSAMPLE\BIZRULES.PJX <Source> c:\xsample c:\xsample �
bizrules.prg
bizrules.dbf ���� � � . �� % ! � + 1 � ��� � U 4 %�C� bizrules�
��- � Q� � bizrules�� � U BIZRULES Q� � U BIZRULES� 4� � � � � � �� � � T� � �CW�� F� �
T� �� �� -�� C�
��� %�C+��� �0 ��C� The 'Title' value is invalid� � � �� �6� %�C� � �
�
��2�n T� ��& The 'Salary' value for the job title 'C�
�� ' must be between � $CC� Z�� and $CC�
Z��� ��C � � � � �� � � #)� %�� �
����A T� ��, The 'Birth_date' value must be greater than CC� *��� ��C � � � � �� � #)� %�� �
���@ T� ��+ The 'Hire_date' value must be greater than CC� *��� ��C � � � � �� � -�� C� ��� %�C+��g�2 ��C� The 'Country' value is invalid� � � �� �
F�� � �� B�� �� U LCTITLE LNSALARY LDBIRTH LDHIRE LCCOUNTRY LCERROR LCSTR THIS NSAVEAREA BIZRULES TITLE ERRORMESSAGE
MIN_SALARY
MAX_SALARY
BIRTH_DATE HIRE_DATE COUNTRYB 4� � �' T� �� CC� �� � � C�
� 6��
F�� � �� U LCMESSAGE LCERROR THIS NSAVEAREA Init, Destroyn validate� ErrorMessage� 8
T� ����
�� �
�� �
�� �
�� � U NSAVEAREA
salaryrule Customh 6 �QA 3 � 3 q� � q � � � a�QA A S QA R QA � !A � � 4 � r� 3 � � � � � 7 U � � �
i & � 6 C * / B c:\temp\ bizrules.fxp c:\xsample\bizrules.prg ) � [ INITf DESTROYf VALIDATEf ERRORMESSAGEf
salaryruleC bizrules.prgBIZRULESP BIZRULESD 4 1 23c:\xsample\bizrules.tlb 8bizrules 8bizrules 21bizrules Type Library 4 69 38{8CA2D842-CE0F-11CF-8BFE-00AA00321963} 10 19bizrules.salaryrule 10salaryrule 0 10salaryrule 23c:\xsample\bizrules.prg 11 38{8CA2D841-CE0F-11CF-8BFE-00AA00321963}