Function EN Version 4.50

@SetDBARConnection

Database NotesAdmin

Syntax

@SetDBARConnection(DBHANDLE1;DESTINATIONSERVER;SOURCESERVER;FNCLASSMASK;TLVIEWS;TLFOLDERS;TLFIELDS;TEXTFORMULA);

Description

Sets the Advanced Replication Connection settings in the database identified by DBHANDLE DBHANDLE1 from the source server TEXT SOURCESERVER to the destination server TEXT DESTINATIONSERVER.
If a definition for this destination-server/source-server pair already exists, it is modified. If no definition for this connection exists yet, it is created.
If the first connection for a new destination server is set, a definition for AnyServer ("-") with the default values is created automatically, unless the definition itself refers to AnyServer ("-").
Default values:
   FNCLASSMASK:=30719;
   TLVIEWS:="";
   TLFOLDERS:="";
   TLFIELDS:="";
   TEXTFORMULA:="SELECT @All";

The return value of the @Function is TRUE on success, or @Error in case of an error.

NUMBER FNCLASSMASK defines the note classes of the documents to be replicated.
TEXTLIST TLVIEWS specifies the list of views and shared folders that contain the documents to be replicated.
TEXTLIST RETFOLDERS specifies the list of private folders that contain the documents to be replicated.
TEXTLIST RETFIELDS specifies the list of fields to be replicated. If the list is empty, all fields are replicated.
TEXT RETFORMULA specifies the selection formula.

NUMBER RETNCLASSMASK:
DEC   BIT   Meaning
00001   01   Documents   Data documents
00002   02   Policy Note   Database policy document
00004   03   Form Note   Form design documents
00008   04   View Note   View design documents
00016   05   Icon Note   Icon document
00032   06   Design Collection Note   View documents
00064   07   ACL Info Note   ACL info document
00128   08   Help Index Note   
00256   09   Help Note   Help database document
00512   10   Filter Note   Macro design documents
01024   11   Field Note   Field design documents
02048   12   Replication Note   Replication documents
04096   13   Private Design   Private design documents

Example: @SetDBARConnection(DBHANDLE1;DESTINATIONSERVER;SOURCESERVER;FNCLASSMASK;TLVIEWS;TLFOLDERS;TLFIELDS;TEXTFORMULA)

DBHANDLE1:=@OpenDB("TEST.NSF");

n1:=1;
n1e:=@Elements(TLRETDESTINATIONSERVERS);

SetDstSrv:="CN=WU-ENT-BER-0A/O=WHATSUP/C=DE";
SetSrcSrv:="CN=WU-ENT-BER-0X/O=WHATSUP/C=DE";
FNCLASSMASK:=30719;
TLVIEWS:="";
TLFOLDERS:="";
TLFIELDS:="";
TEXTFORMULA:="SELECT @All";
Ret:=@SetDBARConnection(DBHANDLE1;SetDstSrv;SetSrcSrv;FNCLASSMASK;TLVIEWS;TLFOLDERS;TLFIELDS;TEXTFORMULA);
@LogReport(Ret;3);
WHILE(n1<=n1e)
{
   ZS:=@GetListElement(TLRETDESTINATIONSERVERS;n1);
   @LogReport("Ziel-Server:"+ZS;3);
   QSList:=@Explode(@GetListElement(TLRETSOURCESERVERS;n1);@Newline);
   n2:=1;
   n2e:=@Elements(QSList);
   WHILE(n2<=n2e)
   {
      QS:=@GetListElement(QSList;n2);
            Ret:=@GetDBARConnection(DBHANDLE1;ZS;QS;RetClassMask;RetViews;RetFolders;RetFields;RetFormulaTxt);      
      @LogReport(" Quell-Server:"+QS;3);
      @LogReport(" Note Classes :"+@Text(RetClassMask);3);
      @LogReport(" Views / Shared Folders:"+@Implode(RetViews;";");3);
      @LogReport(" Private Folders :"+@Implode(RetFolders;";");3);
      @LogReport(" Fields :"+@Implode(RetFields;";");3);
      @LogReport(" Formula :"+RetFormulaTxt;3);
      @Increment(n2);
   }
   @Increment(n1);

The database is opened, the list of destination servers and the corresponding list of source servers is retrieved, and the Advanced Replication Settings for the connection "CN=WU-ENT-BER-0A/O=WHATSUP/C=DE"/"CN=WU-ENT-BER-0X/O=WHATSUP/C=DE" are set to the default values.

After that, the Advanced Replication Settings for each defined connection are output.

Example-output:
1
1
Ziel-Server:-
Quell-Server:-
Note Classes :30719
Views / Shared Folders:
Private Folders :
Fields :
Formula :SELECT @All
Ziel-Server:CN=WU-ENT-BER-03/O=WHATSUP/C=DE
Quell-Server:-
Note Classes :30719
Views / Shared Folders:
Private Folders :
Fields :
Formula :SELECT @All
Ziel-Server:CN=WU-ENT-BER-0A/O=WHATSUP/C=DE
Quell-Server:-
Note Classes :1
Views / Shared Folders:
Private Folders :
Fields :
Formula :SELECT @All
Quell-Server:CN=WU-ENT-BER-0X/O=WHATSUP/C=DE
Note Classes :30719
Views / Shared Folders:
Private Folders :
Fields :
Formula :SELECT @All
Quell-Server:CN=WU-ENT-BER-0Y/O=WHATSUP/C=DE
Note Classes :30719
Views / Shared Folders:
Private Folders :
Fields :Attach;Author;C1;documenttyp
Formula :SELECT @All

Note : This text was machine-translated and may contain inaccuracies.