#HEADER
// The section embraced between the #HEADER and the #ENDHEADER symbols
// represents 99% of the code making up FastView. This may be compiled
// once and for all.

Use dfallent
Use LangSymb.pkg // Language symbols
define lng_default for LNG_ENGLISH // <-- Change default language here

Use FastView.pkg
#ENDHEADER

RegisterRestrictions:

  // The next 5 lines may be set to TRUE (enable) or FALSE (disable).
  // If a parameter is set to TRUE it may still be disabled by passing
  // the commented symbol that appears after each line on the FastView
  // command line:

  // Should FastView check for new package files?
  set FVSetupValue FVSETUP_OLD_PKG_CHECK     to TRUE // -nopkgcheck

  // Allow the user to edit data?
  set FVSetupValue FVSETUP_USER_CHG_DATA     to TRUE // -readonly

  // Allow the user to disable WS data dictionaries (thereby bypassing all
  // the checks and more)?
  set FVSetupValue FVSETUP_USER_BYPASS_WS_DD to TRUE // -noddbypass

  // Allow user to change workspace?
  set FVSetupValue FVSETUP_USER_CHG_WS       to TRUE // -nowschange

  // Allow user to create new or edit existing views?
  set FVSetupValue FVSETUP_USER_EDIT_VIEWS   to TRUE // -user


  set FVSetupValue FVSETUP_WORKSPACE         to "" //"DAW.Sample Applications.Order"
  set FVSetupValue FVSETUP_WORKSPACE_NAME    to "" //"Order Entry sample"
return


DEFINE_OBJECT_GROUP OG_WorkspaceDDs
  //  Use Help_Ids.inc
  //  Use Std_Help.pkg
  //
  //  // Include the DataDictionary classes:
  //  Use Vendor.dd
  //  Use Invt.dd
  //  Use Customer.dd
  //  Use SalesP.dd
  //  Use OrderHea.dd
  //  Use OrderDtl.dd
  //
  //  // Tell FastView what classes to use for which tables:
  //  set DataDictionary_Class Customer.File_Number to U_Customer_DataDictionary
  //  set DataDictionary_Class Invt.File_Number     to U_Invt_DataDictionary
  //  set DataDictionary_Class Orderdtl.File_Number to U_OrderDtl_DataDictionary
  //  set DataDictionary_Class Orderhea.File_Number to U_OrderHea_DataDictionary
  //  set DataDictionary_Class Salesp.File_Number   to U_SalesP_DataDictionary
  //  set DataDictionary_Class Vendor.File_Number   to U_Vendor_DataDictionary
END_DEFINE_OBJECT_GROUP

DEFINE_OBJECT_GROUP OG_WorkspaceVWs
  // Do not put anything here. For future enhancements
END_DEFINE_OBJECT_GROUP
DEFINE_OBJECT_GROUP OG_WorkspaceFunctions
  // Do not put anything here. For future enhancements
END_DEFINE_OBJECT_GROUP

RegisterReferencedTables:
  CALL4200TIMES // Don't ask...
return
