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

Package: IHS ICD CPT Lookup and Grouper

Routine: AICDGRP2


Information

AICDGRP2 ; IHS/OHPRD/GIS - SUPERGROUPER DRGs REG-DAK/AVAMC 2/27/83 ;

Source Information

Source file <AICDGRP2.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA Fileman 1 YN^DICN  

Caller Graph

Caller Graph Total: 1

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

Entry Points

Name Comments DBIA/ICR reference
QQ
DAM
ALIVE
SEX
Q
TAC
ASK
TRS
CHECK

External References

Name Field # of Occurrence
YN^DICN CHECK, ALIVE, TRS, TAC, DAM

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Age: "
  • Formatting: !!
  • Timeout: 60
  • Variable: AGE
  • Line Location: ASK+0
Function Call: READ
  • Prompt: "Sex (M or F): "
  • Formatting: !
  • Timeout: 60
  • Variable: SEX
  • Line Location: SEX+0
Function Call: WRITE
  • Prompt: *7,!!,"Enter M for male or F for female"
  • Line Location: SEX+0
Function Call: WRITE
  • Prompt: !,"Answer Yes or No"
  • Line Location: CHECK+0
Function Call: WRITE
  • Prompt: !,"Answer Yes or No"
  • Line Location: ALIVE+0
Function Call: WRITE
  • Prompt: !!,"Enter 'Y' if the patient was discharged to transfer, 'N' if not.",!,*7
  • Line Location: TRS+0
Function Call: WRITE
  • Prompt: !!,"Enter 'Y' if the patient was transfered to an acute care facility, 'N' if not.",!,*7
  • Line Location: TAC+0
Function Call: WRITE
  • Prompt: !!,"Enter 'Y' if the patient left against medical advice, 'N' if not.",!,*7
  • Line Location: DAM+0

Label References

Name Line Occurrences
ALIVE ALIVE
ASK ASK
CHECK CHECK
DAM TRS+1, DAM
QQ ASK, SEX, CHECK, ALIVE, TRS, TAC, DAM
SEX SEX
TAC TAC
TRS TRS

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % CHECK*, CHECK+1, ALIVE*, ALIVE+1, TRS*, TRS+1, TAC*, TAC+1, DAM*, DAM+1
>> AGE ASK*
AICDQUIT AICDGRP2+5!, QQ*
>> DAM CHECK+1*, ALIVE+1*, DAM+1*
DGFLG ALIVE+1!, DAM+2
>> DGQU Q*
>> EXP CHECK+1*, ALIVE+1*
>> SEX SEX*
>> TAC TRS+1*, TAC+1*
>> TRS CHECK+1*, ALIVE+1*, TRS+1*
>> X ALIVE
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All