20 lines
1012 B
Plaintext
20 lines
1012 B
Plaintext
|
<EFBFBD><EFBFBD>C R E A T E P R O C E D U R E [ d b o ] . [ s p _ S e n s o r s A n a l o g U s a g e C o u n t U p d a t e ]
|
|||
|
|
@ S e n s o r I d I N T ,
|
|||
|
|
@ U s a g e C o u n t I N T N U L L ,
|
|||
|
|
@ e r r o r N u m b e r I N T O U T P U T ,
|
|||
|
|
@ e r r o r M e s s a g e N V A R C H A R ( 2 5 5 ) O U T P U T
|
|||
|
|
A S
|
|||
|
|
B E G I N
|
|||
|
|
S E T N O C O U N T O N
|
|||
|
|
S E T @ e r r o r N u m b e r = 0
|
|||
|
|
S E T @ e r r o r M e s s a g e = ' '
|
|||
|
|
|
|||
|
|
U P D A T E [ d b o ] . [ S e n s o r s A n a l o g ] S E T [ U s a g e C o u n t ] = @ U s a g e C o u n t W H E R E [ S e n s o r I d ] = @ S e n s o r I d ;
|
|||
|
|
|
|||
|
|
i f ( @ @ e r r o r ! = 0 )
|
|||
|
|
b e g i n
|
|||
|
|
s e t @ e r r o r N u m b e r = e r r o r _ n u m b e r ( )
|
|||
|
|
s e t @ e r r o r M e s s a g e = e r r o r _ m e s s a g e ( )
|
|||
|
|
e n d
|
|||
|
|
E N D
|
|||
|
|
|