HOW TO
Instructions provided describe how to create an FGDC-only metadata document. To create an FGDC-only metadata document, turn off the ISO metadata synchronizer, then run a script to remove any existing ISO elements from the metadata. The Geography Network synchronizer must be turned on.
Code:
Sub deleteISOelements()
Dim pGxApp As IGxApplication
Dim pGxView As IGxView
Dim pMD As IMetadata
Dim pPS As IPropertySet
Set pGxApp = Application
Set pMD = pGxApp.SelectedObject
Set pPS = pMD.Metadata
pPS.RemoveProperty "mdFileID"
pPS.RemoveProperty "mdLang"
pPS.RemoveProperty "mdChar"
pPS.RemoveProperty "mdParentID"
pPS.RemoveProperty "mdHrLv"
pPS.RemoveProperty "mdHrLvName"
pPS.RemoveProperty "mdContact"
pPS.RemoveProperty "mdDateSt"
pPS.RemoveProperty "mdStanName"
pPS.RemoveProperty "mdStanVer"
pPS.RemoveProperty "distInfo"
pPS.RemoveProperty "dataIdInfo"
pPS.RemoveProperty "appSchInfo"
pPS.RemoveProperty "porCatInfo"
pPS.RemoveProperty "mdMaint"
pPS.RemoveProperty "mdConst"
pPS.RemoveProperty "dqInfo"
pPS.RemoveProperty "spatRepInfo"
pPS.RemoveProperty "refSysInfo"
pPS.RemoveProperty "contInfo"
pPS.RemoveProperty "mdExtInfo"
pMD.Metadata = pPS
Set pGxView = pGxApp.View
If TypeOf pGxView Is IGxDocumentationView Then pGxView.Refresh
End Sub
Article ID:000006472
Get help from ArcGIS experts
Download the Esri Support App