Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: GMPL31P

Package: Problem List

Routine: GMPL31P


Information

GMPL31P ;SLC/JEH -- Post Install Routine ;3/1/05 11:00

Source Information

Source file <GMPL31P.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;ENTRY POINT
AUDTCLN ;
FIND ;
FDAUDIT ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"THE FOLLOWING PROBLEM LIST ENTRIES CONTAINED BAD ICD9 POINTERS"
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !,"AND HAVE BEEN MODIFIED WITH A CORRECTED POINTER",!
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !,"PROBLEM IEN BAD POINTER CORRECTED POINTER"
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !,"___________ ___________ _______________"
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !!,"TOTAL ITEMS WORKED = "_TOTALWK
  • Line Location: EN+23
Function Call: WRITE
  • Prompt: !,"TOTAL ITEMS ADJUSTED = "_ADJUSTED
  • Line Location: EN+24
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+25
Function Call: WRITE
  • Prompt: !,"THE FOLLOWING PROBLEM LIST AUDIT ENTRIES CONTAINED BAD ICD9 POINTERS"
  • Line Location: AUDTCLN+5
Function Call: WRITE
  • Prompt: !,"AND HAVE BEEN MODIFIED WITH A CORRECTED POINTER",!
  • Line Location: AUDTCLN+6
Function Call: WRITE
  • Prompt: !,"PROBLEM IEN BAD POINTER CORRECTED POINTER"
  • Line Location: AUDTCLN+7
Function Call: WRITE
  • Prompt: !,"___________ ___________ _______________"
  • Line Location: AUDTCLN+8
Function Call: WRITE
  • Prompt: !!,"TOTAL AUDIT ITEMS WORKED = "_TOTALWK
  • Line Location: AUDTCLN+38
Function Call: WRITE
  • Prompt: !,"TOTAL AUDIT ITEMS ADJUSTED = "_ADJUSTED
  • Line Location: AUDTCLN+39
Function Call: WRITE
  • Prompt: !,"AN ITEM IEN MAY APPEAR UP TO 2 TIMES ONE FOR EACH BAD PIECE"
  • Line Location: AUDTCLN+40
Function Call: WRITE
  • Prompt: !,"AS THE FIFTH AND SIXTH PIECES ARE CHECKED"
  • Line Location: AUDTCLN+41
Function Call: WRITE
  • Prompt: !,IEN,?10,$P(^AUPNPROB(IEN,0),"^")
  • Line Location: FIND+8
Function Call: WRITE
  • Prompt: !,IEN,?10,$P(^AUPNPROB(IEN,0),"^")
  • Line Location: FIND+9
Function Call: WRITE
  • Prompt: !,"TOTAL ITEMS LOOKED AT = "_TOTALWK
  • Line Location: FIND+10
Function Call: WRITE
  • Prompt: !,"TOTAL BAD POINTERS FOUND = "_ADJUSTED
  • Line Location: FIND+11
Function Call: WRITE
  • Prompt: !,IEN,?10,$P(^GMPL(125.8,IEN,0),"^")
  • Line Location: FDAUDIT+8
Function Call: WRITE
  • Prompt: !,IEN,?10,$P(^GMPL(125.8,IEN,0),"^")
  • Line Location: FDAUDIT+9
Function Call: WRITE
  • Prompt: !,IEN,?10,$P(^GMPL(125.8,IEN,0),"^",5)
  • Line Location: FDAUDIT+10
Function Call: WRITE
  • Prompt: !,IEN,?10,$P(^GMPL(125.8,IEN,0),"^",5)
  • Line Location: FDAUDIT+11
Function Call: WRITE
  • Prompt: !,IEN,?10,$P(^GMPL(125.8,IEN,0),"^",6)
  • Line Location: FDAUDIT+12
Function Call: WRITE
  • Prompt: !,IEN,?10,$P(^GMPL(125.8,IEN,0),"^",6)
  • Line Location: FDAUDIT+13
Function Call: WRITE
  • Prompt: !,"TOTAL ITEMS LOOKED AT = "_TOTALWK
  • Line Location: FDAUDIT+14
Function Call: WRITE
  • Prompt: !,"TOTAL BAD POINTERS FOUND = "_ADJUSTED
  • Line Location: FDAUDIT+15
Info |  Source |  Entry Points |  Interaction Calls