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
Print Page as PDF
Routine: IBDFC

Package: Automated Information Collection System

Routine: IBDFC


Information

IBDFC ;ALB/CJM - ENCOUNTER FORM - CONVERSION UTILTY ;FEB 30,1995

Source Information

Source file <IBDFC.m>

Entry Points

Name Comments DBIA/ICR reference
FORMLIST ;
ONENTRY ;
ONEXIT ;
HDR ;
REMOVE ;allows user to select a form, then deletes it
ADDONE ;adds a single form to the list for conversion
DISPLAY(IDX,FORM) ;
CNVTLIST ;
DEVICE ;
QUEUE
PRINT ;
VALMSG ;
HELP ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This form is already a version "_$P(NODE,"^",17)_" form!"
  • Line Location: ADDONE+5
Function Call: WRITE
  • Prompt: !,"This form previously converted, new form name = "_$P($G(^IBE(357,PREV,0)),"^")
  • Line Location: ADDONE+10
Function Call: WRITE
  • Prompt: !!,"Form Name "_"CNV."_$E($P(NODE,"^"),1,41)_" already exists. Form must be renamed first!"
  • Line Location: ADDONE+11
Function Call: WRITE
  • Prompt: !!,"No forms on List to convert!"
  • Line Location: CNVTLIST+6
Function Call: WRITE
  • Prompt: !!,"Each form on the list will be made scannable. However, the results should be",!,"carefully reviewed before putting the form into use.",!
  • Line Location: CNVTLIST+8
Function Call: WRITE
  • Prompt: !,"** You must queue the form to print. **"
  • Line Location: DEVICE+1
Function Call: WRITE
  • Prompt: !,$C(7),"** Forms require 132 columns and a page length of 80 lines. **",!
  • Line Location: DEVICE+2
Function Call: WRITE
  • Prompt: !,$S($D(ZTSK):"Request Queued Task="_ZTSK,1:"Request Canceled")
  • Line Location: QUEUE+0
Function Call: WRITE
  • Prompt: !!,"To convert a form follow the following steps:"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !," 1. Use 'Add Form to List' to select the form. Add all the forms to"
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !," the list you wish to at this time."
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !," 2. Use 'Convert List' to convert the forms."
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !," 3. Use 'View Conversion Log' to review the conversion process and "
  • Line Location: HELP+6
Function Call: WRITE
  • Prompt: !," assign the converted form to a clinic.",!
  • Line Location: HELP+7
Function Call: WRITE
  • Prompt: !,"Hint: The conversion creates a new copy of your form with the same name"
  • Line Location: HELP+8
Function Call: WRITE
  • Prompt: !," as the original but prefixed with 'CNV.'. (i.e. form PRIM CARE"
  • Line Location: HELP+9
Function Call: WRITE
  • Prompt: !," would be renamed CNV.PRIM CARE)"
  • Line Location: HELP+10
Function Call: WRITE
  • Prompt: !
  • Line Location: HELP+11
Info |  Source |  Entry Points |  Interaction Calls