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

Package: General Medical Record - Generator

Routine: GMRGTGI0


Information

GMRGTGI0 ;CISC/RM-PRIME DOCUMENT EDIT (cont.) ;1/9/89

Source Information

Source file <GMRGTGI0.m>

Entry Points

Name Comments DBIA/ICR reference
CHK ; CHECK FOR DUPLICATE .01 FIELD, IF THE SAME SET GMRGOUT=1
DUPOK
CHDUP ;
DUPRO ;
DUPYN
DUPFND ;
DF ;
INFOSET ; FOR AN AGGY TERM WITH ENTRY OF GMRGINFO, WILL SET GMRGINFO ARRAY
SETSEL ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$C(7),"By changing '"_$P(GMRGINFO("TEXT"),"^")_"' to '"_GMRGT_"'",!,"you may have created a duplicate term."
  • Line Location: CHK+6
Function Call: WRITE
  • Prompt: !,"Would you like to look at the list of possible duplicates"
  • Line Location: DUPOK+0
Function Call: WRITE
  • Prompt: !?3,$C(7),"Answer 'YES' if you think you may want to use one of the duplicates",!?3,"instead of this term, answer 'NO' if you want to change the text of",!?3,"the term you are presently editing."
  • Line Location: DUPOK+1
Function Call: WRITE
  • Prompt: " If you meant to use one of the ",!,"following selections instead enter the appropriate number, else press '^'.",!
  • Line Location: CHDUP+1
Function Call: WRITE
  • Prompt: !!,GMRGT
  • Line Location: DUPRO+1
Function Call: WRITE
  • Prompt: !?5,"Answer Yes if you want to use the above selection instead of creating",!?5,"a duplicate, answer No if you want to create a duplicate."
  • Line Location: DUPYN+1
Function Call: WRITE
  • Prompt: !?5,$C(7),"ADDING THIS TERM WOULD CREATE AN INVALID DATA CONDITION, CANNOT ADD!!"
  • Line Location: DUPFND+2
Function Call: WRITE
  • Prompt: !,".replacing '",$P(GMRGINFO("TEXT"),"^"),"' with '",Y(0,0),"'."
  • Line Location: DUPFND+3
Function Call: WRITE
  • Prompt: "."
  • Line Location: DUPFND+4
Function Call: WRITE
  • Prompt: "."
  • Line Location: DUPFND+5
Function Call: WRITE
  • Prompt: "."
  • Line Location: DUPFND+5
Function Call: WRITE
  • Prompt: "."
  • Line Location: DUPFND+5

FileMan Files Accessed Via FileMan Db Call

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