inherited frmOrders: TfrmOrders Left = 261 Top = 155 Width = 774 Height = 579 HelpContext = 4000 Caption = 'Orders Page' HelpFile = 'overvw' Menu = mnuOrders OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 inherited shpPageBottom: TShape Top = 520 Width = 766 end inherited sptHorz: TSplitter Left = 117 Height = 520 OnMoved = sptHorzMoved end inherited pnlLeft: TPanel Width = 117 Height = 520 object OROffsetLabel1: TOROffsetLabel Left = 0 Top = 0 Width = 117 Height = 19 Align = alTop Caption = 'View Orders' HorzOffset = 2 Transparent = False VertOffset = 6 WordWrap = False end object lblWrite: TLabel Left = 0 Top = 97 Width = 117 Height = 19 Align = alTop AutoSize = False Caption = 'Write Orders' ParentShowHint = False ShowHint = True Layout = tlBottom OnMouseMove = lblWriteMouseMove end object sptVert: TSplitter Left = 0 Top = 75 Width = 117 Height = 4 Cursor = crVSplit Align = alTop end object lstSheets: TORListBox Left = 0 Top = 19 Width = 117 Height = 56 Align = alTop ItemHeight = 13 ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = lstSheetsClick Caption = 'View Orders' ItemTipColor = clWindow LongList = False Pieces = '2' end object lstWrite: TORListBox Left = 0 Top = 116 Width = 117 Height = 404 Align = alClient ItemHeight = 13 ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = lstWriteClick Caption = 'Write Orders' ItemTipColor = clWindow LongList = False Pieces = '2' end object btnDelayedOrder: TORAlignButton Left = 0 Top = 79 Width = 117 Height = 18 Caption = 'Write Delayed Orders' TabOrder = 1 OnClick = btnDelayedOrderClick Align = alTop Alignment = taLeftJustify end end inherited pnlRight: TPanel Left = 121 Width = 645 Height = 520 ParentColor = True ParentCtl3D = False ParentFont = False OnResize = pnlRightResize object lblOrders: TOROffsetLabel Left = 0 Top = 0 Width = 645 Height = 19 Align = alTop Caption = 'Active Orders' HorzOffset = 2 Transparent = False VertOffset = 6 WordWrap = False end object imgHide: TImage Left = 520 Top = 0 Width = 16 Height = 16 Hint = 'All Active Orders not Visible' AutoSize = True ParentShowHint = False Picture.Data = { 07544269746D6170F6000000424DF60000000000000076000000280000001000 0000100000000100040000000000800000000000000000000000100000001000 0000000000000000800000800000008080008000000080008000808000008080 8000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF FF003333000000000EEE33330FF00FBFB0EE33330F0BFB0BFB0E33330FF000BF BFB033330FFF0BFBFBF033300000BF0FBFB0000FBFB0F0FB0BF0E0FB00000000 BF00E0BFBFBFBFB0F0F0E0FBFB0000000FF0E0BFBFBFBFB0FFF0E0FBFB00000F 0000E00FBFBFB0FF0FF0003000000FFF0F0333330FFFFFFF0033333300000000 0333} ShowHint = True Transparent = True end object hdrOrders: THeaderControl Left = 0 Top = 19 Width = 645 Height = 17 Sections = < item ImageIndex = -1 Width = 0 end item ImageIndex = -1 MinWidth = 16 Text = 'Service' Width = 50 end item ImageIndex = -1 MinWidth = 20 Text = 'Order' Width = 210 end item ImageIndex = -1 MinWidth = 16 Text = 'Start / Stop' Width = 100 end item ImageIndex = -1 MinWidth = 16 Text = 'Provider' Width = 60 end item ImageIndex = -1 MinWidth = 16 Text = 'Nurse' Width = 40 end item ImageIndex = -1 MinWidth = 16 Text = 'Clerk' Width = 35 end item ImageIndex = -1 MinWidth = 16 Text = 'Chart' Width = 35 end item ImageIndex = -1 MinWidth = 16 Text = 'Status' Width = 50 end item ImageIndex = -1 MinWidth = 25 Text = 'Location' Width = 40 end> OnSectionClick = hdrOrdersSectionClick OnSectionResize = hdrOrdersSectionResize OnMouseDown = hdrOrdersMouseDown OnMouseUp = hdrOrdersMouseUp end object lstOrders: TCaptionListBox Left = 0 Top = 36 Width = 645 Height = 484 Style = lbOwnerDrawVariable Align = alClient Color = clCream Ctl3D = False ItemHeight = 32 MultiSelect = True ParentCtl3D = False PopupMenu = popOrder TabOrder = 1 OnDblClick = lstOrdersDblClick OnDrawItem = lstOrdersDrawItem OnMeasureItem = lstOrdersMeasureItem RightClickSelect = True Caption = 'Active Orders' end end inherited DKLanguageController1: TDKLanguageController LangData = { 090066726D4F7264657273010200000001000000070043617074696F6E020000 00080048656C7046696C65015C0000000D0073687050616765426F74746F6D00 000700737074486F727A00000700706E6C4C65667400000800706E6C52696768 7400000E004F524F66667365744C6162656C3101010000000300000007004361 7074696F6E0008006C626C577269746501010000000400000007004361707469 6F6E00070073707456657274000009006C737453686565747301010000000500 0000070043617074696F6E0008006C7374577269746501010000000600000007 0043617074696F6E000F0062746E44656C617965644F72646572010100000007 000000070043617074696F6E0009006C626C4F72646572730101000000080000 00070043617074696F6E000700696D6748696465010100000009000000040048 696E740009006864724F726465727301090000000A000000100053656374696F 6E735B315D2E546578740B000000100053656374696F6E735B325D2E54657874 0C000000100053656374696F6E735B335D2E546578740D000000100053656374 696F6E735B345D2E546578740E000000100053656374696F6E735B355D2E5465 78740F000000100053656374696F6E735B365D2E546578741000000010005365 6374696F6E735B375D2E5465787411000000100053656374696F6E735B385D2E 5465787412000000100053656374696F6E735B395D2E546578740009006C7374 4F7264657273010100000013000000070043617074696F6E0009006D6E754F72 64657273000007006D6E7556696577010100000014000000070043617074696F 6E000C006D6E7556696577436861727401010000001500000007004361707469 6F6E000D006D6E754368617274436F7665720101000000160000000700436170 74696F6E000D006D6E75436861727450726F6273010100000017000000070043 617074696F6E000C006D6E7543686172744D6564730101000000180000000700 43617074696F6E000E006D6E7543686172744F72646572730101000000190000 00070043617074696F6E000D006D6E7543686172744E6F74657301010000001A 000000070043617074696F6E000D006D6E75436861727443736C747301010000 001B000000070043617074696F6E000F006D6E75436861727453757267657279 01010000001C000000070043617074696F6E000E006D6E754368617274444353 756D6D01010000001D000000070043617074696F6E000C006D6E754368617274 4C61627301010000001E000000070043617074696F6E000F006D6E7543686172 745265706F72747301010000001F000000070043617074696F6E0012006D6E75 56696577496E666F726D6174696F6E010100000020000000070043617074696F 6E000B006D6E755669657744656D6F010100000021000000070043617074696F 6E000D006D6E7556696577566973697473010100000022000000070043617074 696F6E0012006D6E75566965775072696D617279436172650101000000230000 00070043617074696F6E0013006D6E75566965774D794865616C746865566574 010100000024000000070043617074696F6E000C006D6E75496E737572616E63 65010100000025000000070043617074696F6E000C006D6E7556696577466C61 6773010100000026000000070043617074696F6E0011006D6E75566965775265 6D6F746544617461010100000027000000070043617074696F6E0010006D6E75 5669657752656D696E64657273010100000028000000070043617074696F6E00 0F006D6E7556696577506F7374696E6773010100000029000000070043617074 696F6E0002005A3100000D006D6E755669657741637469766501010000002A00 0000070043617074696F6E000E006D6E755669657743757272656E7401010000 002B000000070043617074696F6E0014004576656E745265616C65617365644F 726465723101010000002C000000070043617074696F6E000F006D6E75566965 774578706972696E6701010000002D000000070043617074696F6E000F006D6E 7556696577556E7369676E656401010000002E000000070043617074696F6E00 0E006D6E75566965774578706972656401010000002F00000007004361707469 6F6E0002005A3200000D006D6E7556696577437573746F6D0101000000300000 00070043617074696F6E0002005A3600000F006D6E755669657744666C745361 7665010100000031000000070043617074696F6E000F006D6E75566965774466 6C7453686F77010100000032000000070043617074696F6E0002005A3300000D 006D6E755669657744657461696C010100000033000000070043617074696F6E 000D006D6E7556696577526573756C7401010000003400000007004361707469 6F6E0015006D6E7556696577526573756C7473486973746F7279010100000035 000000070043617074696F6E0006006D6E754163740101000000360000000700 43617074696F6E000C006D6E754163744368616E676501010000003700000007 0043617074696F6E000A006D6E75416374436F70790101000000380000000700 43617074696F6E0008006D6E7541637444430101000000390000000700436170 74696F6E0009006D6E7541637452656C01010000003A00000007004361707469 6F6E000D006D6E7541637443686745766E7401010000003B0000000700436170 74696F6E000A006D6E75416374486F6C6401010000003C000000070043617074 696F6E000C006D6E75416374556E686F6C6401010000003D0000000700436170 74696F6E000B006D6E7541637452656E657701010000003E0000000700436170 74696F6E0002005A3400000B006D6E75416374416C65727401010000003F0000 00070043617074696F6E000E006D6E75416374436F6D706C6574650101000000 40000000070043617074696F6E000A006D6E75416374466C6167010100000041 000000070043617074696F6E000C006D6E75416374556E666C61670101000000 42000000070043617074696F6E000C006D6E7541637456657269667901010000 0043000000070043617074696F6E000E006D6E75416374436861727452657601 0100000044000000070043617074696F6E0002005A3500000D006D6E75416374 52656C65617365010100000045000000070043617074696F6E000D006D6E7541 63744F6E4368617274010100000046000000070043617074696F6E000A006D6E 754163745369676E010100000047000000070043617074696F6E0006006D6E75 4F7074010100000048000000070043617074696F6E000F006D6E754F70745361 7665517569636B010100000049000000070043617074696F6E0010006D6E754F 707445646974436F6D6D6F6E01010000004A000000070043617074696F6E0008 00706F704F7264657200000E00706F704F7264657244657461696C0101000000 4B000000070043617074696F6E000E00706F704F72646572526573756C740101 0000004C000000070043617074696F6E001100706F70526573756C7473486973 746F727901010000004D000000070043617074696F6E0002004E3100000E0070 6F704F726465724368616E676501010000004E000000070043617074696F6E00 0B00706F704F7264657252656C01010000004F000000070043617074696F6E00 0A006D6E7543686745766E74010100000050000000070043617074696F6E000C 00706F704F72646572436F7079010100000051000000070043617074696F6E00 0A00706F704F726465724443010100000052000000070043617074696F6E000D 00706F704F7264657252656E6577010100000053000000070043617074696F6E 000E007365704F7264657256657269667900000E00706F704F72646572566572 696679010100000054000000070043617074696F6E001000706F704F72646572 4368617274526576010100000055000000070043617074696F6E000C00706F70 4F726465725369676E010100000056000000070043617074696F6E0011006D6E 754F7074696D697A654669656C6473010100000057000000070043617074696F 6E00} end object mnuOrders: TMainMenu Left = 136 Top = 60 object mnuView: TMenuItem Caption = '&View' GroupIndex = 3 OnClick = mnuViewClick object mnuViewChart: TMenuItem Caption = 'Chart &Tab' object mnuChartCover: TMenuItem Tag = 1 Caption = 'Cover &Sheet' ShortCut = 16467 OnClick = mnuChartTabClick end object mnuChartProbs: TMenuItem Tag = 2 Caption = '&Problem List' ShortCut = 16464 OnClick = mnuChartTabClick end object mnuChartMeds: TMenuItem Tag = 3 Caption = '&Medications' ShortCut = 16461 OnClick = mnuChartTabClick end object mnuChartOrders: TMenuItem Tag = 4 Caption = '&Orders' ShortCut = 16463 OnClick = mnuChartTabClick end object mnuChartNotes: TMenuItem Tag = 6 Caption = 'Progress &Notes' ShortCut = 16462 OnClick = mnuChartTabClick end object mnuChartCslts: TMenuItem Tag = 7 Caption = 'Consul&ts' ShortCut = 16468 OnClick = mnuChartTabClick end object mnuChartSurgery: TMenuItem Tag = 11 Caption = 'S&urgery' ShortCut = 16469 OnClick = mnuChartTabClick end object mnuChartDCSumm: TMenuItem Tag = 8 Caption = '&Discharge Summaries' ShortCut = 16452 OnClick = mnuChartTabClick end object mnuChartLabs: TMenuItem Tag = 9 Caption = '&Laboratory' ShortCut = 16460 OnClick = mnuChartTabClick end object mnuChartReports: TMenuItem Tag = 10 Caption = '&Reports' ShortCut = 16466 OnClick = mnuChartTabClick end end object mnuViewInformation: TMenuItem Caption = 'Information' OnClick = mnuViewInformationClick object mnuViewDemo: TMenuItem Tag = 1 Caption = 'De&mographics...' OnClick = ViewInfo end object mnuViewVisits: TMenuItem Tag = 2 Caption = 'Visits/Pr&ovider...' OnClick = ViewInfo end object mnuViewPrimaryCare: TMenuItem Tag = 3 Caption = 'Primary &Care...' OnClick = ViewInfo end object mnuViewMyHealtheVet: TMenuItem Tag = 4 Caption = 'MyHealthe&Vet...' OnClick = ViewInfo end object mnuInsurance: TMenuItem Tag = 5 Caption = '&Insurance...' OnClick = ViewInfo end object mnuViewFlags: TMenuItem Tag = 6 Caption = '&Flags...' OnClick = ViewInfo end object mnuViewRemoteData: TMenuItem Tag = 7 Caption = 'Remote &Data...' OnClick = ViewInfo end object mnuViewReminders: TMenuItem Tag = 8 Caption = '&Reminders...' Enabled = False OnClick = ViewInfo end object mnuViewPostings: TMenuItem Tag = 9 Caption = '&Postings...' OnClick = ViewInfo end end object Z1: TMenuItem Caption = '-' end object mnuViewActive: TMenuItem Caption = '&Active Orders (includes pending, recent activity)' OnClick = mnuViewActiveClick end object mnuViewCurrent: TMenuItem Caption = 'Current &Orders (active/pending status only)' OnClick = mnuViewCurrentClick end object EventRealeasedOrder1: TMenuItem Caption = 'Auto DC/Release Event Orders' OnClick = EventRealeasedOrder1Click end object mnuViewExpiring: TMenuItem Caption = '&Expiring Orders' OnClick = mnuViewExpiringClick end object mnuViewUnsigned: TMenuItem Caption = '&Unsigned Orders' OnClick = mnuViewUnsignedClick end object mnuViewExpired: TMenuItem Caption = '&Recently Expired Orders' OnClick = mnuViewExpiredClick end object Z2: TMenuItem Caption = '-' end object mnuViewCustom: TMenuItem Caption = '&Custom Order View...' OnClick = mnuViewCustomClick end object Z6: TMenuItem Caption = '-' end object mnuViewDfltSave: TMenuItem Caption = '&Save as Default View...' OnClick = mnuViewDfltSaveClick end object mnuViewDfltShow: TMenuItem Caption = '&Return to Default View' OnClick = mnuViewDfltShowClick end object Z3: TMenuItem Caption = '-' end object mnuViewDetail: TMenuItem Caption = '&Details...' OnClick = mnuViewDetailClick end object mnuViewResult: TMenuItem Caption = '&Results...' OnClick = mnuViewResultClick end object mnuViewResultsHistory: TMenuItem Caption = 'Results History...' OnClick = mnuViewResultsHistoryClick end end object mnuAct: TMenuItem Caption = '&Action' GroupIndex = 4 OnClick = mnuActClick object mnuActChange: TMenuItem Caption = '&Change...' OnClick = mnuActChangeClick end object mnuActCopy: TMenuItem Caption = 'Copy to &New Order...' OnClick = mnuActCopyClick end object mnuActDC: TMenuItem Caption = '&Discontinue / Cancel...' OnClick = mnuActDCClick end object mnuActRel: TMenuItem Caption = 'Release Delayed Orders' Visible = False OnClick = mnuActRelClick end object mnuActChgEvnt: TMenuItem Caption = 'Change Release Event' OnClick = mnuActChgEvntClick end object mnuActHold: TMenuItem Caption = '&Hold...' OnClick = mnuActHoldClick end object mnuActUnhold: TMenuItem Caption = 'Re&lease Hold...' OnClick = mnuActUnholdClick end object mnuActRenew: TMenuItem Caption = 'Rene&w...' OnClick = mnuActRenewClick end object Z4: TMenuItem Caption = '-' end object mnuActAlert: TMenuItem Caption = '&Alert when Results...' OnClick = mnuActAlertClick end object mnuActComplete: TMenuItem Caption = 'Co&mplete...' OnClick = mnuActCompleteClick end object mnuActFlag: TMenuItem Caption = '&Flag...' OnClick = mnuActFlagClick end object mnuActUnflag: TMenuItem Caption = '&Unflag...' OnClick = mnuActUnflagClick end object mnuActVerify: TMenuItem Caption = '&Verify...' OnClick = mnuActVerifyClick end object mnuActChartRev: TMenuItem Caption = 'Char&t Review...' OnClick = mnuActChartRevClick end object Z5: TMenuItem Caption = '-' end object mnuActRelease: TMenuItem Caption = 'R&elease without MD Signature...' OnClick = mnuActReleaseClick end object mnuActOnChart: TMenuItem Caption = 'Signature &On Chart...' OnClick = mnuActOnChartClick end object mnuActSign: TMenuItem Caption = 'Si&gn Selected...' OnClick = mnuActSignClick end end object mnuOpt: TMenuItem Caption = '&Options' GroupIndex = 5 OnClick = mnuOptClick object mnuOptSaveQuick: TMenuItem Caption = '&Save as Quick Order...' OnClick = mnuOptSaveQuickClick end object mnuOptEditCommon: TMenuItem Caption = '&Edit Common List...' OnClick = mnuOptEditCommonClick end end end object popOrder: TPopupMenu OnPopup = popOrderPopup Left = 445 Top = 300 object popOrderDetail: TMenuItem Caption = 'Detai&ls...' OnClick = mnuViewDetailClick end object popOrderResult: TMenuItem Caption = '&Results...' OnClick = mnuViewResultClick end object popResultsHistory: TMenuItem Caption = 'Results History...' OnClick = mnuViewResultsHistoryClick end object N1: TMenuItem Caption = '-' end object popOrderChange: TMenuItem Tag = 1 Caption = '&Change...' OnClick = mnuActChangeClick end object popOrderRel: TMenuItem Caption = 'Release Delayed Orders' Visible = False OnClick = mnuActRelClick end object mnuChgEvnt: TMenuItem Caption = 'Change Release Event' OnClick = mnuActChgEvntClick end object popOrderCopy: TMenuItem Tag = 1 Caption = 'Copy to &New Order...' OnClick = mnuActCopyClick end object popOrderDC: TMenuItem Tag = 1 Caption = '&Discontinue...' OnClick = mnuActDCClick end object popOrderRenew: TMenuItem Tag = 1 Caption = 'Rene&w...' OnClick = mnuActRenewClick end object sepOrderVerify: TMenuItem Caption = '-' end object popOrderVerify: TMenuItem Tag = 2 Caption = '&Verify...' OnClick = mnuActVerifyClick end object popOrderChartRev: TMenuItem Tag = 2 Caption = 'Char&t Review' OnClick = mnuActChartRevClick end object popOrderSign: TMenuItem Tag = 1 Caption = '&Sign...' OnClick = mnuActSignClick end object mnuOptimizeFields: TMenuItem Caption = 'Adjust Column Size' Visible = False OnClick = mnuOptimizeFieldsClick end end end