代码


一、 报表参数

1.nHotelID   名称:nHoteId  数据类型:Integer  隐藏     可用值:无查询   默认值: 无查询 =2

2.Team  名称: Team  数据类型:Integer  提示:团散  多值    
               可用值:无查询  标签: 住客=2  团客=1 散客=0
                   默认值:无查询  =2

3.VIP  名称:VIP  数据类型:Integer  提示:房型     多值 
                     可用值:来自查询  数据集: GuestKind   值字段: nId    标签字段:cName 
                 默认值:来自查询  数据集: GuestKind   值字段: nId

数据集 GuestKind 定义
         
          SQL语句: Select nId,cName From B_GuestKind Where bIsUse = 1  And nHotelId = @nHotelId order by nId

4.Area  名称:Area  数据类型:Integer  提示:区域     多值 
                     可用值:来自查询  数据集: Area   值字段: nId    标签字段:cName 
                 默认值:来自查询  数据集: Area   值字段: nId

数据集 Area 定义
         
          SQL语句: select nId,cName from B_Area where bIsUse=1 and nHotelId=@nHotelId

5.RoomKind  名称:RoomKind  数据类型:Integer  提示:房型     多值 
                     可用值:来自查询  数据集: RoomKind   值字段: nId    标签字段:cCode
                 默认值:来自查询  数据集: RoomKind   值字段: nId

数据集 RoomKind 定义
         
          SQL语句: select nId,cCode from B_RoomKind where bIsUse=1 and nHotelId=@nHotelId

5.NightCheckListId 名称: NightCheckListId  数据类型:Integer  提示:夜核批次     多值 
                     可用值:来自查询  数据集: NightCheckList   值字段: nId    标签字段:cName 
                 默认值:空值

数据集 NightCheckList 定义
         
          SQL语句: 
          select nId,cName=convert(nvarchar(12),DateAdd(dd,-1,dEndTime),112) from C_NightCheckList
                  where nHotelId=@nHotelId order by nId desc

二、 数据

1. 数据集 Title  SQL语句: select cName from tHotelS where nId=@nHotelId

2. 数据集 HotelDB  SQL语句

SELECT A.cName AS cGuestName, A.dArrivedTime, A.dLeftTime,A.nGuestCount, A.nKidCount,A.cPactCompany,
       B.cCode AS cRoomCode,
       C.cName AS cGuestKindName,
       D.cCode AS cRoomKindCode,  
       E.cCode AS cRateCode,
       F.cCode AS cMarkCode,
       G.cTeamCode,
       isnull(dbo.F_GetGuestRoomPriceRM(A.nHotelId,A.nId),0.00) AS RoomRate,
       isnull(dbo.F_Z_GetProductPriceByRentKind(1,dbo.F_GetGuestRoomProduct(A.nHotelId,A.nId),A.nRentKindId,1),0.00) AS nPrice, 
       isnull(dbo.F_GetGuestRoomAllPrice(A.nHotelId,A.nId),0.00) AS nTotalPrice,
       isnull(dbo.F_GetConsumeTolValue_NoCash(A.nId, 2, A.nHotelId),0.00) AS AccountEnd, 
       isnull(dbo.F_GetPrecashTolValue(A.nId, 2, A.nHotelId),0.00) AS AccountPrecash,
       num=1
 From C_NGuest H LEFT OUTER JOIN 
      C_Guest AS A ON A.nId=H.nGuestId LEFT OUTER JOIN
      B_Room AS B ON B.nId = A.nRoomId LEFT OUTER JOIN
      B_GuestKind AS C ON C.nId = A.nGuestKindId LEFT OUTER JOIN
      B_RoomKind AS D ON D.nId = B.nRoomKindId LEFT OUTER JOIN
      B_RentKind AS E ON E.nId = A.nRentKindId LEFT OUTER JOIN
      B_MarkCode AS F ON F.nId = E.nMarkCodeId LEFT OUTER JOIN
      C_Bill AS G ON G.nId = A.nBillId
Where H.nHotelId=@nHotelId
      and H.nNightCheckListId=@NightCheckListId
      and (G.bIsTeam in (@Team) or 2=@Team)
      and B.nAreaId in(@Area)
      and C.nId in (@VIP)
      and D.nId in (@RoomKind)
Order BY cRoomCode

三、布局

房态查询表
   =First(Fields!cName.Value, "Title")
   ="历史在店"+Parameters!Team.Label+"一览表"
   =Parameters!NightCheckListId .Label
   ="打印时间:"+Now
  1. 插入一行
    团代码
    VIP
    房型
    房号
    姓名
    合约公司
    抵店日期
    离店日期
    人数
    小孩数
    市场代码
    合约类型
    合约价
    纯房租
    房价
    客帐余额

2. 插入一行
    =Fields!cTeamCode.Value
    =Fields!cGuestKindName.Value
    =Fields!cRoomKindCode.Value
    =Fields!cRoomCode.Value
    =Fields!cGuestName.Value
    =Fields!cPactCompany.Value
    =FormatDateTime(Fields!dArrivedTime.Value,2)
    =FormatDateTime(Fields!dLeftTime.Value,2)
    =Fields!nGuestCount.Value
    =Fields!nKidCount.Value
    =Fields!cMarkCode.Value
    =Fields!cRateCode.Value
    =Fields!nPrice.Value
    =Fields!RoomRate.Value
    =Fields!nTotalPrice.Value
    =Fields!AccountEnd.Value-Fields!AccountPrecash.Value

