|
|
use frsobjsup; package main; my ($__HashRef, $__k, $__v);## Processing file hubspoke.mrs Modify Time: Tue Apr 3 13:30:15 2001
## use Time::Local;use Time::Local;## printf "Configuration generated at %s\n\n", scalar localtime;printf "Configuration generated at %s\n\n", scalar localtime;## $stage = "D:\\staging"; $stage = "D:\\staging"; ## $DC_OU_DN = "ou=domain controllers,dc=frs1221,dc=nttest,dc=microsoft,dc=com";$DC_OU_DN = "ou=domain controllers,dc=frs1221,dc=nttest,dc=microsoft,dc=com";## HUB: FRS_SERVER (/RP="E:\RSB" /SP="$stage" /COMPUTER='frs1221\sudarctest1$' ## /DNS_NAME="sudarctest1.frs1221.nttest.microsoft.com" /MNAME="hub0") $__HashRef = FRS_SERVER->New( ## ArgIndex for parameter: 'RP' ## ArgType found for parameter: 'RP' is 'VALUE_STR'## ArgIndex for parameter: 'SP' ## ArgType found for parameter: 'SP' is 'VALUE_STR'## ArgIndex for parameter: 'COMPUTER' ## ArgType found for parameter: 'COMPUTER' is 'VALUE_STR'## ArgIndex for parameter: 'DNS_NAME' ## ArgIndex for parameter: 'MNAME' RP=>"E:\\RSB", SP=>"$stage", COMPUTER=>'frs1221\\sudarctest1$', DNS_NAME=>"sudarctest1.frs1221.nttest.microsoft.com", MNAME=>"hub0" ); &FRSSUP::AddToSet("HUB", $__HashRef);
## HUB: FRS_SERVER (/RP="E:\RSB" /SP="$stage" /COMPUTER='frs1221\sudarctest2$'## /DNS_NAME="sudarctest2.frs1221.nttest.microsoft.com" /MNAME="hub1") $__HashRef = FRS_SERVER->New( ## ArgIndex for parameter: 'RP' ## ArgType found for parameter: 'RP' is 'VALUE_STR'## ArgIndex for parameter: 'SP' ## ArgType found for parameter: 'SP' is 'VALUE_STR'## ArgIndex for parameter: 'COMPUTER' ## ArgType found for parameter: 'COMPUTER' is 'VALUE_STR'## ArgIndex for parameter: 'DNS_NAME' ## ArgIndex for parameter: 'MNAME' RP=>"E:\\RSB", SP=>"$stage", COMPUTER=>'frs1221\\sudarctest2$', DNS_NAME=>"sudarctest2.frs1221.nttest.microsoft.com", MNAME=>"hub1" ); &FRSSUP::AddToSet("HUB", $__HashRef);
## foreach $b ("sudarctest4", "DREWSAM-SRV", "sudarctest3", "DREWSAM-SRV" ) {foreach $b ("sudarctest4", "DREWSAM-SRV", "sudarctest3", "DREWSAM-SRV" ) {## $Nt4Acct = "frs1221\\$b\$"; $Nt4Acct = "frs1221\\$b\$";## BCH: FRS_SERVER (/RP="D:\RSB" /SP="D:\staging"## /COMPUTER=$Nt4Acct## /id="-$b"## /DNS_NAME="$b.frs1221.nttest.microsoft.com"## ) $__HashRef = FRS_SERVER->New( ## ArgIndex for parameter: 'RP' ## ArgType found for parameter: 'RP' is 'VALUE_STR'## ArgIndex for parameter: 'SP' ## ArgType found for parameter: 'SP' is 'VALUE_STR'## ArgIndex for parameter: 'COMPUTER' ## ArgType found for parameter: 'COMPUTER' is 'VALUE_STR'## ArgIndex for parameter: 'id' ## ArgIndex for parameter: 'DNS_NAME' RP=>"D:\\RSB", SP=>"D:\\staging", COMPUTER=>$Nt4Acct, id=>"-$b", DNS_NAME=>"$b.frs1221.nttest.microsoft.com" ); &FRSSUP::AddToSet("BCH", $__HashRef);
## }}## PRIMARY_SCH: FRS_SCHEDULE (/REPL_INTERVAL=4 /REPL_DURATION="1:30"## /TIME_ZONE="+1" /REPL_OFFSET=0 /STAGGER=2## /METHOD=1 /NAME='Primary Sched'## /DISABLE="mo:07:30-mo:18:00,tu:07:30-tu:18:00,we:07:30-we:18:00,th:07:30-th:18:00,fr:07:30-fr:18:00"## ) $__HashRef = FRS_SCHEDULE->New( ## ArgIndex for parameter: 'REPL_INTERVAL' ## ArgType found for parameter: 'REPL_INTERVAL' is 'VALUE_TIME_SINGLE'## ArgIndex for parameter: 'REPL_DURATION' ## ArgType found for parameter: 'REPL_DURATION' is 'VALUE_TIME_SINGLE'## ArgIndex for parameter: 'TIME_ZONE' ## ArgType found for parameter: 'TIME_ZONE' is 'VALUE_SIGN_TIME'## ArgIndex for parameter: 'REPL_OFFSET' ## ArgType found for parameter: 'REPL_OFFSET' is 'VALUE_TIME_SINGLE'## ArgIndex for parameter: 'STAGGER' ## ArgType found for parameter: 'STAGGER' is 'VALUE_TIME_SINGLE'## ArgIndex for parameter: 'METHOD' ## ArgType found for parameter: 'METHOD' is 'VALUE_CHOICE_SINGLE'## ArgIndex for parameter: 'NAME' ## ArgType found for parameter: 'NAME' is 'VALUE_STR'## ArgIndex for parameter: 'DISABLE' ## ArgType found for parameter: 'DISABLE' is 'VALUE_TIME_LIST' REPL_INTERVAL=>4, REPL_DURATION=>"1:30", TIME_ZONE=>"+1", REPL_OFFSET=>0, STAGGER=>2, METHOD=>1, NAME=>'Primary Sched', DISABLE=>"mo:07:30-mo:18:00,tu:07:30-tu:18:00,we:07:30-we:18:00,th:07:30-th:18:00,fr:07:30-fr:18:00" ); &FRSSUP::AddToSet("PRIMARY_SCH", $__HashRef);
## FRS_SUB CREATE_HUB_SPOKE_CONN(/HUBSET=SET_REF_SET ## subname = 'CREATE_HUB_SPOKE_CONN', func = 'FRS_SUB', rest = '(/HUBSET=SET_REF_SET '
## /BCHSET=SET_REF_SET## /SC1=SCHEDULE )sub CREATE_HUB_SPOKE_CONN { my %__args = (@_); my ($__HashRef, $__k, $__v); while ( ($__k, $__v) = each %__args ) { print "\t$__k => '$__v'\n"; }
## paramstr: HUBSET=SET_REF_SET /BCHSET=SET_REF_SET /SC1=SCHEDULE
## new FRS_SUB parameter: 'CREATE_HUB_SPOKE_CONN-HUBSET' ## new FRS_SUB parameter: 'CREATE_HUB_SPOKE_CONN-BCHSET' ## new FRS_SUB parameter: 'CREATE_HUB_SPOKE_CONN-SC1'
## $Hx = 0; $Hx = 0;## $NHub = FRS_COUNT_SET(/SET=%HUBSET%);## ExpandArgStr: $NHub = FRS_COUNT_SET(/SET=$__args{HUBSET}); $NHub = scalar @{ ## ArgIndex for parameter: 'SET' ## ArgType found for parameter: 'SET' is 'SET_REF_SET'$__args{HUBSET} }
;## print " NHUB = $NHub\n\n"; print " NHUB = $NHub\n\n";## print " NBCH FRS _COUNT_SET( /SET= % BCHSET % ) ", FRS_COUNT_SET(/SET= %BCHSET% ), "\n" ;## ExpandArgStr: print " NBCH FRS _COUNT_SET( /SET= % BCHSET % ) ", FRS_COUNT_SET(/SET= $__args{BCHSET} ), "\n" ; print " NBCH FRS _COUNT_SET( /SET= % BCHSET % ) ", scalar @{ ## ArgIndex for parameter: 'SET' ## ArgType found for parameter: 'SET' is 'SET_REF_SET'$__args{BCHSET} }
, "\n" ;## foreach $bch (FRS_ARRAY(/SET=%BCHSET%)) {## ExpandArgStr: foreach $bch (FRS_ARRAY(/SET=$__args{BCHSET})) { foreach $bch ( @{ ## ArgIndex for parameter: 'SET' ## ArgType found for parameter: 'SET' is 'SET_REF_SET'$__args{BCHSET} }
) {## print "working on branch: $bch->{ONAME}\n"; print "working on branch: $bch->{ONAME}\n";## $hubsrv = %HUBSET%[$Hx];## ExpandArgStr: $hubsrv = $__args{HUBSET}[$Hx]; $hubsrv = $__args{HUBSET}[$Hx];## FRS_CONNECTION (/TO=$bch /FROM=%HUBSET%[$Hx] /SCHED=%SC1%## ExpandArgStr: FRS_CONNECTION (/TO=$bch /FROM=$__args{HUBSET}[$Hx] /SCHED=$__args{SC1}## /ONAME="FROM-".$hubsrv->{MNAME}."-TO-".$bch->{ONAME} ) FRS_CONNECTION->New( ## ArgIndex for parameter: 'TO' ## ArgType found for parameter: 'TO' is 'SET_ELEMENT'## ArgIndex for parameter: 'FROM' ## ArgType found for parameter: 'FROM' is 'SET_ELEMENT'## ArgIndex for parameter: 'SCHED' ## ArgType found for parameter: 'SCHED' is 'SCHEDULE'## ArgIndex for parameter: 'ONAME' ## ArgType found for parameter: 'ONAME' is 'VALUE_STR' TO=>$bch, FROM=>$__args{HUBSET}[$Hx], SCHED=>$__args{SC1}, ONAME=>"FROM-".$hubsrv->{MNAME}."-TO-".$bch->{ONAME} );
## FRS_CONNECTION (/TO=%HUBSET%[$Hx] /FROM=$bch /SCHED=%SC1%## ExpandArgStr: FRS_CONNECTION (/TO=$__args{HUBSET}[$Hx] /FROM=$bch /SCHED=$__args{SC1}## /ONAME="FROM-".$bch->{ONAME}."-TO-".$hubsrv->{MNAME} ) FRS_CONNECTION->New( ## ArgIndex for parameter: 'TO' ## ArgType found for parameter: 'TO' is 'SET_ELEMENT'## ArgIndex for parameter: 'FROM' ## ArgType found for parameter: 'FROM' is 'SET_ELEMENT'## ArgIndex for parameter: 'SCHED' ## ArgType found for parameter: 'SCHED' is 'SCHEDULE'## ArgIndex for parameter: 'ONAME' ## ArgType found for parameter: 'ONAME' is 'VALUE_STR' TO=>$__args{HUBSET}[$Hx], FROM=>$bch, SCHED=>$__args{SC1}, ONAME=>"FROM-".$bch->{ONAME}."-TO-".$hubsrv->{MNAME} );
## $Hx=($Hx+1) % $NHub; $Hx=($Hx+1) % $NHub;## if ($Hx == 0) { if ($Hx == 0) {## FRS_STAGGER (/SCHED=%SC1%)## ExpandArgStr: FRS_STAGGER (/SCHED=$__args{SC1}) FRS_SCHEDULE::FRS_STAGGER( ## ArgIndex for parameter: 'SCHED' ## ArgType found for parameter: 'SCHED' is 'SCHEDULE'SCHED=>$__args{SC1} );
## } }## } }## FRS_END_SUB} # FRS_END_SUB
## FRS_SUB CREATE_RING_CONN(/HUBSET=SET_REF_SET )## subname = 'CREATE_RING_CONN', func = 'FRS_SUB', rest = '(/HUBSET=SET_REF_SET )'
sub CREATE_RING_CONN { my %__args = (@_); my ($__HashRef, $__k, $__v); while ( ($__k, $__v) = each %__args ) { print "\t$__k => '$__v'\n"; }
## paramstr: HUBSET=SET_REF_SET
## new FRS_SUB parameter: 'CREATE_RING_CONN-HUBSET'
## FRS_SHOW(/SET=%HUBSET%)## ExpandArgStr: FRS_SHOW(/SET=$__args{HUBSET}) FRSSUP::FRS_SHOW( ## ArgIndex for parameter: 'SET' ## ArgType found for parameter: 'SET' is 'SET_REF_SET'SET=>$__args{HUBSET} );
## $Ringx = 0; $Ringx = 0;## $RingCount = FRS_COUNT_SET(/SET=%HUBSET%);## ExpandArgStr: $RingCount = FRS_COUNT_SET(/SET=$__args{HUBSET}); $RingCount = scalar @{ ## ArgIndex for parameter: 'SET' ## ArgType found for parameter: 'SET' is 'SET_REF_SET'$__args{HUBSET} }
;## print " RingCount = $RingCount\n\n"; print " RingCount = $RingCount\n\n";## for ($Ringx=0; $Ringx < $RingCount-1; $Ringx++) { for ($Ringx=0; $Ringx < $RingCount-1; $Ringx++) {## $RM1 = %HUBSET%[$Ringx];## ExpandArgStr: $RM1 = $__args{HUBSET}[$Ringx]; $RM1 = $__args{HUBSET}[$Ringx];## $RM2 = %HUBSET%[($Ringx+1) % $RingCount];## ExpandArgStr: $RM2 = $__args{HUBSET}[($Ringx+1) % $RingCount]; $RM2 = $__args{HUBSET}[($Ringx+1) % $RingCount];## FRS_CONNECTION (/TO=$RM1 /FROM=$RM2 /SCHED=ON## /ONAME="FROM-".$RM2->{MNAME}."-TO-".$RM1->{MNAME} ) FRS_CONNECTION->New( ## ArgIndex for parameter: 'TO' ## ArgType found for parameter: 'TO' is 'SET_ELEMENT'## ArgIndex for parameter: 'FROM' ## ArgType found for parameter: 'FROM' is 'SET_ELEMENT'## ArgIndex for parameter: 'SCHED' ## ArgType found for parameter: 'SCHED' is 'SCHEDULE'## ArgIndex for parameter: 'ONAME' ## ArgType found for parameter: 'ONAME' is 'VALUE_STR' TO=>$RM1, FROM=>$RM2, SCHED=>ON, ONAME=>"FROM-".$RM2->{MNAME}."-TO-".$RM1->{MNAME} );
## FRS_CONNECTION (/TO=$RM2 /FROM=$RM1 /SCHED=ON## /ONAME="FROM-".$RM1->{MNAME}."-TO-".$RM2->{MNAME} ) FRS_CONNECTION->New( ## ArgIndex for parameter: 'TO' ## ArgType found for parameter: 'TO' is 'SET_ELEMENT'## ArgIndex for parameter: 'FROM' ## ArgType found for parameter: 'FROM' is 'SET_ELEMENT'## ArgIndex for parameter: 'SCHED' ## ArgType found for parameter: 'SCHED' is 'SCHEDULE'## ArgIndex for parameter: 'ONAME' ## ArgType found for parameter: 'ONAME' is 'VALUE_STR' TO=>$RM2, FROM=>$RM1, SCHED=>ON, ONAME=>"FROM-".$RM1->{MNAME}."-TO-".$RM2->{MNAME} );
## } }## FRS_END_SUB} # FRS_END_SUB
## FRS_SUB CREATE_HUB_SPOKE(/HUBSET=SET_REF_SET ## subname = 'CREATE_HUB_SPOKE', func = 'FRS_SUB', rest = '(/HUBSET=SET_REF_SET '
## /BCHSET=SET_REF_SET## /SC1=SCHEDULE## /REPSETDN=SET_ELEMENT)sub CREATE_HUB_SPOKE { my %__args = (@_); my ($__HashRef, $__k, $__v); while ( ($__k, $__v) = each %__args ) { print "\t$__k => '$__v'\n"; }
## paramstr: HUBSET=SET_REF_SET /BCHSET=SET_REF_SET /SC1=SCHEDULE /REPSETDN=SET_ELEMENT
## new FRS_SUB parameter: 'CREATE_HUB_SPOKE-HUBSET' ## new FRS_SUB parameter: 'CREATE_HUB_SPOKE-BCHSET' ## new FRS_SUB parameter: 'CREATE_HUB_SPOKE-SC1' ## new FRS_SUB parameter: 'CREATE_HUB_SPOKE-REPSETDN'
## FRSSUP::PrintHash(\%__args); FRSSUP::PrintHash(\%__args);## FRS_SHOW(/SET=%HUBSET%)## ExpandArgStr: FRS_SHOW(/SET=$__args{HUBSET}) FRSSUP::FRS_SHOW( ## ArgIndex for parameter: 'SET' ## ArgType found for parameter: 'SET' is 'SET_REF_SET'SET=>$__args{HUBSET} );
## # Restriction: All subroutine argument refs are surrounded by "%" # Restriction: All subroutine argument refs are surrounded by "%"## # notation "->{...}" # notation "->{...}"## foreach $hub (FRS_ARRAY(/SET=%HUBSET%)) {## ExpandArgStr: foreach $hub (FRS_ARRAY(/SET=$__args{HUBSET})) { foreach $hub ( @{ ## ArgIndex for parameter: 'SET' ## ArgType found for parameter: 'SET' is 'SET_REF_SET'$__args{HUBSET} }
) {## MOBJHUB: FRS_MEMBER (/UNDER=%REPSETDN%## ExpandArgStr: MOBJHUB: FRS_MEMBER (/UNDER=$__args{REPSETDN}## /SERVER=$hub## /COMPUTER=$hub->{COMPUTER}## /ONAME=$hub->{MNAME} ) $__HashRef = FRS_MEMBER->New( ## ArgIndex for parameter: 'UNDER' ## ArgType found for parameter: 'UNDER' is 'SET_ELEMENT'## ArgIndex for parameter: 'SERVER' ## ArgType found for parameter: 'SERVER' is 'SET_ELEMENT'## ArgIndex for parameter: 'COMPUTER' ## ArgType found for parameter: 'COMPUTER' is 'VALUE_STR'## ArgIndex for parameter: 'ONAME' ## ArgType found for parameter: 'ONAME' is 'VALUE_STR' UNDER=>$__args{REPSETDN}, SERVER=>$hub, COMPUTER=>$hub->{COMPUTER}, ONAME=>$hub->{MNAME} ); &FRSSUP::AddToSet("MOBJHUB", $__HashRef);
## } }## foreach $bch (FRS_SET(/SET=%BCHSET%)) {## ExpandArgStr: foreach $bch (FRS_SET(/SET=$__args{BCHSET})) { foreach $bch ( @{ FRSSUP::FRS_SET( ## ArgIndex for parameter: 'SET' ## ArgType found for parameter: 'SET' is 'SET_REF_SET'SET=>$__args{BCHSET} ) }
) {## MOBJBCH: FRS_MEMBER (/UNDER=%REPSETDN%## ExpandArgStr: MOBJBCH: FRS_MEMBER (/UNDER=$__args{REPSETDN}## /SERVER=$bch## /COMPUTER=$bch->{COMPUTER}## /ONAME="B".$bch->{id} ) $__HashRef = FRS_MEMBER->New( ## ArgIndex for parameter: 'UNDER' ## ArgType found for parameter: 'UNDER' is 'SET_ELEMENT'## ArgIndex for parameter: 'SERVER' ## ArgType found for parameter: 'SERVER' is 'SET_ELEMENT'## ArgIndex for parameter: 'COMPUTER' ## ArgType found for parameter: 'COMPUTER' is 'VALUE_STR'## ArgIndex for parameter: 'ONAME' ## ArgType found for parameter: 'ONAME' is 'VALUE_STR' UNDER=>$__args{REPSETDN}, SERVER=>$bch, COMPUTER=>$bch->{COMPUTER}, ONAME=>"B".$bch->{id} ); &FRSSUP::AddToSet("MOBJBCH", $__HashRef);
## } }## CREATE_RING_CONN(/HUBSET=<MOBJHUB> )## ExpandSetRef: CREATE_RING_CONN(/HUBSET=&FRSSUP::SelectSet(MOBJHUB) ) &CREATE_RING_CONN ( ## ArgIndex for parameter: 'CREATE_RING_CONN-HUBSET' ## ArgType found for parameter: 'CREATE_RING_CONN-HUBSET' is 'SET_REF_SET'HUBSET=>&FRSSUP::SelectSet(MOBJHUB) );
## CREATE_HUB_SPOKE_CONN(/HUBSET=<MOBJHUB> ## ExpandSetRef: CREATE_HUB_SPOKE_CONN(/HUBSET=&FRSSUP::SelectSet(MOBJHUB) ## /BCHSET=<MOBJBCH>## ExpandSetRef: /BCHSET=&FRSSUP::SelectSet(MOBJBCH)## /SC1=%SC1% )## ExpandArgStr: /SC1=$__args{SC1} ) &CREATE_HUB_SPOKE_CONN ( ## ArgIndex for parameter: 'CREATE_HUB_SPOKE_CONN-HUBSET' ## ArgType found for parameter: 'CREATE_HUB_SPOKE_CONN-HUBSET' is 'SET_REF_SET'## ArgIndex for parameter: 'CREATE_HUB_SPOKE_CONN-BCHSET' ## ArgType found for parameter: 'CREATE_HUB_SPOKE_CONN-BCHSET' is 'SET_REF_SET'## ArgIndex for parameter: 'CREATE_HUB_SPOKE_CONN-SC1' ## ArgType found for parameter: 'CREATE_HUB_SPOKE_CONN-SC1' is 'SCHEDULE'HUBSET=>&FRSSUP::SelectSet(MOBJHUB), BCHSET=>&FRSSUP::SelectSet(MOBJBCH), SC1=>$__args{SC1} );
## FRS_END_SUB &FRSSUP::DeleteSet("MOBJHUB"); &FRSSUP::DeleteSet("MOBJBCH");} # FRS_END_SUB
## SETTINGS: FRS_SETTINGS (/DN="cn=services,cn=configuration,dc=frs1221,dc=nttest,dc=microsoft,dc=com"## /ONAME="cn=ntfrs test settings") $__HashRef = FRS_SETTINGS->New( ## ArgIndex for parameter: 'DN' ## ArgType found for parameter: 'DN' is 'VALUE_STR'## ArgIndex for parameter: 'ONAME' ## ArgType found for parameter: 'ONAME' is 'VALUE_STR' DN=>"cn=services,cn=configuration,dc=frs1221,dc=nttest,dc=microsoft,dc=com", ONAME=>"cn=ntfrs test settings" ); &FRSSUP::AddToSet("SETTINGS", $__HashRef);
## SET: FRS_REPLICASET (/UNDER=<SETTINGS> /TYPE=DFS /ONAME="HubSpokeRepSet")## ExpandSetRef: SET: FRS_REPLICASET (/UNDER=&FRSSUP::SelectSet(SETTINGS) /TYPE=DFS /ONAME="HubSpokeRepSet") $__HashRef = FRS_REPLICASET->New( ## ArgIndex for parameter: 'UNDER' ## ArgType found for parameter: 'UNDER' is 'SET_ELEMENT'## ArgIndex for parameter: 'TYPE' ## ArgType found for parameter: 'TYPE' is 'VALUE_CHOICE_SINGLE'## ArgIndex for parameter: 'ONAME' ## ArgType found for parameter: 'ONAME' is 'VALUE_STR' UNDER=>&FRSSUP::SelectSet(SETTINGS)->[0], TYPE=>DFS, ONAME=>"HubSpokeRepSet" ); &FRSSUP::AddToSet("SET", $__HashRef);
## CREATE_HUB_SPOKE(/HUBSET=<HUB> ## ExpandSetRef: CREATE_HUB_SPOKE(/HUBSET=&FRSSUP::SelectSet(HUB) ## /BCHSET=<BCH>## ExpandSetRef: /BCHSET=&FRSSUP::SelectSet(BCH)## /SC1=<PRIMARY_SCH>## ExpandSetRef: /SC1=&FRSSUP::SelectSet(PRIMARY_SCH)## /REPSETDN=<SET>)## ExpandSetRef: /REPSETDN=&FRSSUP::SelectSet(SET)) &CREATE_HUB_SPOKE ( ## ArgIndex for parameter: 'CREATE_HUB_SPOKE-HUBSET' ## ArgType found for parameter: 'CREATE_HUB_SPOKE-HUBSET' is 'SET_REF_SET'## ArgIndex for parameter: 'CREATE_HUB_SPOKE-BCHSET' ## ArgType found for parameter: 'CREATE_HUB_SPOKE-BCHSET' is 'SET_REF_SET'## ArgIndex for parameter: 'CREATE_HUB_SPOKE-SC1' ## ArgType found for parameter: 'CREATE_HUB_SPOKE-SC1' is 'SCHEDULE'## ArgIndex for parameter: 'CREATE_HUB_SPOKE-REPSETDN' ## ArgType found for parameter: 'CREATE_HUB_SPOKE-REPSETDN' is 'SET_ELEMENT'HUBSET=>&FRSSUP::SelectSet(HUB), BCHSET=>&FRSSUP::SelectSet(BCH), SC1=>&FRSSUP::SelectSet(PRIMARY_SCH)->[0], REPSETDN=>&FRSSUP::SelectSet(SET)->[0] );
__END__
|
