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

Package: Integrated Billing

Routine: IBCINPT


Information

IBCINPT ;DSI/ESG - Extract data and create NPT file ;27-DEC-2000

Source Information

Source file <IBCINPT.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 5 DD^%DT  YX^%DTC  EN^DDIOL  WAIT^DICD  ^DIR  
Integrated Billing 3 F^IBCEF  $$BILLSPEC^IBCEU3  $$FILL^IBCIUT2  
Kernel 2 ($$PWD,CLOSE,OPEN)^%ZISH  $$GET^XUA4A72  

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

Package Total Caller Graph
Integrated Billing 2 IBCI CLAIMSMANAGER NPT FILE  IBCIPAY  

Entry Points

Name Comments DBIA/ICR reference
ENTRY ; Entry point for routine (or called from the top)
EXIT ;
; Routine Exit
INIT ; Procedure to initialize some routine-wide variables
INITX ;
INTRO ; This procedure displays introductory text and asks if the user
; wants to proceed with the creation of the NPT file.
INTROX ;
GETPATH ; This procedure tries to get a valid directory location or path
; from the user. The file is also opened in this procedure.
GET1 ;
GETPTHX ;
EXTRACT ; This procedure extracts the data for the NPT file into a scratch
; global.
EXTRX ;
OUTPUT ; This procedure loops through the scratch global and writes each
; record to the open file. We only need to write the record with
; the most recent date of service for each patient/HCFA specialty
; code pair. This is why we are not looping through all dates,
; but doing a $Order with the -1 parameter to get the most recent
; date. The file is also closed in this procedure and a confirmation
; message is shown to the user.
OUTPUTX ;

External References

Name Field # of Occurrence
DD^%DT INTRO+6, INTRO+7, EXTRACT+19
YX^%DTC EXTRACT+7
$$PWD^%ZISH GET1+6
CLOSE^%ZISH GET1+66, OUTPUT+29
OPEN^%ZISH GET1+29
EN^DDIOL INTRO+18, GETPATH+17, GET1+42, GET1+56, GET1+67, EXTRACT+9, EXTRACT+11, EXTRACT+22, EXTRACT+95, OUTPUT+34
WAIT^DICD EXTRACT+10
^DIR INTRO+25, GET1+18, GET1+63
F^IBCEF EXTRACT+46
$$BILLSPEC^IBCEU3 EXTRACT+49
$$FILL^IBCIUT2 OUTPUT+21, OUTPUT+22, OUTPUT+23
$$GET^XUA4A72 EXTRACT+70

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: INTRO+3
Function Call: WRITE
  • Prompt: $$FILL^IBCIUT2
  • Line Location: OUTPUT+21
Function Call: WRITE
  • Prompt: $$FILL^IBCIUT2
  • Line Location: OUTPUT+22
Function Call: WRITE
  • Prompt: $$FILL^IBCIUT2
  • Line Location: OUTPUT+23
Function Call: WRITE
  • Prompt: !
  • Line Location: OUTPUT+24
