cmpp错误码

case ntohl(CMPP_CONNECT_RESP_tag.Status) of
      0:
        R_mem.Lines.Add('连接返回内容：状态=' + inttostr(ntohl(CMPP_CONNECT_RESP_tag.Status)) + '正确.');
      1:
        R_mem.Lines.Add('连接返回内容：状态=' + inttostr(ntohl(CMPP_CONNECT_RESP_tag.Status)) + '消息结构错.');
      2:
        R_mem.Lines.Add('连接返回内容：状态=' + inttostr(ntohl(CMPP_CONNECT_RESP_tag.Status)) + '非法源地址.');
      3:
        R_mem.Lines.Add('连接返回内容：状态=' + inttostr(ntohl(CMPP_CONNECT_RESP_tag.Status)) + '认证错.');
      4:
        R_mem.Lines.Add('连接返回内容：状态=' + inttostr(ntohl(CMPP_CONNECT_RESP_tag.Status)) + '版本太高.');
      5:
        R_mem.Lines.Add('连接返回内容：状态=' + inttostr(ntohl(CMPP_CONNECT_RESP_tag.Status)) + '其他错误.');
    end;
*****************************

case ntohl(CMPP_SUBMIT_RESP_tag.Result) of
      0:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + '正确.');
      1:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + '消息结构错.');
      2:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + '命令字错.');
      3:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + '消息序号重复.');
      4:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + '消息长度错.');
      5:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + '资费代码错.');
      6:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + '超过最大信息长.');
      7:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + '业务代码错.');
      8:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + '流量控制错.');
      9:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + '本网关不负责服务此计费号码.');
      10:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + 'Src_Id错误.');
      11:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + 'Msg_src错误.');
      12:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + 'Fee_terminal_Id错误.');
      13:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + 'Dest_terminal_Id错误.');
      14:
        R_mem.Lines.Add('发送短信返回内容：状态=' + inttostr(ntohl(CMPP_SUBMIT_RESP_tag.Result)) + '其他错误.');

    end;