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: IBOUNP1

Package: Integrated Billing

Routine: IBOUNP1


Information

IBOUNP1 ;ALB/CJM - OUTPATIENT INSURANCE REPORT ;JAN 25,1992

Source Information

Source file <IBOUNP1.m>

Entry Points

Name Comments DBIA/ICR reference
MAIN ;
QUEUED ; entry point if queued
EXIT ;
DRANGE ; select a date range for report
DEVICE ;
CLINIC ; gets list of selected clinics,or sets VAUTC=1 if all selected
; IA#664
LCLINIC ; lists clinics if not ALL included and ALL divisions
CATGRY ; allows user to select categories to include in report
OUT() ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?10,IBCOUNT,?20,$G(^TMP($J,"SDAMA301",IBCOUNT))
  • Line Location: QUEUED+12
Function Call: WRITE
  • Prompt: !,*7,"ENDING DATE must follow or be the same as the STARTING DATE"
  • Line Location: DRANGE+2
Function Call: WRITE
  • Prompt: !!,*7,"*** Margin width of this output is 132 ***"
  • Line Location: DEVICE+2
Function Call: WRITE
  • Prompt: !,"*** This output should be queued ***"
  • Line Location: DEVICE+3
Function Call: WRITE
  • Prompt: !,$S($D(ZTSK):"REQUEST QUEUED TASK="_ZTSK,1:"REQUEST CANCELLED")
  • Line Location: DEVICE+5
Function Call: WRITE
  • Prompt: !
  • Line Location: OUT+2
Info |  Source |  Entry Points |  Interaction Calls