Unfortunately the answer is no.
This is an enhancement request I often hear (Template definition: allow file data card to be placed into specified folder)
Please feel free to report this as an enhancement request.
I'd be interested from hearing from any admin out there (Lou, Wayne, Jeff, etc) who may have found a way to do this
Is this something that could be accomplished with API? I created a numbering scheme that works for my company, unfortunately it also creates a lot of administration in creating a new project. We only have one or two project a year, but all the manual additions allows for mistakes.
I'm not a programmer so, I think I'll defer to the programmers in the group on that one
I'm pretty sure that you would have to use the API to create the folders and abandon creation through templates.
Report it to your VAR and have him add you to SPR 370141 (data card support in a template).
I have not tried it, but there is a sample vb6 sub in the API help file.
Sample Code (Visual Basic)
This routine creates a new sub-folder in a certain folder and applies read and check out rights for the user called "Smith". It will also assign full privileges to the members of the group "Administrators". Finally it will copy the card definition of the DOC card from the folder "Samples" and use it for the extensions DOC and XLS in the new folder:
Private Sub CreateFolder(parentFolder As IEdmFolder5, folderName As String)
On Error GoTo ErrHand
Dim usrMgr As IEdmUserMgr5
Set usrMgr = parentFolder.vault
Dim data As EdmFolderData
Set data = New EdmFolderData
data.SetUserRights usrMgr.GetUser("Smith").ID, EdmRight_Read Or EdmRight_Lock
data.SetGroupRights usrMgr.GetUserGroup("Administrators").ID, EdmRight_All
Dim card As IEdmCard5
Set card = parentFolder.vault.RootFolder.GetSubFolder("Samples").GetCard("doc")
data.SetCardSource card.ID, "doc;xls"
Dim folder As IEdmFolder5
Set folder = parentFolder.AddFolder(Me.hWnd, folderName, data)
MsgBox "Created folder " + folderName + " successfully. It was given the ID " + str(folder.ID)
Dim ename As String
Dim edesc As String
parentFolder.vault.GetErrorString Err.Number, ename, edesc
MsgBox ename + vbLf + edesc