SonarQube Server 2025.6
RPG
Unused subroutines should be removed - S1601
False positive on *INZSR subroutine. This subroutine is implicitly executed at program initialization, but is never explicitly called. It should not show as a warning for the S1601 rule as it is used, it’s just not as obvious as other subroutines. False positive occurs in both free format and fixed format RPG.
**free
snd-msg 'Second';
*inlr = *on;
begsr *inzsr;
snd-msg 'First';
endsr;
C SND-MSG 'SECOND'
C SETON LR
C *INZSR BEGSR
C SND-MSG 'FIRST'
C ENDSR