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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: FBUCLET1

Package: Fee Basis

Routine: FBUCLET1


Information

FBUCLET1 ;ALBISC/TET - UNAUTHORIZED CLAIM LETTER (continued) ;29/NOV/2006

Source Information

Source file <FBUCLET1.m>

Entry Points

Name Comments DBIA/ICR reference
PRINT ;print letter, don't update if variable fbnoup exists
GETNAME(FBIEN,FBFILE,FBFMT,FBFLAG) ;
PAGE ;new page
HED ;header to print after address and on each new page
CCADDR ; print CC address at bottom of page
; advance to bottom of page

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: FBFF&(FBFF>1)
  • Line Location: PRINT+47
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+47
Function Call: WRITE
  • Prompt: !?(IOM-$L(FBX)/2),FBX
  • Line Location: PRINT+49
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+50
Function Call: WRITE
  • Prompt: ?66,FBSTANUM,"/",FBMCODE
  • Line Location: PRINT+52
Function Call: WRITE
  • Prompt: !?4,FBADD(FBI)
  • Line Location: PRINT+54
Function Call: WRITE
  • Prompt: ?50,$$SSNL4^FBAAUTL($$SSN^FBAAUTL(+$P(FBUCA,U,4)))
  • Line Location: PRINT+54
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+56
Function Call: WRITE
  • Prompt: !?8,"Reason(s) for not approving "_$S($P(FBUCA,U,11)=4:"entire ",1:"")_"claim:"
  • Line Location: PRINT+61
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+62
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+83
Function Call: WRITE
  • Prompt: ?8,FBX,!
  • Line Location: PRINT+83
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+85
Function Call: WRITE
  • Prompt: @IOF,!!!!!!!
  • Line Location: PAGE+3
Function Call: WRITE
  • Prompt: ?66,FBSTANUM,"/",FBMCODE
  • Line Location: PAGE+6
Function Call: WRITE
  • Prompt: !!!!?8,"REGARDING:",?20,FBRE,?38,FBNAM
  • Line Location: HED+1
Function Call: WRITE
  • Prompt: !?20,"VENDOR:",?38,FBNAM1
  • Line Location: HED+1
Function Call: WRITE
  • Prompt: !?20,"FEE PROGRAM:",?38,FBPROG
  • Line Location: HED+2
Function Call: WRITE
  • Prompt: !?20,"EPISODE OF CARE:",?38,$P(FBEP,U)
  • Line Location: HED+3
Function Call: WRITE
  • Prompt: " to ",$P(FBEP,U,2)
  • Condition for execution: $P(FBEP,U,2)]""
  • Line Location: HED+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: HED+4
Function Call: WRITE
  • Prompt: !
  • Line Location: CCADDR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: CCADDR+6
Function Call: WRITE
  • Prompt: " CC:"
  • Condition for execution: FBI=1
  • Line Location: CCADDR+6
Function Call: WRITE
  • Prompt: ?4,FBADDCC(FBI)
  • Line Location: CCADDR+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAA(161.4 - [#161.4] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call