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

Package: Integrated Billing

Routine: IBCRHD


Information

IBCRHD ;ALB/ARH - RATES: UPLOAD ASSIGN & DELETE ; 22-MAY-1996

Source Information

Source file <IBCRHD.m>

Entry Points

Name Comments DBIA/ICR reference
ACS ; OPTION: assign Charge Sets to existing XTMP files
ACS1
DEL ; OPTION: delete files in XTMP
CONT() ; continue y/n
EOP ; continue at end of page of display
OPTION ; OPTION: MAIN ENTRY POINT FOR LOADING FILES INTO THE CHARGE MASTER
UP1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Assign charges loaded into XTMP to Charge Sets.",!
  • Line Location: ACS+3
Function Call: WRITE
  • Prompt: !,"------------------------------------------------------------------------------"
  • Line Location: ACS1+0
Function Call: WRITE
  • Prompt: !,"No files in XTMP."
  • Line Location: ACS1+1
Function Call: WRITE
  • Prompt: !!,?5,$P(IBFILE,U,1),?40,$P(IBFILE,U,2),!
  • Line Location: ACS1+4
Function Call: WRITE
  • Prompt: !!,?7,"Charge Set: ",$P($G(^IBE(363.1,+IBCS,0)),U,1),?45,"Billable Item: ",$P($$CSBI^IBCRU3(+IBCS),U,2),!
  • Line Location: ACS1+8
Function Call: WRITE
  • Prompt: !!,"Charge Set will be removed from the file."
  • Line Location: ACS1+10
Function Call: WRITE
  • Prompt: !!,"Delete files in XTMP:"
  • Line Location: DEL+3
Function Call: WRITE
  • Prompt: !,"------------------------------------------------------------------------------"
  • Line Location: DEL+4
Function Call: WRITE
  • Prompt: !,"No files in XTMP."
  • Line Location: DEL+5
Function Call: WRITE
  • Prompt: !,"No files selected.",!
  • Line Location: DEL+10
Function Call: WRITE
  • Prompt: !!,"The following files will be deleted:",!!
  • Line Location: DEL+12
Function Call: WRITE
  • Prompt: $P(IBA3(IBI),U,1),?40,$P(IBA3(IBI),U,2),!
  • Line Location: DEL+13
Function Call: WRITE
  • Prompt: !,"No change."
  • Line Location: DEL+14
Function Call: WRITE
  • Prompt: !,IBF1,?40,IBF2,?65,"... deleted."
  • Line Location: DEL+19
Function Call: WRITE
  • Prompt: !,IBF1,?65,"... deleted.",!
  • Line Location: DEL+20
Function Call: WRITE
  • Prompt: !!,"Deleting Reasonable Charges XTMP files",!,"uploaded from Host Files on ",$$FMTE^XLFDT($P(IBX,U,2))
  • Line Location: DEL+25
Function Call: WRITE
  • Prompt: "."
  • Line Location: DEL+26
Function Call: WRITE
  • Prompt: !!
  • Line Location: DEL+27
Function Call: WRITE
  • Prompt: !
  • Line Location: CONT+2
Function Call: WRITE
  • Prompt: !,"*** ",$P($P(IBX,U,2),")",1),")",!,?16,$P($P(IBX,U,2),")",2,99),!
  • Line Location: EOP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EOP+2
Info |  Source |  Entry Points |  Interaction Calls