外部 REXX 関数用の TALLY レジスター
TALLY レジスターをサポートする関数 に、関数活動について報告できる TALLY レジスターをサポートする関数を示します。
| 関数名 | カウントの対象 | TALLY リテラルのサンプル・コーディング |
|---|---|---|
| CHANGE | 変更されたストリング | (fld(1),'a','c',0,,,'Change 'a' to 'c' ') |
| CHG_OUT | 変更されたストリング | chg_out('a','c',0,,,, 'Change 'a' to 'c' ') |
| CHG_VAR | 変更されたストリング | chg_var(myvar,'a','c',0,,,, 'Change 'a' to 'c' ') |
| CMP_DATE | 結果が「真」の場合 | cmp_date('maturity-date',,,'rg','2013-01-01','2013-12-31',cmp_date('maturity-date',,,'rg','2013-01-01','2013-12-31','Loans ending in 2013') |
| CMP_TIME | 結果が「真」の場合 | cmp_time('start-time',,'HH:MI:SS','>','12:00:00','Starts after midday') |
| CONTAINS | 結果が「真」の場合 | co(fld(1,2),'aa','bb','cc',,'Contains 'aa','bb','cc'') |
| FLD_CO | 結果が「真」の場合 | fld_co(1,2,c,'aa','bb','cc',, 'Contains 'aa','bb','cc'') |
| FLD_OUT | 呼び出し | fld_out(1,2,3,2,,'Move Columns 1,2 to Columns 3,4 ') |
| FLD_TM | 結果が「真」の場合 | fld_tm(1,'01'x,,'Test under mask column 1 for '01'x ') |
| FLD_TYPE | 結果が「真」の場合 | fld_type(36,1,Z,'Check Column 36 for valid zoned') |
| FLDI | 結果が「真」の場合 | fldi(1,4,b,'>',64,'People over 64') |
| FLDO | 結果が「真」の場合 | fldo(1,4,b,'>',64,'People over 64') |
| NCONTAIN | 結果が「真」の場合 | nco(fld(36,1),1,4,3,2,,Column 36 contains 1,4,3,2')) |
| OFLD_CO | 結果が「真」の場合 | ofld_co(1,2,c,'aa','bb','cc',, 'Output contains 'aa','bb','cc'') |
| OVLY_OUT | 呼び出し | ovly_out('**',1,2,,,'Overlay columns 1,2 with '**' ') |
| OVLY_VAR | 呼び出し | ovly_var(myvar,'**',1,2,,,'Overlay columns 1,2 with '**' ') |
| SET_FLD | 呼び出し | set_fld('emp-bonus',0,'Reset employee bonus to zero') |
| SET_OLEN | 呼び出し | set_olen(84,'b','Change output record length to 84') |
| SETC | 結果が「真」の場合 | setc(myvar,'abc',,'Set myvar to abc') |
| SETN | 結果が「真」の場合 | setn(mynum,'+2','Add 2 to mynum') |
| TESTC | 結果が「真」の場合 | testc(myname,'cu','Smith','Jones',,'Common surnames') |
| TESTN | 結果が「真」の場合 | testn(varage,'>',64,'People over 64') |
| TFLD | 結果が「真」の場合 |
|
| TM | 結果が「真」の場合 | tm(fld(1,1),'01'x,,'Test under mask column 1 for '01'x ') |
| VAL_FLD | 呼び出し | val_fld('emp-no','Retrieved employee number') |
| VAR_OUT | 呼び出し | var_out(myvar,1,2,3,2,,'Move Columns 1,2 to Columns 3,4 ') |
| VAR_TM | 結果が「真」の場合 | var_tm(myvar,1,'01'x,,'Test under mask column 1 for '01'x ') |