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

Package: Registration

Routine: DGPLBL


Information

DGPLBL ;ALB/RPM - PATIENT INFORMATION LABELS ; 05/07/04

Source Information

Source file <DGPLBL.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;main entry point used by DG PRINT PATIENT LABEL option
START ;retrieve label field data and print labels
  • ICR #5904
    • Status: Active
    • Usage: Private
    SELPATS(DGARR) ;select patient(s) to print
    ASK(DGDIRA,DGDIRB,DGDIR0,DGDIRH) ;
    ; Input
    ; DGDIR0 - DIR(0) string
    ; DGDIRA - DIR("A") string
    ; DGDIRB - DIR("B") string
    ; DGDIRH - DIR("?") string
    LOADCC(DGIOCC) ;load control code mnemonics array
    ; This function loads values from the CONTROL CODE (#2) subfield of
    ; the CONTROL CODES (#55) field of the TERMINAL TYPE (#3.2) file into
    ; an array subscripted by the CONTROL CODE ABBREVIATION (#.01) subfield
    ; value.
    BLDLNAR(DGDFN,DGLOC,DGTEXT) ;build array of text lines
    END ;cleanup and close device

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: $G(DGLINE(DGLN))
    • Line Location: START+37
    Function Call: WRITE
    • Prompt: !
    • Line Location: START+40
    Function Call: WRITE
    • Prompt: !
    • Line Location: START+42

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DPT - [#2] Classic Fileman Calls
    Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call