/beta/accounting/TOP.ASP
http://github.com/khaneh/Orders · ASP · 129 lines · 118 code · 9 blank · 2 comment · 18 complexity · 723b015410656788ce9ec0473b6b2bd9 MD5 · raw file
- <%
- 'Accounting (8)
- PageTitle= " - " +PageTitle
- menuItem=8
- 'response.write session("IsClosed")
- %>
- <!--#include file="../menu.asp" -->
- <TABLE cellspacing=0 cellpadding=0 width=100% height=450 style='border:4px solid <%=SelectedMenuColor%>;' dir=rtl align=center>
- <TR height=20 bgcolor=<%=SelectedMenuColor%>>
- <TD>
- <TABLE cellspacing=0 cellpadding=0 width=100%>
- <TR class=alak height=25>
-
- <%if Auth(8 , 1) and session("IsClosed")="False" then %>
- <%if SubmenuItem="1" then %>
- <TD width=10><img src='/images/RTB.gif'></td>
- <TD align=center background="/images/MTB.gif" class='alak2'><A HREF='GLMemoInput.asp'> </A></TD>
- <TD width=10><img src='/images/LTB.gif'></td>
- <%else %>
- <TD width=10><img src='/images/RTS.gif'></td>
- <TD align=center background="/images/MTS.gif" class='alak'><A HREF='GLMemoInput.asp'> </A></TD>
- <TD width=10><img src='/images/LTS.gif'></td>
- <%end if %>
- <%end if %>
-
- <%if Auth(8 , "F") and session("IsClosed")="False" then %>
- <%if SubmenuItem="2" then %>
- <TD width=10><img src='/images/RTB.gif'></td>
- <TD align=center background="/images/MTB.gif" class='alak2'><A HREF='CompMemoInput.asp'> </A></TD>
- <TD width=10><img src='/images/LTB.gif'></td>
- <%else %>
- <TD width=10><img src='/images/RTS.gif'></td>
- <TD align=center background="/images/MTS.gif" class='alak'><A HREF='CompMemoInput.asp'> </A></TD>
- <TD width=10><img src='/images/LTS.gif'></td>
- <%end if %>
- <%end if %>
-
- <%if Auth(8 , 3) then %>
- <%if SubmenuItem="3" then %>
- <TD width=10><img src='/images/RTB.gif'></td>
- <TD align=center background="/images/MTB.gif" class='alak2'><A HREF='GLMemoDocShow.asp'> </A></TD>
- <TD width=10><img src='/images/LTB.gif'></td>
- <%else %>
- <TD width=10><img src='/images/RTS.gif'></td>
- <TD align=center background="/images/MTS.gif" class='alak'><A HREF='GLMemoDocShow.asp'> </A></TD>
- <TD width=10><img src='/images/LTS.gif'></td>
- <%end if %>
- <%end if %>
-
- <%if Auth(8 , 4) then %>
- <%if SubmenuItem="4" then %>
- <TD width=10><img src='/images/RTB.gif'></td>
- <TD align=center background="/images/MTB.gif" class='alak2'><A HREF='AccountInfo.asp'> </A></TD>
- <TD width=10><img src='/images/LTB.gif'></td>
- <%else %>
- <TD width=10><img src='/images/RTS.gif'></td>
- <TD align=center background="/images/MTS.gif" class='alak'><A HREF='AccountInfo.asp'> </A></TD>
- <TD width=10><img src='/images/LTS.gif'></td>
- <%end if %>
- <%end if %>
-
- <%if Auth(8 , "A") then %>
- <%if SubmenuItem="5" then %>
- <TD width=10><img src='/images/RTB.gif'></td>
- <TD align=center background="/images/MTB.gif" class='alak2'><A HREF='moeen.asp'> </A></TD>
- <TD width=10><img src='/images/LTB.gif'></td>
- <%else %>
- <TD width=10><img src='/images/RTS.gif'></td>
- <TD align=center background="/images/MTS.gif" class='alak'><A HREF='moeen.asp'> </A></TD>
- <TD width=10><img src='/images/LTS.gif'></td>
- <%end if %>
- <%end if %>
-
- <%if Auth(8 , "B") then %>
- <%if SubmenuItem="6" then %>
- <TD width=10><img src='/images/RTB.gif'></td>
- <TD align=center background="/images/MTB.gif" class='alak2'><A HREF='tafsili.asp'> </A></TD>
- <TD width=10><img src='/images/LTB.gif'></td>
- <%else %>
- <TD width=10><img src='/images/RTS.gif'></td>
- <TD align=center background="/images/MTS.gif" class='alak'><A HREF='tafsili.asp'> </A></TD>
- <TD width=10><img src='/images/LTS.gif'></td>
- <%end if %>
- <%end if %>
-
- <%if Auth(8 , "C") then %>
- <%if SubmenuItem="9" then %>
- <TD width=10><img src='/images/RTB.gif'></td>
- <TD align=center background="/images/MTB.gif" class='alak2'><A HREF='MakeDoc.asp' style="font-size:8pt;"> </A></TD>
- <TD width=10><img src='/images/LTB.gif'></td>
- <%else %>
- <TD width=10><img src='/images/RTS.gif'></td>
- <TD align=center background="/images/MTS.gif" class='alak'><A HREF='MakeDoc.asp' style="font-size:8pt;"> </A></TD>
- <TD width=10><img src='/images/LTS.gif'></td>
- <%end if %>
- <%end if %>
-
- <%if Auth(8 , "E") then %>
- <%if SubmenuItem="10" then %>
- <TD width=10><img src='/images/RTB.gif'></td>
- <TD align=center background="/images/MTB.gif" class='alak2'><A HREF='OtherReports.asp' style="font-size:8pt;"> </A></TD>
- <TD width=10><img src='/images/LTB.gif'></td>
- <%else %>
- <TD width=10><img src='/images/RTS.gif'></td>
- <TD align=center background="/images/MTS.gif" class='alak'><A HREF='OtherReports.asp' style="font-size:8pt;"> </A></TD>
- <TD width=10><img src='/images/LTS.gif'></td>
- <%end if %>
- <%end if %>
-
- <TD width=40 align=left bgcolor=<%=SelectedMenuColor%>></TD>
- <TD align=left bgcolor=<%=unSelectedSubMenuColor%>><A HREF="../logout.asp"> </A></TD>
- </TR>
- </TABLE>
- </TD>
- </TR>
- <TR>
- <TD colspan=2 valign=top bgcolor=<%=AppFgColor%>>
- <%
- if request.queryString("errmsg")<>"" then
- response.write "<br>"
- call showAlert (request.queryString("errmsg"),CONST_MSG_ERROR)
- response.write "<br>"
- end if
- if request.queryString("msg")<>"" then
- response.write "<br>"
- call showAlert (request.queryString("msg"),CONST_MSG_INFORM)
- response.write "<br>"
- end if
- %>