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

Package: Emergency Department Integration Software

Routine: EDPYPRE


Information

EDPYPRE ;SLC/KCM - Pre init for facility install ;2/28/12 08:33am

Source Information

Source file <EDPYPRE.m>

Entry Points

Name Comments DBIA/ICR reference
DELFLDS ; delete obsolete fields
DELCODES ; delete site code sets
CHGNAMES ; change code names
CHG(OLD,NEW) ; change old to new name
VERSRV()
FIX233() ;
DISP(IEN) ;
EDFLD(IEN,FLD) ;
VERGTE(HIGH) ; Return 1 if existing version and greater than HIGH
FIXT5 ; convert the timezone offset to visit string
; (change occurred between T5 and T6)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?2,"NAME: ",?20,$G(DATA(233.1,IENS,.01,"E"))
  • Line Location: DISP+4
Function Call: WRITE
  • Prompt: !,?2,"DISPLAY NAME:",?20,$G(DATA(233.1,IENS,.02,"E"))
  • Line Location: DISP+5
Function Call: WRITE
  • Prompt: !,?2,"ABBREVIATION:",?20,$G(DATA(233.1,IENS,.03,"E")),!
  • Line Location: DISP+6
Function Call: WRITE
  • Prompt: !!,"You must correct the following fields before continuing:",!
  • Line Location: EDFLD+3
Function Call: WRITE
  • Prompt: !!!
  • Line Location: EDFLD+6
Function Call: WRITE
  • Prompt: !,?10,"Another user is editing this entry. Please try again later.",!!
  • Line Location: EDFLD+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(19 - [#19] FIND^DIC
^EDPB(233.1 - [#233.1] GET1^DIQ,  GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call