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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: ECPRVMUT

Package: Event Capture

Routine: ECPRVMUT


Information

ECPRVMUT ;ALB/JAM - Event Capture Multiple Provider Utilities ;24 Aug 05

Source Information

Source file <ECPRVMUT.m>

Entry Points

Name Comments DBIA/ICR reference
GETPRV(ECIEN,OUTARR) ;Returns providers associated with an encounter
  • ICR #4460
    • Status: Active
    • Usage: Supported
    GETPPRV(ECIEN,ECPPROV) ;returns primary provider associated with an encounter
    ; Input: ECIEN - IEN entry in file 721/^ECH(
  • ICR #4460
    • Status: Active
    • Usage: Supported
    FILPRV(ECIEN,ECPRVARY,ECOUT) ;File multiple providers for an encounter
    ; Input: ECIEN - IEN entry in file 721/^ECH(
    ; ECPRVARY - array with providers
    ; ECOUT - Error flag (1/0)
  • ICR #4460
    • Status: Active
    • Usage: Supported
    DSPPRV ;Display providers
    ASKPRV(ECIEN,ECDT,ECPRVARY,ECOUT) ;ask provider question (primary and multiple secondary)
    ; Variables: ECIEN - IEN entry in file 721/^ECH(
    ; ECDT - date/time of encounter
    ; ECPRVARY - array with providers
    ; ECOUT - Error flag (1/0)
  • ICR #4460
    • Status: Active
    • Usage: Supported
    PPRV ;Ask primary provider
    ; Variables: ECPRV = Primary provider ien
    ; ECPRVN = Primary provider descript, default if define
    ; ECPRVARY= Array with providers
    ; subscript=provider IEN,
    ; data=(P)rimary_^_provider description
    ; ECOUT = Error flag (1/0)
    ;
    SPRV ;Ask secondary provider(s)
    ; Variables: ECPRV = Primary provider ien, default if define
    ; ECPRVARY= Array with providers
    ; subscript=provider IEN,
    ; data=(S)econdary_^_provider description
    PRVHLP ;Help for Provider Code
    COMP(ECUX,ECDTX) ;get provider information, similar to COMP^ECPRVUTL
    DSP1416(ECPRVARY) ;Display providers for data entry options
    DSP1442(ECPRVARY) ;Display providers for data entry options
    DSP1444(ECPRVARY) ;Display providers for data entry options

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: "Encounter Providers"
    • Line Location: DSPPRV+2
    Function Call: WRITE
    • Prompt: " (Primary)"
    • Line Location: DSPPRV+5
    Function Call: WRITE
    • Prompt: " Provider already entered as primary."
    • Line Location: SPRV+20
    Function Call: WRITE
    • Prompt: " Provider flag as primary. Can't delete."
    • Line Location: SPRV+23
    Function Call: WRITE
    • Prompt: " (Primary)"
    • Line Location: PRVHLP+6
    Function Call: WRITE
    • Prompt: !?1,"You may enter a new Provider, if you wish. Enter the secondary Provider"
    • Line Location: PRVHLP+7
    Function Call: WRITE
    • Prompt: !?1,"for this procedure."
    • Line Location: PRVHLP+8

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^VA(200 - [#200] GET1^DIQ
    ^ECH - [#721] GETS^DIQ
    Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call