Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBDFCG

Package: Automated Information Collection System

Routine: IBDFCG


Information

IBDFCG ;MAF/ALB - CLINIC GROUP FORMS SCREEN ; 09-FEB-1995

Source Information

Source file <IBDFCG.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
List Manager 4 EN^VALM  ($$SETSTR,FULL,PAUSE)^VALM1  (CNTRL,KILL)^VALM10  EN^VALM2  
VA FileMan 4 ^DIC  ^DIE  ^DIK  ^DIR  
Automated Information Collection System 3 INIT^IBDFCG  (CLIN,CLIN1,DIV,DIV1)^IBDFCG1  INIT^IBDFPE  
Kernel 1 DISP^XQORM1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Automated Information Collection System 7 IBDF EF CLINIC GROUP ADD  IBDF EF CLINIC GROUP DELETE  IBDF EF CLINIC GROUP EDIT  IBDF EF CLINIC GROUP JUMP  IBDF EF CLINIC GROUP LT  IBDF EF CLINIC GROUP MENU ACTION  IBDFCG  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for IBDF EF CLINIC GROUP LT
HDR ; -- header code
INIT ; -- init variables and list array
ARRAY ; -- Setting up array for clinic groups and the divisions and clinics
SETG1 ; -- Creating the list entries
GROUPS ; -- Creating the Listman Clinic Name titles for the list
TMP
EDIT ; -- Edit a selected Clinic Group
DEL ; -- Delete Clinic Group
DELQ
DP1 ; -- actual deletion
QE ; -- Quick edit Review entry
MESS ; -- Message prior to editing a group
ADD1 ; -- Add/Edit Clinic Group
REP
REP1
JUMP ; -- Jump action to display a specific clinic group on the screen.
JMP
JUMP1
JSEL ; -- Convert number selected to name
HELP ; -- help code
EXIT ; -- exit code
EXPND ; -- expand code
NUL ; -- NULL MESSAGE

External References

Name Field # of Occurrence
^DIC ADD1+4, JUMP+2, JMP
^DIE EDIT+8, ADD1+5
^DIK DP1+1
^DIR DEL+9
INIT^IBDFCG REP1
CLIN^IBDFCG1 ARRAY+2
CLIN1^IBDFCG1 ARRAY+4
DIV^IBDFCG1 ARRAY+2
DIV1^IBDFCG1 ARRAY+4
INIT^IBDFPE REP
EN^VALM EN+1
$$SETSTR^VALM1 INIT+10, SETG1+4, SETG1+6, GROUPS+3, GROUPS+6, GROUPS+7
FULL^VALM1 EDIT+4, DEL+4, ADD1+2, JUMP+1
PAUSE^VALM1 DEL+6
CNTRL^VALM10 GROUPS+5, GROUPS+6, GROUPS+7
KILL^VALM10 INIT+4
EN^VALM2 EDIT+3, DEL+3
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"In use by parameter group, Not deleted",!
  • Line Location: DEL+6
Function Call: WRITE
  • Prompt: !,"Entry ",$P($G(^IBD(357.99,DA,0)),"^",1)," not Deleted!"
  • Line Location: DEL+9
Function Call: WRITE
  • Prompt: !,"Entry ",IBDVALM," Deleted"
  • Line Location: DP1+2
Function Call: WRITE
  • Prompt: !!,"Enter the clinics for this clinic group. Enter as many Clinics as you want."
  • Line Location: MESS+1
Function Call: WRITE
  • Prompt: !,"If you want all clinics for a division, do not enter any clinics but enter"
  • Line Location: MESS+2
Function Call: WRITE
  • Prompt: !,"the division name at the Select Division: prompt."
  • Line Location: MESS+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ADD1+4
Function Call: WRITE
  • Prompt: !!,"There is no data listed for this Clinic Group"
  • Line Location: JUMP1+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Routine Call
  • DIC
  • Line Location:
    • ADD1+4
    • JUMP+2
    • JMP
Routine Call
  • DIE
  • Line Location:
    • EDIT+8
    • ADD1+5
Routine Call
  • DIR
  • Line Location:
    • DEL+9
