Hi @skipmcnoob
1. In your part/assembly, create the custom iProperty "c_File_Name" (click iProperties>Custom)

2. Save the file.
3. Populate the custom iProp with using the code:
Sub Main ()
Dim oDoc As Document = ThisApplication.ActiveDocument
iFileName = ThisDoc.FileName(False) 'without extension
iProperties.Value("Custom", "c_File_Name") = iFileName
End Sub
4. In the drawing, add some text:

5. Select in the left hand drop down box "Custom Properties - Model".
6. Select in the right hand drop down box your custom iProp "c_File_Name".
The Filename from the part is now shown, without the filetype extension. You can integrate this into your title block by using the same principle, either with new text or modify the existing text field.
Hope this helps.
P.S. There is code available to automatically add the custom iProp in the part or assembly file, if it doesn't already exist, but if you add the custom iProp to your templates, you won't need it.