Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: IBQLD3A

Package: Utilization Management Rollup

Routine: IBQLD3A


Information

IBQLD3A ;LEB/MRY - PROVIDER/PATIENT DOWNLOAD ; 1-SEP-95

Source Information

Source file <IBQLD3A.m>

Entry Points

Name Comments DBIA/ICR reference
PRINT
END
DATA ;
PLINE ;
HDR ;
DTC

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?20,"<<< NO PATIENTS TO PRINT >>>"
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !!,IBSUBH,!
  • Line Location: PLINE+1
Function Call: WRITE
  • Prompt: !,IBSSN,"^"
  • Line Location: PLINE+2
Function Call: WRITE
  • Prompt: IBDT
  • Line Location: PLINE+2
Function Call: WRITE
  • Prompt: IBDT
  • Line Location: PLINE+2
Function Call: WRITE
  • Prompt: IBDT
  • Line Location: PLINE+2
Function Call: WRITE
  • Prompt: "^",IBADIAG,"^",IBENRLL,"^",IBAAD,"^",IBNAD,"^",$P(IBRAD," "),"^",$P(IBRAD," ",2),"^",$P(IBRAD," ",3)
  • Line Location: PLINE+3
Function Call: WRITE
  • Prompt: "^ATTENDING PROVIDER CONTAINS ADMITTING PROVIDER'S 'LOS' DATA."
  • Line Location: PLINE+4
Function Call: WRITE
  • Prompt: "^",IBLOS,"^",IBSACNT,"^",IBSNCNT
  • Line Location: PLINE+5
Function Call: WRITE
  • Prompt: !!,"^ADMIT^DISCH^^ENRLL^^^A-REA^A-REA^A-REA^^#AC^#N-AC"
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"SSN^DATE^DATE^DIAG^R-D-L^A^N^1^2^3^#LOS^DAYS^DAYS"
  • Line Location: HDR+4
Info |  Source |  Entry Points |  Interaction Calls