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

Package: Automated Information Collection System

Routine: IBDF5B


Information

IBDF5B ;ALB/CJM - ENCOUNTER FORM (edit a form - CONTINUED);JUL 27,1993

Source Information

Source file <IBDF5B.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
Automated Information Collection System 9 UNCMPL^IBDF19  PRINT^IBDF1C  IDXFORM^IBDF5A  $$COPYBLK^IBDFU2  DLTBLK^IBDFU3  IDXBLOCK^IBDFU4  (PAUSE,TOPNBOT)^IBDFU5  $$SLCTBLK^IBDFU8  
KILL^IBDFUA  
Registration 2 EN^VALM  FULL^VALM1  
VA Fileman 2 ^DIE  ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Automated Information Collection System 2 IBDF13  IBDFQSL  

Entry Points

Name Comments DBIA/ICR reference
ASKSAVE() ;asks the user if changes to the block should be saved
EDITBLK ;allows the user to edit everything about the block
COPYBLK(IBBLK,FORMCOPY,WORKCOPY,IBTKODR,IBJUNK) ;copys the IBBLK to the WORKCOPY, then puts sets FORMCOPY=IBBLK
DOWHAT() ;returns "D" for discard, "S" for save, "" for do nothing
PRINT ;prints the form
DLTCOPY(WORKCOPY) ;deletes the block=WORKCOPY and unlocks it
DECIDE ;allows user to either save or discard changes to the block being edited
SAVECOPY(WORKCOPY,FORMCOPY,IBTKODR) ;deletes the block=FORMCOPY,adds WORKCOPY to IBFORM

External References

Name Field # of Occurrence
^DIE SAVECOPY+6, COPYBLK+21
^DIR ASKSAVE+3, DOWHAT+2, PRINT+6
UNCMPL^IBDF19 SAVECOPY+9
PRINT^IBDF1C PRINT+8
IDXFORM^IBDF5A EDITBLK+28
$$COPYBLK^IBDFU2 COPYBLK+11
DLTBLK^IBDFU3 DLTCOPY+1, SAVECOPY+8
IDXBLOCK^IBDFU4 DECIDE+8
PAUSE^IBDFU5 COPYBLK+12
TOPNBOT^IBDFU5 EDITBLK+16, EDITBLK+26
$$SLCTBLK^IBDFU8 EDITBLK+10
KILL^IBDFUA EDITBLK+12
EN^VALM EDITBLK+17
FULL^VALM1 EDITBLK+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Unable to edit the block!"
  • Line Location: COPYBLK+12
Routine Call
  • VALM
  • Line Location:
    • EDITBLK+17
Routine Call
  • DIE
  • Line Location:
    • SAVECOPY+6
    • COPYBLK+21
Routine Call
  • DIR
  • Line Location:
    • ASKSAVE+3
    • DOWHAT+2
    • PRINT+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(357.1 - [#357.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBE(357 - [#357] COPYBLK+9
^IBE(357.1 - [#357.1] EDITBLK+22, DLTCOPY+2, SAVECOPY+10, COPYBLK+6, COPYBLK+16, COPYBLK+17

Label References

Name Line Occurrences
$$ASKSAVE EDITBLK+19
$$DOWHAT DECIDE+3
COPYBLK EDITBLK+15, DECIDE+5, DECIDE+7, PRINT+7
DLTCOPY EDITBLK+21, DECIDE+7
SAVECOPY EDITBLK+20, DECIDE+5, PRINT+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BOT1 EDITBLK+5~, EDITBLK+16, EDITBLK+27*, EDITBLK+28
BOT2 EDITBLK+5~, EDITBLK+26, EDITBLK+27
DA SAVECOPY+4!*, SAVECOPY+6!, COPYBLK+20!*, COPYBLK+21!
DIE SAVECOPY+4!*, SAVECOPY+6!, COPYBLK+20!*, COPYBLK+21!
DIR ASKSAVE+2!, ASKSAVE+3!, DOWHAT+1!, DOWHAT+2!, PRINT+6!
DIR("A" ASKSAVE+2*, DOWHAT+1*
DIR("B" ASKSAVE+2*
DIR(0 ASKSAVE+2*, DOWHAT+1*, PRINT+6*
>> DIRUT ASKSAVE+4, DOWHAT+3, PRINT+6
DR SAVECOPY+4!*, SAVECOPY+5*, SAVECOPY+6!, COPYBLK+20!*, COPYBLK+21!
FORMCOPY SAVECOPY~, SAVECOPY+2, SAVECOPY+8, SAVECOPY+10, SAVECOPY+11*, COPYBLK~, COPYBLK+4*, COPYBLK+11*, COPYBLK+12*, COPYBLK+16
IBBLK EDITBLK+5~, EDITBLK+10*, EDITBLK+11, EDITBLK+15*, EDITBLK+16, EDITBLK+18, EDITBLK+20*, EDITBLK+21*, EDITBLK+22, EDITBLK+26
, COPYBLK~, COPYBLK+4, COPYBLK+5, COPYBLK+6, COPYBLK+11, COPYBLK+12, DECIDE+5*, DECIDE+7*, DECIDE+8, DECIDE+9*
, PRINT+4, PRINT+7*
IBBLK2 EDITBLK+5~, EDITBLK+13*, EDITBLK+15*, EDITBLK+18, EDITBLK+20*, EDITBLK+21*, DECIDE+5*, DECIDE+7*, DECIDE+9*, PRINT+7*
>> IBFASTXT EDITBLK+23
>> IBFORM EDITBLK+10, SAVECOPY+4, SAVECOPY+8, SAVECOPY+9, COPYBLK+11, PRINT+8
IBJUNK EDITBLK+5~, EDITBLK+13*, EDITBLK+15, DLTCOPY+1, COPYBLK~, COPYBLK+9*, COPYBLK+20, DECIDE+5, DECIDE+7, PRINT+7
>> IBPRINT("WITH_DATA" EDITBLK+14, EDITBLK+25*
>> IBTKBLK PRINT+4
IBTKODR EDITBLK+5~, EDITBLK+13*, EDITBLK+15, EDITBLK+20, SAVECOPY~, SAVECOPY+5, COPYBLK~, COPYBLK+7*, DECIDE+5, DECIDE+7
, PRINT+7
IBVALMBG EDITBLK+5~, EDITBLK+8*, EDITBLK+24
IFSAVE EDITBLK+5~, EDITBLK+19*, EDITBLK+20, EDITBLK+21
IOSL EDITBLK+10
NODE COPYBLK+3~, COPYBLK+6*, COPYBLK+7
QUIT PRINT+2~*, PRINT+4, PRINT+6*, PRINT+7*, PRINT+8
TOP1 EDITBLK+5~, EDITBLK+16, EDITBLK+27*, EDITBLK+28
TOP2 EDITBLK+5~, EDITBLK+26, EDITBLK+27
>> VALMBCK EDITBLK+29*, DECIDE+5*, DECIDE+8*, DECIDE+9*, PRINT+3*, PRINT+7*
>> VALMBG EDITBLK+8, EDITBLK+24*
WDATA EDITBLK+5~, EDITBLK+14*, EDITBLK+25
WHAT DECIDE+1~, DECIDE+3*, DECIDE+4, DECIDE+6
WORKCOPY DLTCOPY~, DLTCOPY+1, DLTCOPY+2, DLTCOPY+3*, SAVECOPY~, SAVECOPY+2, SAVECOPY+4, SAVECOPY+11*, COPYBLK~, COPYBLK+4*
, COPYBLK+17, COPYBLK+20
>> Y ASKSAVE+5, DOWHAT+4, PRINT+6
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