类似switch的条件语句ps（case）

    Evaluate &str_init_db_type
      When "1"
         SQLExec("SELECT TZ_APP_ATTR_STR FROM PS_TZ_APP_ATTR_DHW WHERE TZ_APP_INS_ID = :1 AND TZ_APP_ATTR_ID = :2", &int_app_ins_num, &str_init_field_name, &str_init_field_value);
         Break;
      When "2"
         SQLExec("SELECT TO_CHAR(TZ_APP_ATTR_DATE,'YYYY/MM/DD') FROM PS_TZ_APP_ATTR_DAT WHERE TZ_APP_INS_ID = :1 AND TZ_APP_ATTR_ID = :2", &int_app_ins_num, &str_init_field_name, &str_init_field_value);
         Break;
      When "3"
         SQLExec("SELECT TZ_APP_ATTR_LONG FROM PS_TZ_APP_ATTR_ARE WHERE TZ_APP_INS_ID = :1 AND TZ_APP_ATTR_ID = :2", &int_app_ins_num, &str_init_field_name, &str_init_field_value);
         Break;
      When "4"
         SQLExec("SELECT TZ_APP_ATTR_NUM FROM PS_TZ_APP_ATTR_NUM WHERE TZ_APP_INS_ID = :1 AND TZ_APP_ATTR_ID = :2", &int_app_ins_num, &str_init_field_name, &str_init_field_value);
         Break;
      End-Evaluate;