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

Package: Fee Basis

Routine: FBAASLP


Information

FBAASLP ;AISC/GRR-PRINT SUSPENSION LETTERS ;7/NOV/2006

Source Information

Source file <FBAASLP.m>

Entry Points

Name Comments DBIA/ICR reference
RDCODE
AHEAD
START
END
MORE
GOTV
WPBEG
MID
MORE2
WPBOT
BOT
ACT ; print table of adjustment reason descriptions
; Input
; FBACRR( - required, array
; FBACRR(FBADJRE)=""
; where FBADJRE = adjustment reason code, external value
HED
GOTP ; Utilize new API for Name Standardization
SEL
ENDSL
PSEL
WPFT
STRT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"There are no suspension letters found that meet the criteria you have",!,"specified."
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !!!!
  • Condition for execution: (IOSL)>70
  • Line Location: GOTV+3
Function Call: WRITE
  • Prompt: !!!!!!!!!!!,?5,VNAM,?60,FBPDT,!,?5,VST1,!
  • Line Location: GOTV+3
Function Call: WRITE
  • Prompt: ?5,VST2,!
  • Line Location: GOTV+3
Function Call: WRITE
  • Prompt: ?5,VCITY," ",VSTATE," ",VZIP,!!!!
  • Line Location: GOTV+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: WPBOT+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BOT+23
Function Call: WRITE
  • Prompt: !!,$E(PNAME,1,26),?33,PSSN,?49,FBCSID
  • Line Location: BOT+24
Function Call: WRITE
  • Prompt: !,$$DATX^FBAAUTL(FBDOS),?10,CPT_$S($G(FBMODLE)]"":"-"_$P(FBMODLE,","),1:""),?33,FBUNITS
  • Line Location: BOT+25
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BOT+29
Function Call: WRITE
  • Prompt: !," (continued)"
  • Line Location: BOT+29
Function Call: WRITE
  • Prompt: !,?15,"-",FBMOD
  • Line Location: BOT+30
Function Call: WRITE
  • Prompt: !,?10,$J(A1,6),?24,$J(A2,6)
  • Line Location: BOT+31
Function Call: WRITE
  • Prompt: ?35,$S(FBADJLR]"":FBADJLR,1:T)
  • Line Location: BOT+33
Function Call: WRITE
  • Prompt: ?49,$S(FBADJLA]"":FBADJLA,1:TAMT)
  • Line Location: BOT+35
Function Call: WRITE
  • Prompt: ?66,FBRRMKL
  • Line Location: BOT+36
Function Call: WRITE
  • Prompt: !,?10,"FPPS Claim ID: ",FBFPPSC,?38,"FPPS Line Item: ",FBFPPSL
  • Line Location: BOT+37
Function Call: WRITE
  • Prompt: !
  • Line Location: BOT+38
Function Call: WRITE
  • Prompt: !,"*Adjustment Code Text:"
  • Line Location: ACT+6
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?33,"SSN",?49,"PATIENT ACCOUNT NUMBER"
  • Line Location: HED+0
Function Call: WRITE
  • Prompt: !,"SVC DATE",?10,"CPT-MOD",?33,"UNITS"
  • Line Location: HED+1
Function Call: WRITE
  • Prompt: !,?10,"AMT CLAIMED",?24,"AMT PAID",?35,"ADJ CODE",?49,"ADJ AMT",?66,"REMIT REMARKS"
  • Line Location: HED+2
Function Call: WRITE
  • Prompt: !,UL
  • Line Location: HED+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: !!,*7,"No suspension codes selected!"
  • Line Location: ENDSL+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAA(161.27 - [#161.27] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call