Routine Call
  • DIR
  • Line Location:
    • INTRO+25
    • GET1+18
    • GET1+63

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] EXTRACT+13, EXTRACT+16, EXTRACT+26, EXTRACT+28, EXTRACT+42, EXTRACT+62, EXTRACT+63
^DPT - [#2] EXTRACT+33
^TMP($J EXTRACT+6!, EXTRACT+8*, EXTRACT+55, EXTRACT+56*, EXTRACT+77, EXTRACT+78*, OUTPUT+15, OUTPUT+16, OUTPUT+17, OUTPUT+37!

Label References

Name Line Occurrences
EXIT ENTRY+4, ENTRY+6
EXTRACT ENTRY+7
GET1 GET1+32, GET1+65
GETPATH ENTRY+5
GETPTHX GET1+22, GET1+23
INIT ENTRY+2
INTRO ENTRY+3
OUTPUT ENTRY+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%H EXTRACT+4~, EXTRACT+7*
BILL EXTRACT+3~, EXTRACT+28*, EXTRACT+29, EXTRACT+32
D0 EXTRACT+3~, EXTRACT+25*, EXTRACT+26*, EXTRACT+28, EXTRACT+42, EXTRACT+46, EXTRACT+49, EXTRACT+62, EXTRACT+63
D1 EXTRACT+3~, EXTRACT+61*, EXTRACT+62*, EXTRACT+63
DATE OUTPUT+8~, OUTPUT+17*, OUTPUT+18
DFN EXTRACT+3~, EXTRACT+32*, EXTRACT+33
DIR INTRO+4~, GETPATH+3~, GET1+1!, GET1+48!
DIR("?" GET1+7*, GET1+8*, GET1+9*, GET1+10*, GET1+11*, GET1+12*, GET1+13*, GET1+14*, GET1+15*, GET1+16*
DIR("A" INTRO+23*, GET1+3*, GET1+4*, GET1+5*, GET1+61*
DIR("B" INTRO+24*, GET1+6*, GET1+62*
DIR(0 INTRO+22*, GET1+2*, GET1+60*
DIROUT INTRO+4~, GETPATH+3~
DIRUT INTRO+4~, GETPATH+3~
DISPMON EXTRACT+4~, EXTRACT+20*, EXTRACT+22
DISPYR EXTRACT+4~, EXTRACT+21*, EXTRACT+22
DT INTRO+6, INTRO+7, EXTRACT+12
DTOUT INTRO+4~, GETPATH+3~, GET1+22
DUOUT INTRO+4~, GETPATH+3~, GET1+23
DUZ EXTRACT+8
ENDDT INTRO+4~, INTRO+7*, INTRO+11
EVNDT EXTRACT+3~, EXTRACT+14*, EXTRACT+16*, EXTRACT+17, EXTRACT+19, EXTRACT+26, EXTRACT+44
HCFA EXTRACT+3~, EXTRACT+49*, EXTRACT+50, EXTRACT+55, EXTRACT+56, EXTRACT+70*, EXTRACT+71*, EXTRACT+72, EXTRACT+77, EXTRACT+78
, OUTPUT+8~, OUTPUT+14*, OUTPUT+16*, OUTPUT+17, OUTPUT+22
IBCIFILE ENTRY+1~, INIT+3*, GETPATH+6, GET1+4, GET1+29, GET1+51
IBCIMSG INTRO+4~, INTRO+18, GETPATH+3~, GETPATH+17, GET1+35!, GET1+42, GET1+48!, GET1+56, EXTRACT+4~, EXTRACT+84!
, EXTRACT+95, OUTPUT+8~, OUTPUT+34
IBCIMSG(1 INTRO+8*, GETPATH+6*, GETPATH+13*, GET1+36*, GET1+40*, GET1+49*, GET1+54*, EXTRACT+85*, EXTRACT+91*, OUTPUT+31*
, OUTPUT+33*
IBCIMSG(2 INTRO+9*, GETPATH+7*, GETPATH+14*, GET1+37*, GET1+50*, EXTRACT+86*, EXTRACT+92*, OUTPUT+32*
IBCIMSG(3 INTRO+10*, INTRO+15*, GETPATH+8*, GETPATH+15*, GET1+38*, GET1+51*, EXTRACT+87*
IBCIMSG(4 INTRO+11*, GETPATH+9*, GET1+52*, EXTRACT+88*, EXTRACT+93*
IBCIMSG(5 INTRO+12*, INTRO+16*, GETPATH+10*, EXTRACT+89*
IBCIMSG(6 INTRO+13*, GETPATH+11*
IBCIPATH ENTRY+1~, GET1+26*, GET1+29, GET1+36, GET1+51
IBCIPRDT EXTRACT+3~, EXTRACT+44*, EXTRACT+45, EXTRACT+56, EXTRACT+66*, EXTRACT+67, EXTRACT+70, EXTRACT+78
IBCIPROV EXTRACT+3~, EXTRACT+64*, EXTRACT+65, EXTRACT+70
IBCIRTN ENTRY+1~, INIT+1*, GET1+29, GET1+66, EXTRACT+6, EXTRACT+8, EXTRACT+55, EXTRACT+56, EXTRACT+77, EXTRACT+78
, OUTPUT+15, OUTPUT+16, OUTPUT+17, OUTPUT+29, OUTPUT+37
IBPRV EXTRACT+43~, EXTRACT+48*, EXTRACT+49
IBXARRAY EXTRACT+43~
IBXARRY EXTRACT+43~
IBXDATA EXTRACT+43~
IBXDATA( EXTRACT+48
IBXERR EXTRACT+43~
IO OUTPUT+11
IO(0 GET1+30, OUTPUT+30
IOF INTRO+3
MONTH EXTRACT+4~, EXTRACT+17*, EXTRACT+18, EXTRACT+23
POP GETPATH+3~, GET1+32, OUTPUT+8~
PROC EXTRACT+3~, EXTRACT+63*, EXTRACT+64, EXTRACT+66
PRVTYP EXTRACT+43~, EXTRACT+47*, EXTRACT+48
SAVMONTH EXTRACT+4~, EXTRACT+15*, EXTRACT+18, EXTRACT+23*
SSN EXTRACT+3~, EXTRACT+33*, EXTRACT+34, EXTRACT+55, EXTRACT+56, EXTRACT+77, EXTRACT+78, OUTPUT+8~, OUTPUT+14*, OUTPUT+15*
, OUTPUT+16, OUTPUT+17, OUTPUT+21
STARTDT INTRO+4~, INTRO+6*, INTRO+11, EXTRACT+3~, EXTRACT+12*, EXTRACT+13*, EXTRACT+14
STATUS EXTRACT+3~, EXTRACT+29*, EXTRACT+30, EXTRACT+31
STOP ENTRY+1~, ENTRY+4, ENTRY+6, INIT+2*, INTRO+26*, GET1+22*, GET1+23*
SVCDT OUTPUT+8~, OUTPUT+18*, OUTPUT+23
TOTBILLS EXTRACT+4~, EXTRACT+5*, EXTRACT+27*, EXTRACT+86
TOTRECS EXTRACT+4~, EXTRACT+5*, EXTRACT+55*, EXTRACT+77*, EXTRACT+87
U EXTRACT+8, EXTRACT+29, EXTRACT+32, EXTRACT+33, EXTRACT+42, EXTRACT+48, EXTRACT+64, EXTRACT+66, EXTRACT+71
X INTRO+4~, GETPATH+3~, EXTRACT+4~, OUTPUT+8~, OUTPUT+21*, OUTPUT+22*, OUTPUT+23*
X1 OUTPUT+8~, OUTPUT+21*, OUTPUT+22*, OUTPUT+23*
X2 OUTPUT+8~
X3 OUTPUT+8~
X4 OUTPUT+8~, OUTPUT+21*, OUTPUT+22*, OUTPUT+23*
Y INTRO+4~, INTRO+6*, INTRO+7*, INTRO+26, GETPATH+3~, GET1+26, GET1+65, EXTRACT+4~, EXTRACT+8, EXTRACT+19*
, EXTRACT+20, EXTRACT+21, OUTPUT+8~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All