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

Package: Integrated Billing

Routine: IBCEP81


Information

IBCEP81 ;ALB/KJH - NPI and Taxonomy Functions ;19 Apr 2008 5:17 PM

Source Information

Source file <IBCEP81.m>

Entry Points

Name Comments DBIA/ICR reference
NPIREQ(IBDT) ; Check NPI drop dead date
TAXREQ(IBDT) ; Check Taxonomy drop dead date
NPIGET(IBIEN) ; Get NPI
TAXGET(IBIEN,IBARR) ; Get Taxonomy
TAXDEF(IBIEN399) ; Get Taxonomy for Default Division
NPIUSED(IBNPI,IBOLDNPI,IBIEN,IBCHECK,IBKEY) ; Check whether NPI is already used within files 200, 4, or 355.93.
DUP(IBNPI) ; Check whether this is a duplicate NPI within file# 355.93
DISPTAX(IBIEN,IBTXT) ; Display extra Taxonomy info (when available)
RULES(IBNPI,IBIEN,IBOLDNPI) ;Verify that the NPI meets all rules for usage
PRENPI(IBIEN) ;Pre-NPI edit messages
ID(IBIEN) ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," ",$G(IBTXT)," Classification: ",IBX
  • Line Location: DISPTAX+3
Function Call: WRITE
  • Prompt: !," ",$G(IBTXT)," Area of Specialization: ",IBX
  • Line Location: DISPTAX+4
Function Call: WRITE
  • Prompt: !," ",$G(IBTXT)," Specialty Code: ",IBX
  • Line Location: DISPTAX+5
Function Call: WRITE
  • Prompt: !," ",$G(IBTXT)," Taxonomy X12 Code: ",IBX
  • Line Location: DISPTAX+6
Function Call: WRITE
  • Prompt: !!,"The NPI of ",IBNPI," is also associated with the INDIVIDUAL provider ",!,$$GET1^DIQ(200,$P(IBVA200,U,2),.01)," in the NEW PERSON file."
  • Line Location: PRENPI+8
Function Call: WRITE
  • Prompt: !!,"You are updating ",$S($$GET1^DIQ(355.93,IBIEN,.02,"I")=1:"a FACILITY/GROUP",$$GET1^DIQ(355.93,IBIEN,.02,"I")=2:"an INDIVIDUAL",1:"a")," provider in the"
  • Line Location: PRENPI+9
Function Call: WRITE
  • Prompt: !,"IB NON/OTHER VA BILLING PROVIDER file.",!
  • Line Location: PRENPI+10
Function Call: WRITE
  • Prompt: !!,"The NPI of ",IBNPI," is also associated with the INDIVIDUAL provider ",!,$$GET1^DIQ(200,$P(IBVA200,U,2),.01)," as INACTIVE in the NEW PERSON file."
  • Line Location: PRENPI+13
Function Call: WRITE
  • Prompt: !!,"You are updating ",$S($$GET1^DIQ(355.93,IBIEN,.02,"I")=1:"a FACILITY/GROUP",$$GET1^DIQ(355.93,IBIEN,.02,"I")=2:"an INDIVIDUAL",1:"a")," provider in the"
  • Line Location: PRENPI+14
Function Call: WRITE
  • Prompt: !,"IB NON/OTHER VA BILLING PROVIDER file.",!
  • Line Location: PRENPI+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^IBA(355.93 - [#355.93] GET1^DIQ
355.9342 GET1^DIQ
^DGCR(399 - [#399] GET1^DIQ
^DIC(4 - [#4] GET1^DIQ
4.9999 GET1^DIQ
^USC(8932.1 - [#8932.1] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call