Routine Call
  • VALM
  • Line Location:
    • EN+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBD(357.99 - [#357.99] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBD(357.09 - [#357.09] DEL+6
^IBD(357.99 - [#357.99] INIT+6, EDIT+7, DEL+7, DEL+8, DEL+9, JUMP1+2, JSEL+1
^TMP("CGIDX" INIT+4!, TMP+1*, EDIT+5, DEL+5, JSEL+1, NUL+1*
^TMP("IBDFCG" INIT+4!, INIT+12, TMP*, NUL+1*
^TMP("IBMF" INIT+4!, INIT+9, SETG1+3, SETG1+4, SETG1+5, SETG1+6, GROUPS+5, GROUPS+6, GROUPS+7, EXIT+2!

Label References

Name Line Occurrences
ADD1 ADD1+5
ARRAY INIT+6
DP1 DEL+10
GROUPS INIT+8
INIT DELQ
JMP JUMP+2, JUMP1+3
JSEL JUMP+2
JUMP JUMP1
JUMP1 JUMP+2
MESS EDIT+6, ADD1+3
NUL INIT+12
REP EDIT+3, DEL+3
REP1 EDIT+9, ADD1+4
SETG1 INIT+9
TMP INIT+10, SETG1+7, GROUPS+5, GROUPS+6, GROUPS+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EDIT+5*, EDIT+7, EDIT+8*!, DEL+5*, DEL+6, DEL+7, DEL+8, DEL+9, ADD1+4*, ADD1+5*!
DIC ADD1+4*!, JUMP+2*!, JMP*!
DIC("A" ADD1+4*, JMP*
DIC("DR" ADD1+4*
DIC(0 ADD1+4*, JUMP+2*, JMP*
DIE EDIT+8*!, ADD1+5*!
>> DIK DP1+1*
DIR DEL+1~, DEL+9!
DIR("A" DEL+8*
DIR("B" DEL+8*
DIR(0 DEL+8*
DIRUT DEL+1~
DLAYGO ADD1+1~, ADD1+4*
DR EDIT+8*!, ADD1+5*!
DUOUT DEL+1~
IBDCG INIT+1~, INIT+8*, INIT+9, SETG1+3, SETG1+4, SETG1+5, SETG1+6, GROUPS+2, GROUPS+5, GROUPS+6
, GROUPS+7, TMP+1
IBDCL INIT+1~, ARRAY+2*, ARRAY+3*
IBDCLN INIT+4!, EXIT+1!
IBDCLN1 INIT+2!, EXIT+1!
IBDCLN1( INIT+8, INIT+10, ARRAY+1*
IBDCNT INIT+1~, INIT+3*, INIT+10*, SETG1+1*, GROUPS+1*, GROUPS+2, TMP
IBDCNT1 INIT+1~, INIT+3*, INIT+8*, GROUPS+3, TMP, TMP+1
IBDDV INIT+1~, ARRAY+2*, ARRAY+3*
IBDFCAT JUMP1+1~, JUMP1+2*, JUMP1+3, JUMP1+4
IBDFCFLG INIT+1~, ARRAY+3*, ARRAY+4
IBDFCG INIT+2!, INIT+7*, EXIT+1!
IBDFCG( GROUPS+2*, JUMP1+3, JUMP1+4
IBDFCGNM INIT+1~, INIT+5*, INIT+6*, INIT+7*, INIT+8*, INIT+10, ARRAY+1, GROUPS+2, GROUPS+3
IBDFCIEN INIT+1~, ARRAY+3*
IBDFCL INIT+1~
IBDFCN INIT+1~, INIT+8*
IBDFCNUM INIT+1~
IBDFDFLG INIT+1~, ARRAY+3*, ARRAY+4
IBDFDIEN INIT+1~, ARRAY+3*
IBDFGN INIT+1~, INIT+5*, INIT+6*
IBDFNODE INIT+1~
IBDFVAL INIT+1~, SETG1+3*, SETG1+4*, SETG1+5*, SETG1+6*
IBDFX INIT+1~, INIT+9*, ARRAY+3*, ARRAY+4*, SETG1+3, SETG1+4, SETG1+5, SETG1+6, GROUPS+4*, GROUPS+5
, GROUPS+6, GROUPS+7
IBDIFN INIT+1~, INIT+6*, ARRAY+1
IBDVAL INIT+1~, GROUPS+6*, GROUPS+7*
IBDVAL1 INIT+1~
IBDVALM INIT+1~, EDIT+1~, EDIT+3*, EDIT+5*, DEL+1~, DEL+3*, DEL+5*, DP1+2, JSEL+1*
IBFASTXT INIT+1~, INIT+3*
>> IOINHI GROUPS+5, GROUPS+6, GROUPS+7
>> IOINORM GROUPS+5, GROUPS+6, GROUPS+7
>> VALMBCK EDIT+2*, EDIT+4*, DEL+2*, DEL+4*, DELQ+1*, REP*, REP1*, JMP+1*, JUMP1+4*
>> VALMBG JMP+1*, JUMP1+4*
>> VALMCNT INIT+3*, INIT+10*, SETG1+1*, GROUPS+1*, GROUPS+5, GROUPS+6, GROUPS+7, TMP, TMP+1
>> VALMHDR(1 HDR+1*
>> VALMHDR(2 HDR+2*
VALMY EDIT+1~, DEL+1~
VALMY( EDIT+5, DEL+5
VALMY(0 EDIT+3, DEL+3
>> X INIT+10*, SETG1+2*, SETG1+4*, SETG1+6*, GROUPS+3*, GROUPS+6*, GROUPS+7*, TMP, JUMP+2*, JMP+1
, JSEL+1*, HELP+1*
>> XQORNOD(0 EDIT+3, DEL+3, JUMP+2
>> Y DEL+9, ADD1+4, JUMP+2*, JUMP1, JUMP1+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All