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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: FBASFU

Package: Fee Basis

Routine: FBASFU


Information

FBASFU ;AISC/JLG - UTILITIES FOR ICD10 DIAGNOSIS CODE ASF (Advanced Search Functionality) ;3/26/2012

Source Information

Source file <FBASFU.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 2 $$FLDNUM^DILFD  $$GET1^DIQ  
DRG Grouper 1 ($$CODEC,$$SD,$$STATCHK)^ICDEX  
Fee Basis 1 $$QUESTION^FBASF  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Fee Basis 1 FBASF  

Entry Points

Name Comments DBIA/ICR reference
GETDC(FBFILE,FBDFN,FBIEN) ;
; 161.01 is the sub-field authorization in fee basis patient file
REQFLD(FBFILE,FBFLD)
GETVAL(FBFILE,FBIEN,FBFLD)
PRTICD10(ICDREC) ;
GETDCUC(FBFILE,FBIEN) ;
STATCHK(ICDCODE,ICDDT) ;

External References

Name Field # of Occurrence
$$FLDNUM^DILFD REQFLD+1, GETVAL+7
$$GET1^DIQ GETVAL+9
$$QUESTION^FBASF PRTICD10+16
$$CODEC^ICDEX GETVAL+6, GETDC+4, GETDCUC+3, STATCHK+11
$$SD^ICDEX STATCHK+12
$$STATCHK^ICDEX STATCHK+2
$$FMTE^XLFDT STATCHK+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: STATCHK+14
Function Call: WRITE
  • Prompt: !,*7," Code is inactive"
  • Line Location: STATCHK+15
Function Call: WRITE
  • Prompt: " on "_$$FMTE^XLFDT(ICDDT)
  • Condition for execution: $G(ICDDT)>0
  • Line Location: STATCHK+15
Function Call: WRITE
  • Prompt: !,"One match found",!
  • Line Location: PRTICD10+2
Function Call: WRITE
  • Prompt: !," ICD Diagnosis code: "_$P($P(ICDREC,U,1),";",2)
  • Line Location: PRTICD10+3
Function Call: WRITE
  • Prompt: !," ICD Diagnosis description: "_PRTLN(I)
  • Line Location: PRTICD10+9
Function Call: WRITE
  • Prompt: !,?PRTLEN,PRTLN(I)
  • Line Location: PRTICD10+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( REQFLD+2
^FB583 - [#162.7] GETDCUC+1, GETDCUC+2, GETDCUC+3
^FBAAA - [#161] GETDC+2, GETDC+3, GETDC+4
^FBAAA(1 GETVAL+5, GETVAL+6

Label References

Name Line Occurrences
$$PRTICD10 STATCHK+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
EPOS PRTICD10+1~, PRTICD10+5*, PRTICD10+8, PRTICD10+12*
FBDESC STATCHK+12*, STATCHK+13, STATCHK+16!
>> FBDFLT PRTICD10+2, PRTICD10+15
FBDFN GETDC~, GETDC+2, GETDC+3, GETDC+4
FBFILE REQFLD~, REQFLD+1, REQFLD+2, GETVAL~, GETVAL+5, GETVAL+6, GETVAL+7, GETVAL+9, GETDC~, GETDC+2
, GETDC+3, GETDC+4, GETDCUC~, GETDCUC+1, GETDCUC+2, GETDCUC+3
FBFLAT REQFLD~, REQFLD+2*, REQFLD+3
FBFLD REQFLD~, REQFLD+1, GETVAL~, GETVAL+1, GETVAL+2*, GETVAL+3*, GETVAL+7
FBFLDNO REQFLD~*, REQFLD+1*, REQFLD+2, GETVAL~*, GETVAL+7*, GETVAL+8, GETVAL+9
FBICD STATCHK+11*, STATCHK+13, STATCHK+16!
FBIEN GETVAL~, GETVAL+5, GETVAL+6, GETVAL+9, GETDC~, GETDC+2, GETDC+3, GETDC+4, GETDCUC~, GETDCUC+1
, GETDCUC+2, GETDCUC+3, STATCHK+11*, STATCHK+12, STATCHK+13
FBINAC STATCHK+13*, STATCHK+14, STATCHK+16!
FBPOUT STATCHK+1~, STATCHK+14*
FBYN PRTICD10+14~*, PRTICD10+16*, PRTICD10+17, PRTICD10+18
I PRTICD10+1~, PRTICD10+7*, PRTICD10+8, PRTICD10+9, PRTICD10+10, PRTICD10+13
ICDCODE STATCHK~, STATCHK+2
ICDDESC PRTICD10+1~, PRTICD10+4*, PRTICD10+8
ICDDT STATCHK~, STATCHK+2, STATCHK+12, STATCHK+15
ICDLEN PRTICD10+1~, PRTICD10+4*, PRTICD10+6
ICDREC PRTICD10~, PRTICD10+2, PRTICD10+3, PRTICD10+4, PRTICD10+15, PRTICD10+19
ICDRET STATCHK+1~, STATCHK+2*, STATCHK+7, STATCHK+8, STATCHK+9, STATCHK+11, PRTICD10+1~, PRTICD10+19*, PRTICD10+20
IOM PRTICD10+5
MYARY STATCHK+1~, STATCHK+12
NUMLN PRTICD10+1~, PRTICD10+6*, PRTICD10+7
POSREM PRTICD10+1~, PRTICD10+5*, PRTICD10+6, PRTICD10+11, PRTICD10+12
PRTLEN PRTICD10+1~, PRTICD10+5*, PRTICD10+10
PRTLN PRTICD10+1~
PRTLN( PRTICD10+8*, PRTICD10+9, PRTICD10+10, PRTICD10+13!
SPOS PRTICD10+1~, PRTICD10+5*, PRTICD10+8, PRTICD10+11*
U REQFLD+2, GETVAL+6, STATCHK+7, STATCHK+8, STATCHK+9, STATCHK+11, PRTICD10+2, PRTICD10+3, PRTICD10+4, PRTICD10+15
, PRTICD10+19
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All