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

Package: IHS ICD CPT Lookup and Grouper

Routine: AICDGRP


Information

AICDGRP ; IHS/OHPRD/GIS - SUPERGROUPER: GROUPER WITH SMART DX AND OP LOOKUP AND PRIORITIZED DISPLAY OF ALL DRG DIAGNOSES ; [ 01/09/2003 4:09 PM ]

Source Information

Source file <AICDGRP.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
IHS ICD CPT Lookup and Grouper 2 DXS^AICDGRP1  ^AICDGRP2  
Kernel 1 ^%ZIS  
VA Fileman 1 ^%DT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS ICD CPT Lookup and Grouper 1 AICDGRP1  

Entry Points

Name Comments DBIA/ICR reference
Q ;EP ;AICD*3.51*6
DXS ;EP ;AICD*3.51*6
NOTES ; CALLS %ZIS,%DT,%DTC,DGDRG*,DIC,AICDGRP2
; BE SURE TO INCLUDE THE ROUTINE AICDGRP2 TO STREAMLINE THE DATA ENTRY PROCESS
; SUGGEST YOU SET AICDHLIM TO LIMIT SEARCH TO 20 CHOICES TO AVOID CONFUSION
; MORE+6 FIXED ON 4/6/88 TO PREVENT UNDEF ERROR [TAC]
; MODIFIED AGAIN BY GIS/TPA 6/6/88 TO PREVENT UNDEF ERROR WHEN MULTIPLE PROCEDURES ARE ENTERED (468+1)
PAT ;EP ;AICD*3.51*6
KILLS

External References

Name Field # of Occurrence
^%DT AICDGRP+8
^%ZIS AICDGRP+5
DXS^AICDGRP1 DXS+1
^AICDGRP2 PAT+2

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Variable: W#3
  • Line Location: AICDGRP+6
Function Call: WRITE
  • Prompt: !!?21,"DRG PRIORITIZER VERSION 1.0",!!!
  • Line Location: AICDGRP+8
Function Call: WRITE
  • Prompt: !
  • Line Location: PAT+2
Function Call: WRITE
  • Prompt: !!,"Leaving DRG Grouper.",!
  • Line Location: Q+2
Routine Call
  • %ZIS
  • Line Location:
    • AICDGRP+5

Label References

Name Line Occurrences
KILLS PAT+1, Q+1
Q PAT+3, PAT+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% KILLS+1!
%DT AICDGRP+8*, KILLS+1!
%Y KILLS+1!
AGE PAT+4, KILLS+1!
AICDDX KILLS!
AICDE KILLS!
AICDI KILLS!
AICDJ KILLS!
AICDK KILLS!
AICDL KILLS!
AICDN KILLS!
AICDPRMT KILLS+1!
AICDQUIT PAT+3!
AICDTOT KILLS!
C KILLS+1!
CC PAT+5!
DAM KILLS+1!
DGFLG KILLS+1!
DGQU PAT+2*, KILLS+1!
DIC PAT+5!, KILLS+1!
DRGCAL KILLS+1!
DT AICDGRP+8*
DTIME AICDGRP+7*
ELIM KILLS+1!
EXP KILLS+1!
I KILLS+1!
IOF AICDGRP+5
>> IOP AICDGRP+5*
L KILLS+1!
>> LINE AICDGRP+6*
MDC KILLS+1!
NDR PAT+5!, KILLS+1!
NOR PAT+5!, KILLS+1!
NSD PAT+5!, KILLS+1!
OR KILLS+1!
ORG PAT+5!, KILLS+1!
PD KILLS+1!
POP KILLS+1!
PT PAT+2*, KILLS+1!
Q KILLS+1!
RG PAT+5!, KILLS+1!
S KILLS+1!
SD KILLS+1!
SD1 KILLS+1!
SEX KILLS+1!
T KILLS+1!
TAC KILLS+1!
TRS KILLS+1!
U AICDGRP+8*
W KILLS+1!
WD2 KILLS+1!
>> X AICDGRP+8*
Y AICDGRP+8, KILLS+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All