in the case of STRICT VERBATIM accounts

• Numbers at beginning of sentence - a style questions (sm)
  • The rules for Op notes are a little different. You may begin a....sm - VTMT
  • Thanks for the input everyone (nm) - OP
  • Two points - Snow Bunny
    • why do you substitute mL for cc? - I've not heard that one
      • Link enclosed - Not OP
        • Thanks for this great link! - I printed this chart out! NM
    • Yes, I understand both of those - but
      • I absolutely agree with you. You've made it grammatically correct - while not altering the meaning of the sentence.
      • my suggestion - Snow Bunny
        • in the case of STRICT VERBATIM accounts - well and good, BUT
          • gee, I've been doing this nearly 27 years - Snow Bunny
    • two points - anon
      • depends upon the sentence - Snow Bunny

The messages you are viewing are archived/old.
To view latest messages and participate in discussions, select the boards given in left menu

I know they have to be to be competative, one of the reasons I took the job was for a challenge.   I didn't know they were be quite so nitpicky.  Welcome to the real world of MTSOs.  I have worked at the hospital for 8 years.  They are very laid back.  They really don't care as long as you don't totally slaughter it, as in giving a patient a balogna amputation instead of a below  knee amputation.  The MTSO doesn't pay as well and the benifits are not as good but I have learned a lot from them. 

The hospital is sending me home temporarily until the weather clears. Maybe I can convience my boss I can be much more productive here than there but I doubt it.  She has a power trip.

Hi,

The solutions others gave are good, but if I just needed to get the number of lines with typing (and don't need an invoice or a report), I'd use a Word macro.

The other solutions offered have this drawback: If the body of your document contains tables, the count Word gives you is vastly inflated, for Word counts each cell in that table as a line. This is not what the eye sees, and becomes problematic when you try to justify such to your client.

Below is a macro for counting what we at Emmaus call Lines Strict. (i.e. Lines with typing on them, vs Lines Extended that includes the blank lines).

To use it, copy from Public Sub through End Sub, and paste it into your macros along with your other macros. Easiest way of doing this is (after you have copied the appropriate lines):

1. Click Tools | Macros, and select an existing macro.

2. Click the Edit button.

3. Once the Visual Basic Editor opens, press Ctrl+End to move to the bottom.

4. Paste the clipboard contents.

5. Click File | Compile Normal. (If you've pasted things that don't belong, it won't compile.)

6. Click File | Close and Return to MS Word.

Merry Christmas!
vJoe
http://www.mpword.com

OOPS! I looked at the HTML code after I pasted the code into the editor on this board, and it added things that when pasted into the Visual Basic Editor in Word will not compile. Here's the code if you want to retype it, but pasting won't work. If you send me an email, I'll attach the code into a .txt document, and you won't have any problems.  vjoet@attglobal.net

Public Sub GetLinesStrictCount()
    Dim CharsStrict As Long
    Dim Count As Long
    Dim ParaswBlanks As Long
    Dim ParasWOBlanks As Long
    Dim LineswBlanks As Long
    Dim BlankLines As Long
    Dim LinesWOBlanks As Long
    Dim NumOfTables As Long
    Dim NumOfRows As Long
    Dim TableRowCount As Long
    Dim x As Integer
   
    TableRowCount = 0
    NumOfTables = 0
    NumOfRows = 0
   
    ActiveDocument.ComputeStatistics (wdStatisticCharacters)
    ActiveDocument.ComputeStatistics (wdStatisticLines)
    CharsStrict = ActiveDocument.BuiltInDocumentProperties(wdPropertyCharacters)
    ParasWOBlanks = ActiveDocument.BuiltInDocumentProperties(wdPropertyParas)
    LineswBlanks = ActiveDocument.BuiltInDocumentProperties(wdPropertyLines)

    NumOfTables = ActiveDocument.Content.Tables.Count
    If NumOfTables > 0 Then
        For x = 1 To NumOfTables
            With ActiveDocument.Content.Tables.Item(x)
                NumOfRows = NumOfRows + .Rows.Count
            End With
        Next
        TableRowCount = NumOfRows
    End If
   
    If CharsStrict > 0 Then
        ParaswBlanks = ActiveDocument.Range(wdMainTextStory).Paragraphs.Count
    Else
        ParaswBlanks = 1
    End If
       
    If LineswBlanks > 1 Then
        LineswBlanks = LineswBlanks + 1
    End If
   
    If ParaswBlanks = 1 And ParasWOBlanks = 1 Then
        BlankLines = 0
    Else
        BlankLines = ParaswBlanks - ParasWOBlanks
    End If
   
    LinesWOBlanks = LineswBlanks - BlankLines
    Count = LinesWOBlanks
   
    MsgBox "Lines Strict (with typing) = " & CStr(Count + TableRowCount)
End Sub

The company I work types verbatim as well.  I would not have it any other way.  It is much better than trying to remember 50,000 rules by the BOS!!

Even though you type verbatim does not mean you type all the mistakes the doctor's dictate.  I would NEVER type an error.  When in doubt, it is blanked and sent to QA.

The company I work for is known for their QUALITY and we type VERBATIM on all accounts except stated otherwise in account specifics.