Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
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>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Fee Basis 9 $$ADJLRA^FBAAFA  $$RRL^FBAAFR  ^FBAASL  ^FBAASL1  ($$DATX,$$SSN,$$SSNL4,CLOSE,DATE,PDATE,ZIS)^FBAAUTL  ($$CPT,$$MODL)^FBAAUTL4  ^FBCHSL1  ^FBCHSLP  
$$AR^FBUTL1  
VA FileMan 4 ^DIC  ^DIR  ^DIWP  ^DIWW  
Kernel 2 $$NAMEFMT^XLFNAME  $$LJ^XLFSTR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Fee Basis 5 FBAA SUSPENSION LETTER PRINT  FBAASL  FBAASL1  FBCHSL1  FBCHSLP  

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

External References

Name Field # of Occurrence
^DIC SEL
^DIR RDCODEAHEAD+5
^DIWP WPBEG+1, WPBOT+2, BOT+41, ACT+14, ACT+17, WPFT+1
^DIWW WPBEG+2, WPBOT+3, BOT+42, ACT+18, WPFT+2
$$ADJLRA^FBAAFA BOT+13
$$RRL^FBAAFR BOT+21
^FBAASL FBAASLP+4
^FBAASL1 START+2
$$DATX^FBAAUTL BOT+25
$$SSN^FBAAUTL GOTP+2
$$SSNL4^FBAAUTL GOTP+2
CLOSE^FBAAUTL END+3
DATE^FBAAUTL FBAASLP+3
PDATE^FBAAUTL GOTV+2
ZIS^FBAAUTL AHEAD+14
$$CPT^FBAAUTL4 BOT+9
$$MODL^FBAAUTL4 BOT+22
^FBCHSL1 START+4
^FBCHSLP START+3
$$AR^FBUTL1 ACT+9
$$NAMEFMT^XLFNAME GOTP+6
$$LJ^XLFSTR ACT+14

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
Routine Call
  • DIC
  • Line Location:
    • SEL
