MEDITECH.CUST.RPTS

Hospital  North Country Regional Hospital

MIS       NCH

Directory LIVE.MIS

User      HAB

Date      20030108

Segment   B

Comment   FRAGMENT TYPE 3 - SORT/SELECT DATA EXAMPLE1

 

===================================================================================

===================================================================================

Procedure       ABS.PAT.zcus.jfb.ss02.frag.build.stats

 

Responsibility         U

Active                 Y

Access                 Y

Menu Logic            

Description            @Inquiry

        

         Y

 

--------------------------------------------------------------------------------

Report

 

Active                 Y

Name                   zcus.jfb.ss02.frag.build.stats

DPM                    ABS.PAT

Segment                main

Report Title           Fragment to build stats

Page Banner            REG

Chars/Inch             12

Chars/Line             92

Lines/Inch             6

Lines/Page             60

Segment DPM            ABS.PAT

Page Size              66

Logical Filename       abs.pat

Page Trailer           N

Report Header          N

Report Trailer         N

Detail                 N

Page Header            N

Access Path            abs.pat.dis.date.x

Sort Modify           

Left Margin            0

 

--------------------------------------------------------------------------------

Documentation

 

written by joel berman - muse 2002- miami - modified by hab to work at nchs

 

--------------------------------------------------------------------------------

Footnotes

 

AL D @Add(1,/R.FRAG.VAL[@drg]),IF{XX+1^XX20=0 .^#}

 

--------------------------------------------------------------------------------

Selection Fields

 

Num  Field                             Op   Prompt                               Default           (Stored As)

  1  pt.status                         EQ   "IN"                                                   ("IN")

  2  dis.date                          GE   /R.DATE1                                               (/R.DATE1)

  3  dis.date                          LE   /R.DATE2                                               (/R.DATE2)

 

--------------------------------------------------------------------------------

Picture

 

1   

 

--------------------------------------------------------------------------------

Sort Fields

 

Num  Field                                  Order   Header  Trailer  Renumber

 

1    pt.status                                       NONE        N                          

2    dis.date                                        NONE        N                          

3    account.number                                  NONE        N                          

4    urn                                             NONE        N                          

 

--------------------------------------------------------------------------------

Screen

 

Screen Title           Fragment to build stats

Print Prompt           %Z.on.device