We might look for? TEMPLATE? C? F?? on MAINTC:
q disk?????????????????????????????????????????????????????????????????????????????
Label? CUU M? Stat? Cyl Type Blksize?? Files? Blks Used-(%) Blks Left? Blk Total? ?
MNT191 191 A?? R/W?? 50 3350? 800???????? 29?????? 2699-09????? 25801????? 28500? ?
MNT193 193 E/A R/O?? 50 3350? 800??????? 212?????? 2347-08????? 26153????? 28500? ?
MNT393 393 F/A R/O?? 50 3350? 800??????? 218?????? 1468-05????? 27032????? 28500? ?
MNT394 394 G/A R/O?? 50 3350? 800???????? 20?????? 2252-08????? 26248????? 28500? ?
MNT194 194 H/A R/O?? 50 3350? 800????????? 1?????? 3123-11????? 25377????? 28500? ?
CMSDSK 190 S?? R/O?? 59 3350? 800??????? 172????? 19542-58????? 14088????? 33630? ?
MNT19C 19C T?? R/W?? 50 3350? 800???????? 40??????? 124-00????? 28376????? 28500? ?
MNT29D 19D U/S R/O?? 30 3350? 800??????? 407?????? 6242-37????? 10858????? 17100? ?
MNT19E 19E Y/S R/O?? 70 3350? 800??????? 710????? 28263-71????? 11637????? 39900? ?
Ready; T=0.01/0.01 19:15:40?????????????????????????????????????????????????????? ?
????????????????????????????????????????????????????????????????????????????????? ?
l template c *??? ( l iso???????????????????????????????????????????????????????? ?
Filename Filetype Fm? Format??? Recs Blocks???? Date??? Time?? Label????????????? ?
TEMPLATE C??????? F1? V??? 80??? 218???? 10? 2021-04-14 12:17? MNT393???????????? ?
Ready; T=0.01/0.01 19:16:41?????????????????????????????????????????????????????? ?
????????????????????????????????????????????????????????????????????????????????? ?
File: TEMPLATE C??????? F1??????????????????????????????????????????????????????? ?
===>????????????????????????????????????????????????????????????????????????????? ?
?? 81 /* -------------------------------------------------------------- */??????? ?
?? 82 /*? template_list := template | [template] ',' [template_list]??? */??????? ?
?? 83 /*? template?? := (trigger | target | Msg38.1)+?????????????????? */??????? ?
?? 84 /*? target???? := VAR_SYMBOL | '.'??????????????????????????????? */??????? ?
?? 85 /*? trigger??? := pattern | positional??????????????????????????? */??????? ?
?? 86 /*? pattern??? := STRING | vrefp????????????????????????????????? */??????? ?
?? 87 /*? vrefp????? := '(' (VAR_SYMBOL | Msg19.7) (')' | Msg46.1)????? */??????? ?
?? 88 /*? positional := absolute_pos | relative_pos???????????????????? */??????? ?
?? 89 /*? absolute_pos := NUMBER | '=' position???????????????????????? */??????? ?
?? 90 /*? position?? := NUMBER | vrefp? | Msg38.2?????????????????????? */??????? ?
?? 91 /*? relative_pos := ('+' | '-') position????????????????????????? */??????? ?
?? 92 /* -------------------------------------------------------------- */??????? ?
?? 93 void __CDECL??????????????????????????????????????????????????????????????? ?
?? 94 C_template(void) {????????????????????????????????????????????????????????? ?
?? 95???? void *target_ptr = NULL;??????????????????????????????????????????????? ?
?? 96???? bool trigger, dot = FALSE;????????????????????????????????????????????? ?
?? 97???? bool sign;????????????????????????????????????????????????????????????? ?
?? 98???? int type;?????????????????????????????????????????????????????????????? ?
?? 99???? CTYPE pos;????????????????????????????????????????????????????????????? ?
? 100???? Context *context = (Context *) CMSGetPG();????????????????????????????? ?
? 101???????????????????????????????????????????????????????????????????????????? ?
? 102???? _CodeAddByte(OP_PARSE);???????????????????????????????????????????????? ?
? 103???? while (((context->nextsymbsymbol) != semicolon_sy) &&?????????????????? ?
Martin Scheffler