REASONS NOT BILLABLE - Inpatient (01 - 10) (25)    IB DM EXTRACT REPORTS (351.7)

Name Value
REPORT NAME REASONS NOT BILLABLE - Inpatient (01 - 10)
INPUT VARIABLE
  • IBSD
    VALUE:   0
  • IBSPRV
    VALUE:   A
  • IBSISP
    VALUE:   A
  • IBSOSP
    VALUE:   A
  • IBD
    VALUE:   DATE ENTERED
  • IBSRNB
    VALUE:   A
  • IBRPT
    VALUE:   S
  • IBSEL
    VALUE:   1,2,3,4,
  • IBSORT
    VALUE:   R
  • IBEXCEL
    VALUE:   0
  • IBBDT
    INPUT STATEMENT:   S ZTSAVE("IBBDT")=+$$M1^IBJDE(IBDT,0)
  • IBEDT
    INPUT STATEMENT:   S ZTSAVE("IBEDT")=$P($$M1^IBJDE(IBDT,0),U,2)
ROUTINE DQ^IBJDB2