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