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

Package: ICD 9 Updates

Routine: AUMDO1


Information

AUMDO1 ; IHS/OIRM/DSD/JCM,AEF - UPDATE ICD0 AND ICD9 GLOBALS ; [ 12/03/1998 2:35 PM ]

Source Information

Source file <AUMDO1.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
ICD 9 Updates 2 HDR^AUMDO  EN^AUMDO1D  
Utilities 1 EN^AUMDO1A  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
ICD 9 Updates 1 AUMDO  

Entry Points

Name Comments DBIA/ICR reference
PROCICD ; DO SUBROUTINES TO UPDATE THIS ENTRY
SPECNOTE ; SPECIAL NOTE FOR PROGRAMMERS
; ***NOTE - ALL VARIABLES ARE IN THE AUMDO("variable name') ARRAY
EN ; ENTRY POINT FROM EN+3^AUMDO
; GET ICD CODE FROM UPDATE GLOBAL
TALLY ; COUNT UPDATES (GOOD,BAD)
TOTALS ; DISPLAY TOTALS

External References

Name Field # of Occurrence
HDR^AUMDO PROCICD+2, TOTALS+2
EN^AUMDO1A PROCICD+5
EN^AUMDO1D PROCICD+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"ENTRY NOT PERMITTED HERE (^AUMDO1)",!
  • Line Location: AUMDO1+2
Function Call: WRITE
  • Prompt: !,"Updating "_AUMDO("ICD FILE")_" code "_AUMDO("ICD CODE")
  • Line Location: PROCICD+2
Function Call: WRITE
  • Prompt: ?44,$E(AUMDO("ICD FILE"),4)_" BA X-Ref null"
  • Line Location: PROCICD+3
Function Call: WRITE
  • Prompt: ?70," **ERROR**",!
  • Line Location: TALLY+1
Function Call: WRITE
  • Prompt: ?70," - OK -",!
  • Line Location: TALLY+3
Function Call: WRITE
  • Prompt: !,AUMDO("DASHES"),!,?25,"E N D O F U P D A T E",!,AUMDO("DASHES")
  • Line Location: TOTALS+1
Function Call: WRITE
  • Prompt: !,"Total "_AUMDO("ICD FILE")_" update entries = ",AUMDO("TOTAL UPDATE RECORDS")
  • Line Location: TOTALS+3
Function Call: WRITE
  • Prompt: !,"Total "_AUMDO("ICD FILE")_" updates posted = ",AUMDO("TOTAL GOOD UPDATE RECORDS"),!,"Total "_AUMDO("ICD FILE")_" updates failed = ",AUMDO("TOTAL BAD UPDATE RECORDS"),!
  • Line Location: TOTALS+4
Function Call: WRITE
  • Prompt: !,"Total Add update actions = ",AUMDO("TOTAL ADDS"),!,"Total Add/Replace update actions = ",AUMDO("TOTAL ADD/REPLACE"),!,"Total Change update actions = ",AUMDO("TOTAL CHANGES"),!
  • Line Location: TOTALS+5
Function Call: WRITE
  • Prompt: !,"There were errors encountered during this update.",!,"Review the error report for specific errors.",!
  • Line Location: TOTALS+6

Label References

Name Line Occurrences
PROCICD EN+2
TOTALS EN+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AUMDO("ACTIVE" PROCICD+4*
>> AUMDO("ADD!A/R" PROCICD+4*
>> AUMDO("ADD" PROCICD+4*
>> AUMDO("ADD/REPLACE" PROCICD+4*
>> AUMDO("CHANGE" PROCICD+4*
>> AUMDO("DASHES" TOTALS+1
>> AUMDO("ICD CO DE" , EN+2*, PROCICD+2
>> AUMDO("ICD DF N" , PROCICD+7
>> AUMDO("ICD FI LE" , PROCICD+2, PROCICD+3, TOTALS+3, TOTALS+4
>> AUMDO("INACTIVE" PROCICD+4*
>> AUMDO("L" EN+2*
>> AUMDO("QUIT" PROCICD+3*, PROCICD+4*, TALLY+1
>> AUMDO("SUPERCEDED" PROCICD+4*
>> AUMDO("TOTAL ADD/REPLACE" , TOTALS+5, ADDS" , TOTALS+5, BAD UPDATE RECORDS" , TALLY+1*, TOTALS+4, TOTALS+6, CHANGES" , TOTALS+5
, GOOD UPDATE RECORDS" , TALLY+2*, TOTALS+4, UPDATE RECORDS" , PROCICD+1*, TOTALS+3
>> AUMDO("UPD DF N" , EN+2*, PROCICD+3, PROCICD+7
>> AUMDO("UPD GL REF" , EN+2
>> AUMDO("VA EXP ANDED" , PROCICD+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All