|
This procedure takes as input a subsystem and a version-control label and translates it to a (major, middle, minor) triplet and stores in abasslabels, if there such a subsystem in the database. If there already is a label for the subsystem with the same translation this is an error, as is if the label is not on the format Letter.Major.Middle.Minor.
If the procedure detects an error, this is communicated in @msg.
This procedure is called in several places in AbaPerls.
@subsysten ap_subsystem -- The subsystem @ss_label ap_sslabel -- A Version-control label @major smallint = NULL OUTPUT -- The Major part of the label. @middle smallint = NULL OUTPUT -- The Middle part. @minor smallint = NULL OUTPUT -- The Minor part. @msg varchar(255) = NULL OUTPUT -- Why label did not translate or NULL. |
|
|
|