[Main]
dbuse(true)
initparam(printMode,reportId,dt_from,dt_to,uri_no,tokui_cd,syohin_nm)
deforgpage(blank)
defheadarea(hed)
defbodyarea(mei)
subroutine(SelectRecords)
loop(PrintNormal,@rs1,Key1,Key2)
printreport($printMode,true)

#-------------------------------------------------
#  SQL���s
#-------------------------------------------------
[SelectRecords]
new($param)
#addparam($param,$sort)
addparam($param,$dt_from)
addparam($param,$dt_to)
addparam($param,$uri_no)
addparam($param,$tokui_cd)
addparam($param,$syohin_nm)
dbselect(SelectRecords,@rs1,$param)

#-------------------------------------------------
#  ���y�[�W����
#-------------------------------------------------
[page_flg]
#���y�[�W�}��
HPAGEBREAK($_row)

#-------------------------------------------------
#  ���y�[�W����
#-------------------------------------------------
[PageBreak]
#�Q�T�s���Ƃɉ��y�[�W
div($row_no,30,$kekka,$amari)
#���׍s���Q�T�s�Ȃ���y�[�W
case($page_flg,$amari,0,1,0)
#���y�[�W����
iterate(page_flg,$page_flg)


#-------------------------------------------------
#  Key1�ݒ胋�[�`��
#-------------------------------------------------
[KeyInfo_key1]
keyvalue(dummy)
keybreakproc(GroupBegin_key1,GroupEnd_key1)

#-------------------------------------------------
#  Key1�J�n��
#-------------------------------------------------
[GroupBegin_key1]
deforgpage(blank)
#Import���邩�ǂ���,FormatNormal���邩�ǂ���
pageopen(true,false)
deforgpage(formats)
resetorg()
#-------------------------------------------------
#  Key1�I����
#-------------------------------------------------
[GroupEnd_key1]
#FormatNormal���邩�ǂ���
#setdouble($con,0)
#putcell(16,22,@rs1.uri_row)
pageclose(false)


#-------------------------------------------------
#  Key2�ݒ胋�[�`��
#-------------------------------------------------
[KeyInfo_key2]
keyvalue(@rs1.row_page)
keybreakproc(GroupBegin_key2,GroupEnd_key2)

#-------------------------------------------------
#  Key2�J�n��
#-------------------------------------------------
[GroupBegin_key2]
#-------------------------------------------------
#  Key2�I����
#-------------------------------------------------
[GroupEnd_key2]
HPAGEBREAK($_row)

#-------------------------------------------------
#  ���ו\������
#-------------------------------------------------
[PrintNormal]
#subroutine(PageBreak)
formatspecialrow($_row,0,1,5)

#formatspecialrow($_row,0,1,1)
putline(,,,,@rs1.uriage#,,,@rs1.keihi1#,@rs1.keihi2#,@rs1.keihi3#,@rs1.keihi4#,@rs1.keihi5#,@rs1.keihi6#,@rs1.keihi7#,@rs1.keihi8#,@rs1.keihi9#,@rs1.keihi10#,@rs1.keihi11#,@rs1.keihi12#,,@rs1.keihi_kei#)
#formatspecialrow($_row,0,2,1)
putline(�x�����׏�#,@rs1.output_ymd#,@rs1.haiso_tan_nm#,,����#,%�T��#,�����v�@#,@rs1.hin_nm1#,@rs1.hin_nm2#,@rs1.hin_nm3#,@rs1.hin_nm4#,@rs1.hin_nm5#,@rs1.hin_nm6#,@rs1.hin_nm7#,@rs1.hin_nm8#,@rs1.hin_nm9#,@rs1.hin_nm10#,@rs1.hin_nm11#,@rs1.hin_nm12#,,�T�����v�@#,�������v�@#,���^�ݒ�z#,�����̍��v�@#,�O���J�z#,�����J�z�@#,�ۋ��^�A�J���������#)
#formatspecialrow($_row,0,3,1)
putline(,,,,)
#formatspecialrow($_row,0,4,1)
putline(,,,,�x���z#,,,,�T���z#)
putline(,)