I have a view (SubSection view) with the first column set as "<tr><td><input
type=\"radio\" name=\"choice\" value=\"" + @Text(@DocumentUniqueID) + "\"
/></td>"
Then, I have a form named 'Section' which contains an embedded view (subsection
view - with setting the content as HTML). When user clicks on the radio button
and press SUBMIT button, it will run an agent.
(I'm am not using ViewTemplate for SubSection, and i enclosed the SUBMIT button
with these two {@command([FileSave]);@command([ToolsRunMacro];"(sectionagent)")
From the agent (Agent List Selection, target is NONE), it will get the DocUNID
of the selected document (from radio button), then will open the document to
assign value into subsection.
can I code like this??
Dim session As New NotesSession
Dim dbase As NotesDatabase
Dim doc As NotesDocument
Dim pdoc As NotesDocument
Dim item As NotesItem
Dim subsection As String
Set dbase = session.CurrentDatabase
Set doc = session.DocumentContext
Set item = doc.GetFirstItem("choice")
Forall v In item.values
Set pdoc = db.GetDocumentByUNID( v )
subsection = pdoc.Section.(0)
End Forall
I have a view (SubSection view) with the first column set as "<tr><td><input type=\"radio\" name=\"choice\" value=\"" + @Text(@DocumentUniqueID) + "\" /></td>"
Then, I have a form named 'Section' which contains an embedded view (subsection view - with setting the content as HTML). When user clicks on the radio button and press SUBMIT button, it will run an agent. (I'm am not using ViewTemplate for SubSection, and i enclosed the SUBMIT button with these two {@command([FileSave]);@command([ToolsRunMacro];"(sectionagent)")
From the agent (Agent List Selection, target is NONE), it will get the DocUNID of the selected document (from radio button), then will open the document to assign value into subsection.
can I code like this??
Dim session As New NotesSession Dim dbase As NotesDatabase Dim doc As NotesDocument Dim pdoc As NotesDocument Dim item As NotesItem Dim subsection As String
Set dbase = session.CurrentDatabase Set doc = session.DocumentContext Set item = doc.GetFirstItem("choice")
Forall v In item.values Set pdoc = db.GetDocumentByUNID( v ) subsection = pdoc.Section.(0) End Forall
{the rest codes}
thank you for helps and guides