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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: RMPOPST2

Package: Prosthetics

Routine: RMPOPST2


Information

RMPOPST2 ;EDS/JAM - HOME OXYGEN BILLING TRANSACTIONS/POSTING - SIGN OFF ;7/24/98

Source Information

Source file <RMPOPST2.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Prosthetics 4 MONTH^RMPOBIL0  FCP1^RMPOBILU  ($$FCPLCK,UNLKFCP)^RMPOPST0  HOSITE^RMPOUTL0  
VA FileMan 4 NOW^%DTC  ^DIC  ^DIE  ^DIR  
IFCAP 1 OBL^PRCH7D  
Kernel 1 HOME^%ZIS  

Entry Points

Name Comments DBIA/ICR reference
MAIN ; Proper entry point
TEST ;set test data
SIGNOF ;Sign off/close a FCP/purchase order
UNLK
ABORT ;Write abort message
PTYP ;Select Payment Type; 1358 or purchase card
FCP ;Select Fund Control Point/Purchase Order to Sign Off
FCPUPD ;Close FCP record in ^RMPO(665.72 file. Update global with date closed
PCSO ;Obligate/Sign off PC order
FILCHK ;Check records to enure all posting done before obligating for a FCP
EXIT ;Kill variables

External References

Name Field # of Occurrence
NOW^%DTC FCPUPD+3
HOME^%ZIS MAIN+1
^DIC FCP+10
^DIE FCPUPD+7
^DIR SIGNOF+10, SIGNOF+16
OBL^PRCH7D PCSO+4
MONTH^RMPOBIL0 MAIN+5
FCP1^RMPOBILU PTYP+2
$$FCPLCK^RMPOPST0 SIGNOF+12
UNLKFCP^RMPOPST0 UNLK
HOSITE^RMPOUTL0 MAIN+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Record in Use. Try Later...."
  • Line Location: SIGNOF+13
Function Call: WRITE
  • Prompt: !!,"Process Aborted..."
  • Line Location: ABORT+1
Function Call: WRITE
  • Prompt: " Nothing Found..."
  • Line Location: FCP+11
Function Call: WRITE
  • Prompt: !!,"Purchase Card Order "_REFNO
  • Line Location: PCSO+6
Function Call: WRITE
  • Prompt: " Not Obligated for "_FCP
  • Line Location: PCSO+7
Function Call: WRITE
  • Prompt: !!,"Verifying all items posted for FCP. Please be patient."
  • Line Location: FILCHK+3
Function Call: WRITE
  • Prompt: "."
  • Line Location: FILCHK+11
Routine Call
  • DIC
  • Line Location:
    • FCP+10
Routine Call
  • DIE
  • Line Location:
    • FCPUPD+7
Routine Call
  • DIR
  • Line Location:
    • SIGNOF+10
    • SIGNOF+16
Routine Call
  • %ZIS
  • Line Location:
    • MAIN+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPO( FILCHK+5, FILCHK+7, FILCHK+8, FILCHK+10, FILCHK+11

Label References

Name Line Occurrences
@( SIGNOF+17
ABORT SIGNOF+4, SIGNOF+5, SIGNOF+8, SIGNOF+14
EXIT MAIN+7
FCP SIGNOF+5
FCPUPD PCSO+8
FILCHK SIGNOF+8
PTYP SIGNOF+4
SIGNOF MAIN+7
UNLK SIGNOF+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % FCPUPD+6
DA PTYP+1!, FCP+1!, FCPUPD+2!, FCPUPD+4*, EXIT+1!
DA(1 FCP+2*, FCPUPD+4*, FCPUPD+5
DA(2 FCP+2*, FCPUPD+4*, FCPUPD+5
DFN FILCHK+2~, FILCHK+6*, FILCHK+7*, FILCHK+8, FILCHK+10, FILCHK+11
>> DFNS(47 TEST+1*
DIC PTYP+1!, FCP+1!, FCP+2*, EXIT+1!
DIC("S" FCP+5*, FCP+7*
DIC("W" FCP+8*, FCP+9*
DIC(0 FCP+3*
DIE FCPUPD+2!, FCPUPD+5*
DIR EXIT+1!
DIR("A" SIGNOF+10*, SIGNOF+16*
DIR(0 SIGNOF+9*, SIGNOF+15*
DR PTYP+1!, FCP+1!, FCPUPD+2!, FCPUPD+6*
DUZ FCPUPD+6
FCP SIGNOF+2~, SIGNOF+6*, SIGNOF+10, PCSO+7, FILCHK+12
FCPTOT SIGNOF+2~, SIGNOF+7*, PCSO+3
FIL SIGNOF+2~, SIGNOF+3*, FILCHK+5, FILCHK+7, FILCHK+8, FILCHK+10, FILCHK+11
IEN442 SIGNOF+2~, SIGNOF+6*, PCSO+2
IENFCP SIGNOF+2~, SIGNOF+6*, FCPUPD+4
IT FILCHK+2~, FILCHK+9*, FILCHK+10*, FILCHK+11
ITDT FILCHK+2~, FILCHK+11*, FILCHK+12, FILCHK+13
LCK SIGNOF+2~, SIGNOF+12*
PAYTYP SIGNOF+2~, SIGNOF+5*, SIGNOF+17, FCP+5
PFLG SIGNOF+2~, SIGNOF+8*, FILCHK+5, FILCHK+7, FILCHK+10, FILCHK+13*
PRCA PCSO+1~, PCSO+2*, PCSO+4
PRCB PCSO+1~, PCSO+2*, PCSO+4
PRCC PCSO+1~, PCSO+3*, PCSO+4
QUIT MAIN+2*, MAIN+3, MAIN+5, EXIT+1!
REFNO SIGNOF+2~, SIGNOF+6*, PCSO+6
RMPO EXIT+1!
RMPO("STA" TEST+2*
RMPODATE MAIN+5, TEST+1*, SIGNOF+3, EXIT+1!
RMPOMTH EXIT+1!
RMPOREC MAIN+3, MAIN+4, EXIT+1!
RMPORVDT TEST+1*, EXIT+1!
>> RMPOVDR TEST+1*
>> RMPOXITE MAIN+4*, TEST+1*, SIGNOF+3
RVDT SIGNOF+2~, SIGNOF+3*, FCP+2, FCPUPD+4, FILCHK+5, FILCHK+7, FILCHK+8, FILCHK+10, FILCHK+11
SITE SIGNOF+2~, SIGNOF+3*, FCP+2, FCPUPD+4, FILCHK+5, FILCHK+7, FILCHK+8, FILCHK+10, FILCHK+11
U SIGNOF+6, SIGNOF+7, FILCHK+8, FILCHK+12, FILCHK+13
VDR FILCHK+2~, FILCHK+4*, FILCHK+5*, FILCHK+7, FILCHK+8, FILCHK+10, FILCHK+11
X SIGNOF+2~, PCSO+4, PCSO+5, EXIT+1!
XQY0 TEST+2~, TEST+3*
Y SIGNOF+2~, SIGNOF+4, SIGNOF+5, SIGNOF+6, SIGNOF+8, SIGNOF+14, FCP+11, EXIT+1!
Y(0 SIGNOF+6, SIGNOF+7
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All