Source position: jwabthdef.pas line 458
procedure SET_COD_SERVICE(
var _cod: BTH_COD;
_service: BTH_COD
);