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

Package: Scheduling

Routine: SDAMBAE3


Information

SDAMBAE3 ;ALB/BOK/MJK - ADD/EDIT CON'T ;7/8/91 12:18 ;

Source Information

Source file <SDAMBAE3.m>

Entry Points

Name Comments DBIA/ICR reference
DUP ; -- inp transform to check for duplicate CPTs in ^DD(409.51,21:25,0)
; variable '%' is passed and defined as the piece beinging edited
DUPQ
DUPMES ;
SCREEN ; -- screen logic for 409.51 proc fields
; finds status for effective date DA(1)
  • ICR #1993
    • Status: Retired
    • Usage: Private
    ID ; -- DIC("W") logic for amb proc look-ups
  • ICR #1993
    • Status: Retired
    • Usage: Private

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !?2,*7,"WARNING: '",$P(SDX,U,3),"' has already been entered for this",!?11,"patient on this VISIT DATE(Entry #",C,").",!!?11,"Procedure will be added again."
    • Line Location: DUPMES+2
    Function Call: WRITE
    • Prompt: ?4,$P(SDICPT1,U,3)
    • Line Location: ID+4
    Function Call: WRITE
    • Prompt: !?10,"** INACTIVE **"
    • Line Location: ID+5
    Function Call: WRITE
    • Prompt: !?10,SDICPT(SDIX)
    • Line Location: ID+8
    Function Call: WRITE
    • Prompt: !?9
    • Line Location: ID+10
    Info |  Source |  Entry Points |  Interaction Calls