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

Package: Integrated Billing

Routine: IB20PT86


Information

IB20PT86 ;ALB/CPM - EXPORT ROUTINE 'DGPTUTL' ; 14-FEB-94

Source Information

Source file <IB20PT86.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Registration 4 $$LST^DGMTU  (DC,SUF)^DGPTF  LE^DGPTTS  $$SITE^VASITE  
VA FileMan 1 ^DIE  

Entry Points

Name Comments DBIA/ICR reference
D
EXPL ; -- explode string A(input) to DGA(output)
DIE
FMT ; -- determime PTF record format
UPDT ; -- update PTF record w/PTF and DFN defined
HANG ;
EXPL1 ; -- explode string 'L' of form "1-12" ; input and output is 'L'
UPDTQ
MT ;Determine and store Means Test Indicator
AS
FDT ; -- set new format date for testing
DGPTUTL ;ALB/AS - PTF UTILITY ROUTINE ; 12/13/89@8
CEN ; -- find current active census ; return ifn and 0th node
EXPL1Q
RTY ; -- set rec type variables
; input: Y := rec type #
; output: DGRTY := rec type #
; DGRTY0 := name of type (in future, may expand to 0th node)
PM ;sets variables from ^DGPM global

External References

Name Field # of Occurrence
$$LST^DGMTU MT+5
DC^DGPTF UPDT+8
SUF^DGPTF UPDT+8
LE^DGPTTS UPDT+8
^DIE DIE, DIE+1
$$SITE^VASITE DIE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"===> this patient has a blank Eligibility Code"
  • Line Location: AS+3
Function Call: READ
  • Timeout: 4
  • Variable: DGPTHANG
  • Line Location: HANG+1
Routine Call
  • DIE
  • Line Location:
    • DIE
    • DIE+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGPT - [#45] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(43 - [#43] MT+4
^DG(45.86 - [#45.86] CEN+1
^DGP(45.84 - [#45.84] UPDT+4
^DGPM - [#405] PM+1
^DGPM("APTF" PM+1
^DGPT - [#45] MT+3, MT+5, DIE, DIE+1, UPDT+1, UPDT+8
^DIC(42 - [#42] MT+4
^DIC(45.1 - [#45.1] MT+3
^DIC(8 - [#8] MT+1
^DPT - [#2] MT+1, AS

Label References

Name Line Occurrences
AS MT+5
DIE MT+1, MT+2, MT+3, MT+4, MT+6, AS, AS+1, AS+2
EXPL1 EXPL+2
EXPL1Q EXPL1+2, EXPL1+3, EXPL1+4
FDT FMT+3
PM UPDT+7
UPDTQ UPDT+1, UPDT+3, UPDT+5, UPDT+6

Naked Globals

Name Field # of Occurrence
^( MT+1, AS
^(0 PM+1, MT+1, MT+3, MT+4, CEN+1, UPDT+2
^(101 MT+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % D*
>> A EXPL+1
AD UPDT+4*, UPDTQ!
AGE UPDTQ!
D0 UPDTQ!
D1 UPDTQ!
DA DIE*!, DIE+1*, DIE+2!, UPDTQ!
>> DFN MT+1, MT+5, AS
DFN1 UPDTQ!
DFN2 UPDTQ!
DG UPDTQ!
DG1 DIE!, DIE+2!
>> DGA EXPL+1*, EXPL+2*
DGADM MT+2, MT+4, UPDT+4*, UPDTQ!
>> DGBGJ DIE
>> DGCN CEN+1*
>> DGCN0 CEN+1*
DGLAST UPDTQ!
>> DGLN AS+3
DGP UPDTQ!
DGPMAN PM+1*, MT+4, UPDT+7~
DGPMCA PM+1*, UPDT+7~, UPDT+8
DGPTFE UPDT+4*, UPDT+6, UPDTQ!
>> DGPTFMT FMT+3*, FMT+4*
DGPTHANG HANG+1*!
>> DGRTY RTY+5*, RTY+6*
>> DGRTY0 RTY+5*, RTY+6*
DGST UPDT+4*, UPDT+5, UPDTQ!
DGT MT+5*, DIE!, DIE+2!
DGTY UPDTQ!
DGX MT+1*, MT+2*, MT+3*, MT+4*, MT+6*, AS*, AS+1*, AS+2*, AS+3*, DIE!
, DIE+1, DIE+2!, UPDTQ!
DGZ AS*, DIE!, DIE+2!
DGZ1 MT+5*, MT+6, DIE!, DIE+2!
DGZEC MT+1*, AS+1, AS+2, DIE!, DIE+2!
DI UPDTQ!
DIC UPDTQ!
DIE DIE*!, DIE+1*, DIE+2!, UPDTQ!
DIG UPDTQ!
DIH UPDTQ!
DIK UPDTQ!
DIKLM UPDTQ!
DIS2 UPDTQ!
DISYS UPDTQ!
DIU UPDTQ!
DIV UPDTQ!
DIW UPDTQ!
DIWL UPDTQ!
DIWR UPDTQ!
DIWT UPDTQ!
DN UPDTQ!
DOB UPDTQ!
DQ UPDTQ!
DR DIE*!, DIE+1*, DIE+2!, UPDTQ!
DRG UPDTQ!
DT FMT+2
I EXPL1+1~, EXPL1+5*
I1 UPDTQ!
J EXPL+1~, EXPL+2*
L UPDTQ!, EXPL+1~, EXPL+2*, EXPL1+2*, EXPL1+3*, EXPL1+4*, EXPL1+5, EXPL1+6*
P1 UPDTQ!
PR UPDTQ!
>> PTF PM+1, MT+3, MT+5, DIE, DIE+1, UPDT+1, UPDT+3, UPDT+4, UPDT+5, UPDT+6
, UPDT+8
SEX UPDTQ!
TDD UPDTQ!
TY UPDTQ!
U MT+1, MT+4, MT+6, AS, AS+1, DIE, UPDT+3, UPDT+4, UPDT+8
X UPDT+2*, UPDT+3, UPDT+4, EXPL+2*, EXPL1+1~, EXPL1+5*, EXPL1+6
>> Y D*, D+1*, RTY+5, RTY+6, FMT+2, FMT+4, FDT+1*
Z FMT+2*, FMT+4, FMT+5!
>> ZTQUEUED UPDT+1, UPDT+3, UPDT+5, UPDT+6
Info |  Source |  Call 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