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

Package: IFCAP

Routine: PRCB1A4


Information

PRCB1A4 ;WOIFO/DWA-COPY FCP USERS TO NEW FCP ;3/8/04 2:22 PM

Source Information

Source file <PRCB1A4.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 3 ^DIC  EN1^DIP  ^DIR  
IFCAP 2 (DCLOCK,ICLOCK)^PRC0B  ^PRCFSITE  

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

Package Total Caller Graph
IFCAP 1 PRCB FCP USER COPY  

Entry Points

Name Comments DBIA/ICR reference
V ; invalid entry
EN ;
FROM ; prompt for FCP to copy FROM
DISPLAY ; display the user profiles for the chosen FCP
GETFCP ; get the FCP to copy TO
XTRCT ;
COPY ; copy records to new FCP, setup cross references as needed
UNLCK ; unlock
QUIT ;
CONFRM(FCP,X) ; ask if these are the records that user wishes to copy
CONFRM2(FCP,X) ; confirm that the TO FCP is correct

External References

Name Field # of Occurrence
^DIC XTRCT+4
EN1^DIP DISPLAY+2
^DIR FROM+1, GETFCP+1, CONFRM+5, CONFRM2+3
DCLOCK^PRC0B GETFCP+2, GETFCP+4, UNLCK+2, UNLCK+3
ICLOCK^PRC0B DISPLAY+10, GETFCP+10
^PRCFSITE EN+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: DISPLAY+1
Function Call: WRITE
  • Prompt: !,?15,"*** NO USERS FOUND ***",!!
  • Line Location: DISPLAY+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPLAY+4
Function Call: WRITE
  • Prompt: !,"Someone else is using that FCP, please try later."
  • Line Location: DISPLAY+11
Function Call: WRITE
  • Prompt: !!,"I cannot complete the copy, FCP ==> "_FCP2_" is not empty."
  • Line Location: GETFCP+7
Function Call: WRITE
  • Prompt: !,"Someone else is using that FCP, please try later."
  • Line Location: GETFCP+11
Function Call: WRITE
  • Prompt: !!,"The FCP copy has been completed.",!
  • Line Location: COPY+10
Function Call: WRITE
  • Prompt: !!,?10,"PLEASE NOTE: THE FCP 'TO COPY TO' MUST BE EMPTY."
  • Line Location: CONFRM+1
Function Call: WRITE
  • Prompt: !!,"If you choose to use this option you must copy all users and their profiles."
  • Line Location: CONFRM+2
Function Call: WRITE
  • Prompt: !!,"Are these the correct users to copy?"
  • Line Location: CONFRM+3
Function Call: WRITE
  • Prompt: !!,"Copy users from "_FCP1_" to "_FCP_"?"
  • Line Location: CONFRM2+1
Routine Call
  • DIC
  • Line Location:
    • XTRCT+4
Routine Call
  • DIR
  • Line Location:
    • FROM+1
    • GETFCP+1
    • CONFRM+5
    • CONFRM2+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRC(420 - [#420] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(420 - [#420] DISPLAY+3, DISPLAY+4, GETFCP+6, XTRCT+2, COPY+2*, COPY+3*, COPY+5*, COPY+6*, COPY+7*, COPY+8*
COPY+9*

Label References

Name Line Occurrences
$$CONFRM DISPLAY+5
$$CONFRM2 GETFCP+4
FROM FROM+3, DISPLAY+3, DISPLAY+4, DISPLAY+6, DISPLAY+13
GETFCP GETFCP+5, GETFCP+11
QUIT FROM+2, DISPLAY+7, GETFCP+2, GETFCP+4, GETFCP+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
B EN+5~, DISPLAY+9*, DISPLAY+10, DISPLAY+11, DISPLAY+13, GETFCP+9*, GETFCP+10, GETFCP+11
BY EN+5~, DISPLAY+2*
>> DHD DISPLAY+2*
DIC EN+5~, DISPLAY+2*!, XTRCT+3*, QUIT+1!
DIC(0 XTRCT+3*
DIR EN+5~, FROM+1!, GETFCP+1!, QUIT+1!, CONFRM+5!, CONFRM2+3!
DIR("?" FROM+1*, GETFCP+1*, CONFRM+4*, CONFRM2+2*
DIR("A" FROM+1*, GETFCP+1*
DIR("B" CONFRM+4*, CONFRM2+2*
DIR(0 FROM+1*, GETFCP+1*, CONFRM+4*, CONFRM2+2*
>> DIRUT FROM+2
DLAYGO QUIT+1!
FCP CONFRM~, CONFRM2~, CONFRM2+1
FCP1 EN+5~, FROM+4*, DISPLAY+2, DISPLAY+3, DISPLAY+4, DISPLAY+5, XTRCT+2, COPY+2, COPY+3, QUIT+1!
, CONFRM2+1
FCP2 EN+5~, GETFCP+3*, GETFCP+4, GETFCP+6, GETFCP+7, COPY+2, COPY+3, COPY+5, COPY+6, COPY+7
COPY+8, COPY+9, QUIT+1!
FLDS EN+5~, DISPLAY+2*
FR EN+5~, DISPLAY+2*
I EN+5~
IO DISPLAY+2
IOP EN+5~, DISPLAY+2*
L EN+5~, DISPLAY+2*
PRC QUIT+1!
PRC("SITE" EN+1, EN+2
PRCF QUIT+1!
PRCF("X" EN+1*
PRCLAST EN+5~, XTRCT+1*, XTRCT+5*, COPY+9, QUIT+1!
PRCNT EN+5~, XTRCT+1*, XTRCT+5*, COPY+8, QUIT+1!
PRFL EN+5~, XTRCT+2*, XTRCT+3, QUIT+1!
PRFL( XTRCT+4*, XTRCT+5, COPY+1, COPY+4, COPY+5
SITE EN+2*, DISPLAY+3, DISPLAY+4, GETFCP+6, XTRCT+2, COPY+2, COPY+3, COPY+5, COPY+6, COPY+7
COPY+8, COPY+9, QUIT+1!
TO EN+5~, DISPLAY+2*
X EN+5~, FROM+4!, DISPLAY+5, DISPLAY+6, DISPLAY+7, DISPLAY+8, DISPLAY+9*, DISPLAY+10, GETFCP+2, GETFCP+3!
GETFCP+4, GETFCP+5, GETFCP+9*, GETFCP+10, XTRCT+3*, XTRCT+4, XTRCT+5, COPY+1*, COPY+2, COPY+3
COPY+4, COPY+5, COPY+6, QUIT+1!, CONFRM~, CONFRM+6*, CONFRM+7*, CONFRM+8*, CONFRM+9, CONFRM2~
, CONFRM2+4*, CONFRM2+5*, CONFRM2+6*, CONFRM2+7
Y EN+5~, FROM+3, FROM+4!, GETFCP+3!, QUIT+1!, CONFRM+6, CONFRM+7, CONFRM+8, CONFRM2+4, CONFRM2+5
, CONFRM2+6
Y(0 XTRCT+4
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