Routine,Line,RtnLine,Code | |
ZZCOVTST,1,1,"ZZCOVTST;OSEHRA/JPS -- Test routine for Coverage Parsing;4/28/2014" | |
,2,0," ; (tab) This is series of comments" | |
,3,0," ; (tab) it should all be not executable" | |
,4,0," ; (spaces) one of these sets might be a problem" | |
,5,0," ; (spaces) we will have to see." | |
,6,0,"EN ; This entry point shouldn't be found without fixing" | |
,7,1," N D" | |
,8,1," S D=1 ;An executable line" | |
,9,1," D T1^ZZCOVTST" | |
,10,1," I '$$T5 W ""RETURNED FROM t5"",!" | |
,11,1," D T6^ZZCOVTST" | |
,12,1," Q" | |
,13,0," ; This line not executable" | |
,14,0," ;" | |
,15,0,"T1 ; This line should always be found" | |
,16,1," N D" | |
,17,1," S D=2" | |
,18,1," W !,D,!,""This is the second entry point"",!" | |
,19,1," D T2^ZZCOVTST(D)" | |
,20,1," Q" | |
,21,0," ;" | |
,22,0,"T2(EQ) ; This is debatable and only called with ENT^ROU notation" | |
,23,1," N D" | |
,24,1," S D=3" | |
,25,1," W !,D,!,EQ,""This is the third entry point"",!" | |
,26,1," D T3^ZZCOVTST" | |
,27,1," Q" | |
,28,0," ;" | |
,29,1,"T3 N D S D=4 W D,!,""Fourth Entry point"",! Q" | |
,30,0," ;" | |
,31,0,"T4 N D S D=5 W ""Shouldn't be executed""" | |
,32,0," W ""Lots to not do""" | |
,33,0," Q" | |
,34,1,"T5(EQ) ;this entry point is called with a $$ notation" | |
,35,1," W ""THIS IS THE $$ NOTATION!"",!" | |
,36,1," Q 0" | |
,37,0,"T6 ; An entry point to show comments inside of ""DO"" blocks" | |
,38,1," D" | |
,39,1," . W ""This is executable code"",!" | |
,40,0," . ; This is a comment inside the do block, not executable" | |
,41,1," . S ZZBLAH=""blah""" | |
,42,1," W ""Ending T6"",!" | |
,43,0," ;" | |
Totals for ZZCOVTST,,25, |