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 |  Local Variables |  All
Print Page as PDF
Routine: DGPTF5

Package: Registration

Routine: DGPTF5


Information

DGPTF5 ;ALB/MTC/PLT - PTF ENTRY/EDIT-4 ;07 JUN 91

Source Information

Source file <DGPTF5.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
DRG Grouper 3 $$CODEN^ICDEX  $$GETDATE^ICDGTDRG  $$ICDDATA^ICDXCODE  
Registration 3 CLS^DGPTC1  $$IMPDATE^DGPTIC10  RTY^DGPTUTL  
VA FileMan 2 ^DIC  YN^DICN  
Lexicon Utility 1 CONFIG^LEXSET  

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

Package Total Caller Graph
Registration 3 ^DGPT  DGPTF4  DGPTFIC  

Entry Points

Name Comments DBIA/ICR reference
ICDEN ;enter icd codes
CEN ;
GET9Q ; exit point
GETICD9(EFFDATE) ;enter icd codes
ICDEN1 ;enter icd codes for DRG
; called from DGPTFIC and DGPTDRG
; removed kills to X and Y and set for DIC("A")to suppress prompts DG*5.3*850
ASK
Z
Z1

External References

Name Field # of Occurrence
CLS^DGPTC1 ASK+2
$$IMPDATE^DGPTIC10 ICDEN1+6
RTY^DGPTUTL ASK+2
^DIC ICDEN+10, ICDEN1+20, GETICD9+7
YN^DICN ASK
$$CODEN^ICDEX GETICD9+10
$$GETDATE^ICDGTDRG ICDEN+4, ICDEN+6, ICDEN+7
$$ICDDATA^ICDXCODE ICDEN1+24
CONFIG^LEXSET ICDEN+4, ICDEN+6, ICDEN+7, ICDEN1+18, GETICD9+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @DGVI,Z,@DGVO
  • Line Location: Z+0
Function Call: WRITE
  • Prompt: " "
  • Line Location: Z+1
Function Call: WRITE
  • Prompt: Z
  • Line Location: Z1+1
Function Call: WRITE
  • Prompt: !!,*7,"Record #",PTF," MUST be closed for CENSUS first.",!
  • Line Location: CEN+1
Function Call: WRITE
  • Prompt: !,"Would you like to close this record for CENSUS"
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !?5,"Answer 'YES' to close record for CENSUS also",!?5," or 'NO' to not close this record at all."
  • Line Location: ASK+1
Routine Call
  • DIC
  • Line Location:
    • ICDEN+10
    • ICDEN1+20
    • GETICD9+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LEX(757.01 - [#757.01] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPT - [#45] ICDEN+6

Label References

Name Line Occurrences
ASK ASK+1
GET9Q GETICD9+2, GETICD9+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ASK*, ASK+1, ASK+2
CUR GETICD9+1~
>> DA ICDEN+4, ICDEN+6, ICDEN+7
>> DA(1 ICDEN+4
>> DGDAT ICDEN1+4*, ICDEN1+5, ICDEN1+10, ICDEN1+11
>> DGN Z
>> DGPTF ICDEN+4
DGRTY ASK+3!
DGRTY0 ASK+3!
DGTEMP ICDEN1+3~, ICDEN1+6*, ICDEN1+7
>> DGVI Z
>> DGVO Z
DGXT GETICD9+1~, GETICD9+9*, GETICD9+10
DGY GETICD9+1~
DIC ICDEN+2~, ICDEN+8*, ICDEN1+3~, ICDEN1+19*, GETICD9+1~, GETICD9+4*
DIC("A" ICDEN+9*, ICDEN1+17*, GETICD9+5*
DIC(0 ICDEN+8*, ICDEN1+19*, GETICD9+4*
DISYS GETICD9+1~
DO GETICD9+1~
DT ICDEN1+4
EFFDATE ICDEN1+3~, ICDEN1+5*, ICDEN1+18, ICDEN1+24, GETICD9~, GETICD9+3, GETICD9+6
>> I Z1*
ICDV GETICD9+1~
IMPDATE ICDEN1+3~, ICDEN1+7*, ICDEN1+10, ICDEN1+11
IOST Z
LEXQ GETICD9+1~
LEXVDT ICDEN1+3~, ICDEN1+25!, GETICD9+1~, GETICD9+6*
>> PROMPT ICDEN1+17
>> PTF CEN+1, ICDEN+6
TERM ICDEN1+3~, ICDEN1+10*, ICDEN1+11*, ICDEN1+18, ICDEN1+22, ICDEN1+23
U ICDEN1+7
>> X ICDEN+1, ICDEN+2*, ICDEN+8, ICDEN+11*, ICDEN+12*, ICDEN1+19, ICDEN1+21*, ICDEN1+22*, ICDEN1+23*, ICDEN1+24
, GETICD9+2*, GETICD9+4, GETICD9+8*, GETICD9+10*, GET9Q+1
Y ASK+2*, ICDEN+2~, ICDEN+11, ICDEN1+21, ICDEN1+24*, GETICD9+1~, GETICD9+8
Y(1 ICDEN+12, ICDEN1+22, GETICD9+9
Y(30 ICDEN1+23
>> Z Z*, Z1*, Z1+1
>> Z1 Z1
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 |  Local Variables |  All