3. 总计
  =Sum(Fields!num.Value)
  =Sum(Fields!nGuestCount.Value)
  =Sum(Fields!nKidCount.Value)
  =Sum(Fields!nPrice.Value)
  =Sum(Fields!RoomRate.Value)
  =Sum(Fields!nTotalPrice.Value)
  =Sum(Fields!AccountEnd.Value)-Sum(Fields!AccountPrecash.Value)

4 页脚

="页:"+Format(Globals!PageNumber)+"/"+Format(Globals!TotalPages)

四、函数

转载于:https://www.cnblogs.com/callbin/archive/2010/02/01/1661206.html

历史客人-报表记录信息相关推荐

  1. 修改git历史提交的commit信息

    本文是基于idea的操作,亲测可用 前言: 很多公司都会自定义 Git - 使用强制策略,那么他的commit信息就会有固定的格式,一旦不是这个格式,就会出现push失败 但是push失败,很多也只在 ...

  2. cookie记录了服务器相关的信息,使用cookie记录信息(精选).ppt

    文档介绍: 第6章使用cookie记录信息 1 6.1.1 什么是cookie 什么是Cookies("小甜饼") Cookies就是服务器暂存放在你的电脑里的资料(.txt格式的 ...

  3. mysql分组并查询最新记录信息(亲测有效)

    场景描述:APP提供用户留存信息入口,后台运营人员会对留存的用户信息进行多次回访记录,现查询出所有的用户留存信息,每条留存信息中关联查询最新的一条回访记录信息.     表结构:     user_a ...

  4. 怎么查看html页面,网页浏览记录如何查看_怎样查历史网页浏览记录-win7之家

    大家都喜欢通过浏览器来浏览一些网页,当我们浏览或者查阅网页的HIA,都会留下历史记录,这样就可以方便我们通过查看自己的网页浏览历史记录来查找了,那么网页浏览记录如何查看呢?针对这个问题,本文给大家讲解 ...

  5. 电子计算机储存五次信息革命,人类历史上五次信息革命

    人类历史上五次信息革命 (2012-12-04 16:37:40) 标签: 手机博客 杂谈 第一次信息技术革命是语言的创造,发生在猿向人转变的时期.人类创造了语言,获得了人类特有的交流信息的物质手段和 ...

  6. 昆仑通态(MCGS)样板程序,包含历史实时报表查询导出、画面动画风扇转动

    昆仑通态(MCGS)样板程序,包含历史实时报表查询导出.画面动画风扇转动.历史实时报警查询导出.U盘导出.各种通信样板程序.工程上应用样板程序(污水厂.泵站.增压站.锅炉.产线.搅拌站).各种触摸屏独 ...

  7. linux服务器查看历史,Linux服务器记录并查询历史操作记录

    Linux服务器在使用过程中,经常会有除自己之外的其他人员使用.并不是每个人都对Linux服务器特别熟悉,难免会有一些操作导致服务器报错. 因此,监控Linux服务器的操作并记录下来,是非常有必要的! ...

  8. Kafka实战 - 06 Kafka消费者:从指定Topic拉取工单处置记录信息并存入MongoDB数据库

    文章目录 1. 处置记录表 t_disposal_record 2. kafka 主题和消费者配置 3. 定义一个线程任务 KafkaTask 1. kafka Topic中的数据:KafkaDisp ...

  9. Excel如何从记录信息里批量提取出QQ号码

    今天我和大家分享的是:Excel如何从记录信息里批量提取出QQ号码,详见下面的动图演示. 从某个群里面,我们获得了QQ号和昵称的字段,那现在我们只想要QQ号,以便于我们添加好友,怎么提取出来呢 (方方 ...

最新文章

  1. openstack学习笔记五 多节点部署之 rabbitmq信息中枢与元数据
  2. 网站搭建 (第09天) 博客统计排行
  3. 北航算法作业一 约瑟夫环问题
  4. 重写CListCtrl滚动条,遇到的问题。
  5. java 网络传输中发送byte[]和接收到的不一致_为什么JAVA对象需要实现序列化?
  6. 技术、管理和技术管理
  7. Django中的F对象和Q对象
  8. 基于阿里云物联网平台,我们这样实现简易出入监控
  9. Zookeeper架构及FastLeaderElection机制
  10. Android6.0内核移植(1):分析编译日志
  11. 循环控制-链表删除结点
  12. 嵌入式ARM(Allwinner H3)下使用rtl8188eus无线网卡
  13. oracle 11g varchar/varchar2
  14. IDEA jsp页面代码没有高亮
  15. BackTrack5(BT5)硬盘安装完美教程
  16. 一个疫情期间的实习生经历
  17. [转载] 2019年目标分类、目标检测、图像分割、弱监督的综述文章
  18. Uiuc计算机博士面试时间,学霸分享:UIUC生物博士onsite面试经验
  19. java打印输出万年历_用Java编程输出万年历的功能实现
  20. linux 杂记 怎么解决 cuda 10.1 跑 cuda8下的代码 error

热门文章

  1. 目前对Learning to Rank 最全面的总结
  2. 水木-机器学习推荐论文和书籍
  3. Codeforces 1344F Piet's Palette (线性代数、高斯消元)
  4. BZOJ 5267 特工 (类FWT)
  5. python多项分式求和计算_python实现利用留数定理分解分式多项式
  6. mssql 为什么连接是sleeping 而不释放_什么是数据仓库,以及我为什么需要它?
  7. 台式电脑如何设置开机密码_网络安全小黑板|如何设置开机密码
  8. 控件与组件的区别_5分钟学交互:手机交互组件归纳 导航篇
  9. 当前记录集不支持更新_微信现已正式支持修改微信号!微信7.0.16内测版更新(附下载)...
  10. EJS学习(二)之语法规则上