NormalizedCost
SP_PARM->_ed_cost = NormalizedCost(clr_eos, 1);
SP_PARM->_el_cost = NormalizedCost(clr_eol, 1);
SP_PARM->_el1_cost = NormalizedCost(clr_bol, 1);
SP_PARM->_dch1_cost = NormalizedCost(delete_character, 1);
SP_PARM->_ich1_cost = NormalizedCost(insert_character, 1);
SP_PARM->_dch_cost = NormalizedCost(TIPARM_1(parm_dch, 23), 1);
SP_PARM->_ich_cost = NormalizedCost(TIPARM_1(parm_ich, 23), 1);
SP_PARM->_ech_cost = NormalizedCost(TIPARM_1(erase_chars, 23), 1);
SP_PARM->_rep_cost = NormalizedCost(TIPARM_2(repeat_char, ' ', 23), 1);
SP_PARM->_cup_ch_cost = NormalizedCost(TIPARM_2(SP_PARM->_address_cursor,
SP_PARM->_hpa_ch_cost = NormalizedCost(TIPARM_1(column_address, 23), 1);
SP_PARM->_cuf_ch_cost = NormalizedCost(TIPARM_1(parm_right_cursor, 23), 1);