Bernese GPS Software Version 5.0 - Bernese GNSS Software

19.6 User Scripts
In the slave script the file selection in the program input file can be defined using the
method:
Usage: replaceSel($bpe,$inpFil,$keyWrd,$filNam)
Parameters: $bpe BPE object
$inpFil name of the input file without path and extensions
(in most cases simply the program name, e.g., ADDNEQ2)
$keyWrd keyword where the new selection should replace the old one
$filNam BPE cluster file containing the filenames (usually $PARAM1)
19.6.5.3 Method for Special Action NEXTJOB
Instead of directly calling the method “$bpe->PRT_GOTO($$bpe{PARAM2});” from the
${BPE}/RUNBPE.pm module, ${BPE}/bpe util.pm provides a subroutine to for printing the
GOTO PID into the protocol file:
Usage: prtGoto($bpe,$pid)
Parameters: $bpe BPE object
$pid PID where to continue the processing
The following example shows a part of the user script GOTO which selects the PID on where
to continue from theNEXTJOB parameters according to the value of the variableSTARTCOUNT.
That means for each start of the script, e.g., in an iteration loop, the next goto PID is used
(see also Section 19.5.3):
# Get variables
# ------------my
$iRun = $$bpe{STARTCOUNT} - 1; # because starts counting by zero
my @nextJob = ($$bpe{PARAM2},$$bpe{PARAM3},$$bpe{PARAM4},$$bpe{PARAM5},
$$bpe{PARAM6},$$bpe{PARAM7},$$bpe{PARAM8},$$bpe{PARAM9});
# Write the "next jobs" statement
# ------------------------------if
(defined($nextJob[$iRun])) { $bpe->PRT_GOTO($nextJob[$iRun]) }
19.6.5.4 Utilities for Output and Protocols
The module ${BPE}/bpe util.pm provides two methods for printing messages into the
protocol files:
• Print a message line in the protocol file (status = MSG):
Usage: prtMess($bpe,$msg)
Parameters: $bpe BPE object
$msg string to print
• Report an error in the protocol file (status = ERR):
Usage: prtErr($bpe,$msg)
Parameters: $bpe BPE object
$msg string to print
This method prints only the message into the protocol file. The user script
should be terminated using the perl command die() to stop the BPE (e.g.,
“prtErr($bpe,"SOME ERROR"); die("BPE stopped by user script")”).
Bernese GPS Software Version 5.0 Page 405