(3) you may try 2 ways:
1) save document into database and open at client value from reference,
| Code |
|---|
&AtClient
Procedure CreateDocument(Command)
Ref = CreateDocumentServer();
OpenValue(Ref);
EndProcedure
&AtServer
Function CreateDocumentServer()
NewDocument = Documents.Payment.CreateDocument();
NewDocument.Bank = Object.Ref;
NewDocument.Write();
Return Doc.Ref;
EndFunction |
but if you created document-object without all needable field - you cannot save it, so you must use second way:
2) open new form with parameter and accept it into object form module
As example:
Some button:
| Code |
|---|
&AtClient
Procedure Command1(Command)
Str = New Structure;
Str.Insert("Bank", Object.Ref);
OpenForm("Document.Document1.ObjectForm", Str);
EndProcedure |
Module in document form:
| Code |
|---|
&AtServer
Procedure OnCreateAtServer(Cancel, StandardProcessing)
If not ValueIsFilled(Object.Ref)
and Parameters.Property("Bank") then
Object.Bank = Parameters.Bank;
EndIf;
EndProcedure |