Routine Call
  • DIR
  • Line Location:
    • RDCODE
    • AHEAD+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAA(161.27 - [#161.27] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(5 - [#5] GOTV+2
^DPT - [#2] MOREGOTP+2
^FBAA(161.27 - [#161.27] BOT+11, BOT+41
^FBAA(161.3 - [#161.3] WPBEG+1, WPBOT+2
^FBAA(162.1 - [#162.1] START+2
^FBAA(162.2 - [#162.2] START+3
^FBAAC - [#162] MORE2BOT+2, BOT+7, BOT+14, BOT+39, WPFT+1
^FBAAC("AI" START+1, MOREMIDMORE2PSELSTRT
^FBAAI("AI" START+4
^FBAAV - [#161.2] MOREGOTV
^TMP($J START!, START+2!, END+2!
^UTILITY($J START!, END+2!, WPBEG!, WPBOT+1!, BOT+40!, ACT+11!, WPFT!

Label References

Name Line Occurrences
ACT WPBOT
AHEAD ENDSL+1
BOT MORE2
END FBAASLP+3, FBAASLP+4, RDCODEAHEAD+5, AHEAD+14, ENDSLPSEL+1
ENDSL SEL
GOTP MORE
GOTV BOT+6
HED BOT+6, BOT+23, BOT+29
MID MORE
MORE PSELSTRT
MORE2 MID
SEL RDCODESEL
STRT START+1
WPBOT STRT
WPFT BOT+39

Naked Globals

Name Field # of Occurrence
^( WPBEG+1, WPBOT+2, BOT+41, WPFT+1
^(0 GOTV+2, MORE2BOT+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A1 END!, BOT+8*, BOT+31
A2 END!, BOT+8*, BOT+31
BEGDATE AHEAD+7, END!, PSELSTRT
CPT END!, BOT+8*, BOT+9*, BOT+25
>> DA SEL*
DFN AHEAD+8, END+1!, MORE
DIC END!, SEL*
DIC(0 SEL*
DIR RDCODE!, AHEAD+5!
DIR("?" RDCODE*, AHEAD+1*, AHEAD+2*, AHEAD+3*, AHEAD+4*
DIR("A" RDCODE*, AHEAD*
DIR("B" RDCODE*, AHEAD*
DIR(0 RDCODE*, AHEAD*
DIRUT AHEAD+5, END!
DIWF END!, WPBEG*, WPBOT+1*, BOT+40*, ACT+12*, ACT+15*, WPFT*
DIWL END!, WPBEG*, WPBOT+1*, BOT+40*, ACT+12*, WPFT*
DT GOTV+2
>> DTOUT RDCODE
>> DUOUT RDCODE
ENDDATE AHEAD+7, END!, PSELSTRT
FBA END!, MID*, MORE2BOT+39, BOT+40, PSEL*
FBAA END!, MID*
FBAAOUT FBAASLP+3*, FBAASLP+4, END+1!
FBAAPGM END!
FBAAS FBAASLP+3!, AHEAD+13, END!, ENDSL
FBAAS( AHEAD+13, MID, SEL*, PSEL
FBAC BOT+5~, BOT+19*
FBACRR WPBOT!, STRT~
FBACRR( BOT+19*, ACT+7
FBACT ACT+5~
FBACT( ACT+17
FBADJLA BOT+5~, BOT+20*, BOT+35
FBADJLR BOT+5~, BOT+18*, BOT+19, BOT+33, BOT+39
FBADJRE ACT+5~, ACT+7*, ACT+9, ACT+14
FBCSID BOT+5~, BOT+16*, BOT+24
FBCTR FBAASLP+3*, AHEAD+12, END+1!
FBDEN AHEAD+10, END+1!, BOT
FBDOS END!, BOT+7*, BOT+25
FBDRUG END!
FBDT END!, MOREMIDMORE2, PSEL*, STRT*
FBENA AHEAD+6*, AHEAD+11, END+1!, BOT+4
FBFORM END!
FBFPPSC BOT+1~, BOT+3*, BOT+4, BOT+37
FBFPPSL BOT+5~, BOT+15*, BOT+37
FBGOT START+5, END+1!, BOT+6*
FBI END!, BOT+27~, BOT+28*, BOT+40*, BOT+41, ACT+5~, ACT+17*
FBJ BOT+5~, BOT+19*
FBLET START+1*, START+2*, START+3*, START+4*, END!, WPBEG+1, WPBOT+2
FBMOD END+1!, BOT+28*, BOT+30
FBMODLE END+1!, BOT+22*, BOT+25, BOT+26, BOT+28
FBNAMES GOTP+4~, GOTP+6
FBNAMES("FIELD" GOTP+5*
FBNAMES("FILE" GOTP+5*
FBNAMES("IENS" GOTP+5*
FBPDT END!, GOTV+3
FBPG START*, GOTV+3!
>> FBPOP FBAASLP+3, AHEAD+14
FBPRG FBAASLP+3*, END+1!
FBPRG( AHEAD+12
FBPRG("C" START+3
FBPRG("I" START+4
FBPRG("O" START+1
FBPRG("P" START+2
FBRR END!, WPBEG+1*, WPBOT+2*, BOT+41*, WPFT+1*
FBRRMKL BOT+5~, BOT+21*, BOT+36
FBRX END!
FBSCDT ACT+9, STRT~*
FBSLW FBAASLP+3*, AHEAD+7, END!, MID, SEL*
FBSW END!, GOTV*, BOT+6*, STRT*
FBUNITS BOT+5~, BOT+17*, BOT+25
FBX BOT+5~, BOT+13*, BOT+18, BOT+20
FBXX END!, WPBEG+1*, WPBEG+2!, WPBOT+2*, WPBOT+3!, BOT+41*, BOT+42!, WPFT+1*, WPFT+2!
FBY FBAASLP+3*, END+1!, BOT+5~, BOT+14*, BOT+16, BOT+17
FBY3 BOT+1~, BOT+2*, BOT+3, BOT+15
I END!
IFN AHEAD+9, START+1, END+1!
IO START
IOF GOTV+3, BOT+23, BOT+29
>> IOP AHEAD+14*
IOSL GOTV+3, BOT+23, BOT+29
J AHEAD+12*, AHEAD+13*, END!, MORE*, MIDMORE2BOT+2, BOT+7, BOT+13, BOT+14
BOT+21, BOT+22, BOT+39, GOTP+2, GOTP+5, WPFT+1
K AHEAD+12*, START+1*, END!, MOREGOTVMIDMORE2BOT+2, BOT+7, BOT+13
BOT+14, BOT+21, BOT+22, BOT+39, WPFT+1, STRT
L END!, MORE2*, BOT+2, BOT+7, BOT+13, BOT+14, BOT+21, BOT+22, BOT+39, WPFT+1
M END!, MORE2*, BOT+2, BOT+13, BOT+14, BOT+21, BOT+22, BOT+39, WPFT+1
PGM AHEAD+14*, END!
PNAME END!, BOT+24, GOTP+2*, GOTP+3, GOTP+6*
PSSN END!, BOT+24, GOTP+2*
T BOT+5~, BOT+10*, BOT+11*, BOT+33
TAMT BOT+5~, BOT+12*, BOT+35
U BOTBOT+3, BOT+10, BOT+11, BOT+12, BOT+15, BOT+16, BOT+17, BOT+18, BOT+20
UL FBAASLP+3*, START*, END!, HED+3
VAL AHEAD+7*, AHEAD+8*, AHEAD+9*, AHEAD+10*, AHEAD+11*, AHEAD+12*, AHEAD+13*, END!
VAR AHEAD+7*, AHEAD+8*, AHEAD+9*, AHEAD+10*, AHEAD+11*, AHEAD+12*, AHEAD+13*, END!
VCITY END!, GOTV+2*, GOTV+4
VNAM END!, GOTV*, GOTV+1*, GOTV+3
VST1 END!, GOTV+2*, GOTV+3
VST2 END!, GOTV+2*, GOTV+3
VSTATE END!, GOTV+2*, GOTV+4
VZIP END!, GOTV+2*, GOTV+4
X END!, WPBEG+1*, WPBOT+2*, BOT+41*, ACT+14*, ACT+17*, SELWPFT+1*
Y RDCODEAHEAD+6, END!, GOTV+2*, SEL
Y(0 GOTV*, GOTV+2, GOTP+2*
Z END!, STRT*
Z(0 MORE2*, BOTBOT+8, BOT+10, BOT+12
ZZ END!, STRT*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All