DEMOTARA
Tara vorbelegen
Die Datenbanktabelle demobeh enthält die Bezeichnung und das Leergewicht der verwendeten Behälter. Nach Eingabe der Behälternummer am Waagenterminal wird die Bezeichnung am Waagenterminal in den ORG-Daten angezeigt und das Tara manuell vorbelegt.
Ist die Behälternummer unbekannt wird für 5 Sekunden eine Fehlermeldung am Waagenterminal angezeigt.
~^<Q773Q([0-9]{1,18})>$~
$btyp
// Beispiel <Q773Q10002>
XDBOPEN( 'demobeh' )
XCHECKREPLY( $syserror , "<K022K $syserror;5>" )
XDBGET( $btyp , &$bez , &$tara )
XCHECKREPLY( $syserror , "<K022K $syserror;5>" )
if (empty($bez))
{
$sysreply = "<K022K $btyp nicht vorhanden;5>";
}
else
{
XSTR( $tara )
XLATIN( $bez )
XTTYOPN( 0 )
XCHECKREPLY( $syserror , "<K022K $syserror;5>" )
XTTYSND( "<Q070Q$btyp>" )
XCHECKREPLY( $syserror , "<K022K $syserror;5>" )
XTTYRCV( '>' , 20 , $buf )
XCHECKREPLY( $syserror , "<K022K $syserror;5>" )
XTTYSND( "<Q071Q$bez>" )
XCHECKREPLY( $syserror , "<K022K $syserror;5>" )
XTTYRCV( '>' , 20 , $buf )
XCHECKREPLY( $syserror , "<K022K $syserror;5>" )
XTTYSND( "<Q010Q$tara>" )
XCHECKREPLY( $syserror , "<K022K $syserror;5>" )
XTTYRCV( '>' , 20 , $buf )
XCHECKREPLY( $syserror , "<K022K $syserror;5>" )
}
XCHECKREPLY
XDBGET
XDBOPEN
XLATIN
XSTR
XTTYOPN
XTTYRCV
XTTYSND
$syserror
$sysreply
