| 
 AR_CustomerContact_ui, AR_Customer_ui, CU_MaintainRelationship_ui, CU_RelationshipWizard_ui, SO_ShipToAddress_ui  | 
| 
LOCAL cNotOnFile$="*Not on file*"      | 
| 
LOCAL cCRMSuggestField$="ML_CRMValue"      | 
| 
LOCAL cARSuggestField$="ML_ARValue"      | 
| 
LOCAL cSuggestLib$="CU_MaintainRelationship.M4L"      | 
| 
PROPERTY CRMSetup    * Read Only * | 
| 
FUNCTION LOCAL BT_Assign()    | 
| 
FUNCTION LOCAL BT_CancelCRM()    | 
| 
FUNCTION LOCAL BT_Select()    | 
| 
FUNCTION LOCAL BT_Suggest()    | 
| 
FUNCTION LOCAL ChangeLB_Select()    | 
| 
FUNCTION LOCAL ChangeML_CRMValue()    | 
| 
FUNCTION LOCAL ChangeRelateToCRM()    | 
| 
FUNCTION LOCAL CheckForEnableCRM()    | 
| 
FUNCTION LOCAL CheckForSOCompanyRecs(company_id$)    | 
| 
FUNCTION LOCAL CheckForSOPersonRecs(person_id$)    | 
| 
FUNCTION LOCAL CheckSync()    | 
| 
FUNCTION LOCAL InvoicesExistCRMCompany(company_id$)    | 
| 
FUNCTION LOCAL InvoicesExistCRMPerson(person_id$)    | 
| 
FUNCTION LOCAL OnFocusLB_Select()    | 
| 
FUNCTION LOCAL PostLoad()    | 
| 
FUNCTION LOCAL PostLoadCRM()    | 
| 
FUNCTION LOCAL PostLookup(LookupCode$)    | 
| 
FUNCTION LOCAL PostReadRecCRM()    | 
| 
FUNCTION LOCAL SalesOrdersExistCRMCompany(company_id$)    | 
| 
FUNCTION LOCAL SalesOrdersExistCRMPerson(company_id$)    | 
| 
 PERFORM IsPrimaryAddress(), LinkARContact(), LinkARCustomer(), LinkARShipToAddress(), LinkCRMContact(), LinkCRMCustomer(), LinkCRMShipToAddress(), PERFORM UpdateARContactSugg(), PERFORM UpdateARCustomerSugg(), PERFORM UpdateARShipToSugg(), PERFORM UpdateCRMContactSugg(), PERFORM UpdateCRMCustomerSugg(), PERFORM UpdateCRMShipToSugg()  | 
| 
 ParseCustomer()  | 
 
 |