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

Package: Registration

Routine: DGPTFCR


Information

DGPTFCR ;ALB/JDS - CREATE IN PATIENT PTF RECORD ;Sep 22, 2020@16:34

Source Information

Source file <DGPTFCR.m>

Entry Points

Name Comments DBIA/ICR reference
EN
Q
SEL ; -- pt select
SELQ ; -- clean-up
CREATE ; -- entry point to create a new PTF record
; input: DFN := pt number
; Y := admission d/t ^ fee record
; DGRTY := type of record (1-PTF ; 2-CENSUS)
; (PTF assumed if undefined)
; output: Y := ifn of ^DGPT
  • ICR #226
    • Status: Retired
    • Usage: Private
    CREATEQ

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !
    • Line Location: SEL+1
    Function Call: WRITE
    • Prompt: !
    • Line Location: SEL+7
    Function Call: WRITE
    • Prompt: !!?5,"Creating new PTF record..."
    • Line Location: SEL+14
    Function Call: WRITE
    • Prompt: *7,"unable to create record."
    • Line Location: SEL+15
    Function Call: WRITE
    • Prompt: !?5,"record #",PTF," created.",!
    • Line Location: SEL+17

    FileMan Files Accessed Via FileMan Db Call

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