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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ORCSAVE

Package: Order Entry Results Reporting

Routine: ORCSAVE


Information

ORCSAVE ;SLC/MKB/JDL-Save ;18-Jul-2013 14:23;PLS

Source Information

Source file <ORCSAVE.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Order Entry Results Reporting 4 $$INPT^ORCD  ORDTEXT^ORCSAVE1  STATUS^ORCSAVE2  PKI^ORWDPS1  
VA Fileman 3 ^DIC  UPDATE^DIE  $$GET1^DIQ  
Kernel 1 $$NOW^XLFDT  
Toolkit 1 $$GET^XPAR  

Caller Graph

Caller Graph Total: 27

Package Total Caller Graph
Order Entry Results Reporting 27 OR3C100  ORCACT2  ORCACT4  ORCDFH  ORCDFHO  ORCDFHTF  ORCDLG  ORCMED  
ORCONV3  ORCSEND  ORCSEND3  ORMEVNT1  ORMFH  ORMFH1  ORMGMRC  ORMLR  
ORMLR1  ORMPS  ORMPS2  ORMPS3  ORMRA  ORWD  ORWDFH  ORWDX  
ORWDXA  ORWDXM  ORWDXR  

Entry Points

Name Comments DBIA/ICR reference
ACTION(CODE,DA,PROV,REASON,WHEN,WHO) ; -- save new action
EN ; -- save new/unreleased order in ORDIALOG() into Orders file
; Requires: ORVP, ORNP [and ORL, ORTS, ORAPPT if available]
; If defined: ORCAT,ORPKG,ORDG,ORLOG,ORDUZ,OREVENT,ORDCNTRL,ORSRC
; (else use values from ORDIALOG and current state)
R1 ; [Reset] Orderables
ENQ
SET(DLG) ; -- Create new parent for order set ORDIALOG
; Returns ORPIFN = ifn of new parent order for set
EN2
EN1
XX ; -- save new/unreleased edited order into Orders file
; Requires: ORDIALOG() = array of dialog values
; ORIFN = IFN of original order that was edited
PROVIDER(ORDER,PROV) ; -- Change PROVider assigned to ORDER
NEW(ORDIALOG,ORDG,ORPKG,ORCAT,OREVENT,ORDUZ,ORLOG) ; -- New order
; Returns ORIFN = [new] order number, if created/saved
RN ; -- save new/unreleased renewal order into Orders file
; Requires: ORDIALOG() = array of new dialog values
; ORIFN = IFN of original order that was renewed
NEXTIFN() ; -- Returns next available ORIFN
RESPONSE ; -- Save responses in ORDIALOG() into ^OR(100,ORIFN,4.5)
RESUME(IFN) ; -- add Response nodes for RESUME tray service
; S ^OR(100,+IFN,4.5,<next>,0)=DT_"^^^RESUME",^(1)=1

External References

Name Field # of Occurrence
^DIC RESUME+6
UPDATE^DIE EN2+36
$$GET1^DIQ EN+12
$$INPT^ORCD EN+8, SET+5
ORDTEXT^ORCSAVE1 EN2+7
STATUS^ORCSAVE2 EN2+28
PKI^ORWDPS1 EN2+5
$$NOW^XLFDT XX+14, EN+7, EN2+31, ACTION+3, SET+5
$$GET^XPAR EN2+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(9.4 - [#9.4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(100 RESUME+5
^DIC(9.4 - [#9.4] EN2+4, SET+5
^OR(100 - [#100] XX+5, XX+8*, XX+9*, XX+10, XX+18*, XX+19*, XX+20, XX+21, XX+22*, XX+23
, XX+24, XX+25*, RN+6*, RN+7*, EN+10, EN1*, EN1+1*, EN1+2*, EN1+3*, EN1+4*
, EN1+5*, EN1+6*, EN1+7*, EN2+1, EN2+3, EN2+7!, EN2+8*, EN2+10, EN2+11, EN2+12
, EN2+13, EN2+14*, EN2+15!, EN2+18*, EN2+19*, EN2+20*, EN2+25, EN2+30, NEXTIFN+2, NEXTIFN+4
, NEXTIFN+5, NEXTIFN+6*, NEXTIFN+7*, RESPONSE+2, RESPONSE+8*, RESPONSE+9*, RESPONSE+11*, RESPONSE+12*, RESPONSE+13*, R1+1!
, R1+2!, R1+4, R1+5, R1+6*, R1+7*, R1+8*, RESUME+6*, PROVIDER+3*, PROVIDER+4*, ACTION+2
, ACTION+5, ACTION+6, ACTION+8, ACTION+9, ACTION+11!, ACTION+12!, ACTION+13, ACTION+14*, ACTION+15*, ACTION+16*
, ACTION+17*, ACTION+18*, ACTION+19*, ACTION+20*, SET+7*, SET+8*, SET+9*, SET+10*, SET+12*
^ORD(100.01 - [#100.01] EN2+26
^ORD(100.02 - [#100.02] EN+17, ACTION+4
^ORD(101.41 - [#101.41] EN+6, EN+7, EN+9, EN+11, EN1+10, SET+4
^TMP("BEHPSHMX" EN2+22, EN2+24

Label References

Name Line Occurrences
$$ACTION EN2+31
$$NEXTIFN EN+18, SET+4
EN NEW+2, XX+6, RN+5
EN2 EN+10
RESPONSE EN2

Naked Globals

Name Field # of Occurrence
^( R1+1
^($J EN2+24!
^(0 XX+15, RESPONSE+2, ACTION+5
^(1 EN2+19*, SET+8*, SET+12*
^(3 XX+5, XX+8*, XX+15, RN+6*, EN+10, ACTION+5, SET+7*
^(4.5 RESPONSE+2!
^(5 XX+9, RN+7
^(8 XX+5, ACTION+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CATG EN+5~, EN+8*, EN1, EN2+5, SET+3~, SET+5*, SET+7
CDL EN+5~, EN2+16*, EN2+17
CNT EN+5~, EN2+16*, EN2+18*, EN2+19, EN2+20, RESPONSE+1~, RESPONSE+3*, RESPONSE+7*, RESPONSE+8, RESPONSE+9
, RESPONSE+11, RESPONSE+12, RESPONSE+13, R1+3*, R1+6*, R1+8
CODE ACTION~, ACTION+2, ACTION+8, ACTION+14
DA NEXTIFN+1~, NEXTIFN+6*, NEXTIFN+8, RESUME+3~, ACTION~, ACTION+1*, ACTION+2, ACTION+5, ACTION+6, ACTION+8
, ACTION+9, ACTION+11, ACTION+12, ACTION+13, ACTION+14, ACTION+15, ACTION+16, ACTION+17, ACTION+18, ACTION+19
, ACTION+20
DA(1 RESUME+4*
DG EN+5~, EN+11*, EN1, EN1+4
>> DGPMT EN+12
DGRP ACTION+1~, ACTION+5*, ACTION+11, ACTION+16
DIC RESUME+3~, RESUME+4*
DIC("DR" RESUME+5*
DIC("P" RESUME+5*
DIC(0 RESUME+4*
DLG SET~, SET+3, SET+4, SET+7
DT RESUME+4
DUZ EN+16, EN2+5, EN2+31, EN2+35, ACTION+3, SET+7, SET+8
HDR NEXTIFN+1~, NEXTIFN+4*, NEXTIFN+6*, NEXTIFN+7, ACTION+1~, ACTION+5*, ACTION+7*, ACTION+20*
I EN+5~, EN1+12~, EN1+14*, EN2+10*, EN2+11, EN2+12*, EN2+13, EN2+16*, EN2+17*, NEXTIFN+1~
, NEXTIFN+2*, NEXTIFN+5*, NEXTIFN+6, RESPONSE+1~, R1+1*, R1+3*, R1+4*, R1+5
IFN RESUME~, RESUME+4, RESUME+6
INST RESPONSE+1~, RESPONSE+6*, RESPONSE+7, RESPONSE+8
ITM RESPONSE+1~, RESPONSE+4*, RESPONSE+8, RESPONSE+9
LAST NEXTIFN+1~, NEXTIFN+4*, NEXTIFN+5, ACTION+1~, ACTION+8*, ACTION+9, ACTION+10
LOC EN+5~, EN+12*, EN+13*, EN+14*, EN1
LOG EN+5~, EN+16*, EN1, EN1+1, EN1+2, EN1+3, EN1+4, EN1+5, EN1+6
LSTACT XX+12~, XX+13*, XX+20*, XX+21, XX+22, XX+24, XX+25
MSCAX EN2+23~, EN2+31*, EN2+32, EN2+33
MSCCODE EN2+23~, EN2+30*, EN2+31
MSCFDA EN2+23~
MSCFDA( EN2+34*, EN2+35*
MSCIEN EN2+23~, EN2+24*, EN2+28, EN2+31, EN2+33
MSCIENS EN2+23~, EN2+33*, EN2+34, EN2+35
MSCSTAT EN2+23~, EN2+25*, EN2+26*, EN2+27, EN2+28
NATR EN+5~, EN+17*, EN1+2, ACTION+1~, ACTION+4*, ACTION+14
NEXT ACTION+1~, ACTION+10*, ACTION+11, ACTION+12, ACTION+13*, ACTION+14, ACTION+15, ACTION+16, ACTION+17, ACTION+18
, ACTION+19, ACTION+20, ACTION+21
NODE EN+5~, EN2+8*, EN2+9*, EN2+11*, EN2+13*
NOW XX+12~, XX+14*, EN+5~, EN+7*, EN+16, EN2+14, SET+3~, SET+5*, SET+7, SET+8
, SET+9, SET+10
OI EN2+2~, EN2+3*, EN2+5
OLDEVT XX+12~, XX+13*, XX+15*, XX+17, XX+18
OLDIFN XX+4~*, XX+5*, XX+7, XX+8, XX+9, XX+10, RN+4~*, RN+6, RN+7
OLDSTS XX+12~, XX+13*, XX+15*, XX+17
OR0 SET+3~, SET+4*, SET+7, SET+12
ORACT PROVIDER+2~*, PROVIDER+3, PROVIDER+4
>> ORAPPT EN1
ORCAT NEW~, EN+8
>> ORCHECK EN2+15
>> ORCHECK("NEW" EN2+16, EN2+17
>> ORDA XX+6*, RN+5*
>> ORDCNTRL EN+15
ORDEA EN2+6*, EN2+37!
ORDER PROVIDER~, PROVIDER+1, PROVIDER+2, PROVIDER+3, PROVIDER+4
ORDG NEW~, EN+11
ORDIALOG NEW~, EN+6, EN+7, EN+9, EN+11, EN1
ORDIALOG( EN1+11, EN1+13, EN1+15*, RESPONSE+3, RESPONSE+4, RESPONSE+5, RESPONSE+6, RESPONSE+7
ORDIALOG("PREV" EN1+1
ORDUZ NEW~, EN+16
OREVENT NEW~, EN+12, EN+18, EN1, EN1+7, SET+5, SET+6, SET+7
>> OREVTDF XX+11
ORIFN XX+4*, XX+5!, XX+6, XX+8, XX+9, XX+18, XX+19, XX+20, XX+21, XX+22
, XX+23, XX+24, XX+25, RN+4!, RN+5, RN+6, RN+7, EN+10, EN+18*, EN1
, EN1+1, EN1+2, EN1+3, EN1+4, EN1+5, EN1+6, EN1+7, EN2*, EN2+1, EN2+3
, EN2+7, EN2+8, EN2+10, EN2+11, EN2+12, EN2+13, EN2+14, EN2+15, EN2+18, EN2+19
, EN2+20, EN2+25, EN2+30, RESPONSE+2, RESPONSE+8, RESPONSE+9, RESPONSE+11, RESPONSE+12, RESPONSE+13, R1+1
, R1+2, R1+4, R1+5, R1+6, R1+7, R1+8
>> ORIT EN1+1, SET+7
>> ORL EN+13
ORLOC SET+3~, SET+6*, SET+7
ORLOG NEW~, EN+16
>> ORNP EN1, EN1+2, EN2+9, SET+7, SET+8
>> ORPIFN SET+4*, SET+7, SET+8, SET+9, SET+10, SET+12
ORPKG NEW~, EN+9
ORRFSID EN1+9~, EN1+10*, EN1+11, EN1+13, EN1+15
>> ORSLOG SET+5
>> ORSRC EN+15
>> ORTS EN+13
>> ORVP EN+6, EN1, EN1+4, EN1+5, EN1+6, EN1+7, EN2+5, SET+3, SET+7, SET+9
, SET+10
>> ORY EN2+5, EN2+6
PAT RESPONSE+1~, RESPONSE+2*, R1+1, R1+7, ACTION+1~, ACTION+5*, ACTION+10, ACTION+11, ACTION+12, ACTION+16
, ACTION+17, ACTION+18
PATID XX+12~, XX+23*, XX+25
PKG EN+5~, EN+9*, EN+12, EN1, EN2+4, SET+3~, SET+5*, SET+7
PROMPT RESPONSE+1~, RESPONSE+3*, RESPONSE+4, RESPONSE+5, RESPONSE+6, RESPONSE+7, RESPONSE+8
PROV PROVIDER~, PROVIDER+1, PROVIDER+3, PROVIDER+4, ACTION~, ACTION+14
REASON ACTION~, ACTION+19
SIG ACTION+1~, ACTION+5*, ACTION+14, ACTION+18
SIGNREQD EN+5~, EN+7*, EN1, EN1+2, EN1+6
START RESPONSE+1~, RESPONSE+2*, R1+1, R1+7
STS EN+5~, EN+10*, EN+18*, EN1+1, EN1+2, EN1+5, SET+3~, SET+5*, SET+7, SET+8
, SET+10
TOTAL NEXTIFN+1~, NEXTIFN+4*, NEXTIFN+6, ACTION+1~, ACTION+7*, ACTION+13*, ACTION+20
TRSPEC EN+5~, EN+12*, EN+13*, EN1, SET+3~, SET+6*, SET+7
TXT ACTION+1~, ACTION+6*, ACTION+14
TYPE EN+5~, EN+15*, EN1+1, EN2+22, RESPONSE+1~, RESPONSE+5*, RESPONSE+10, RESPONSE+11, RESPONSE+12
U XX+5, XX+8, XX+9, XX+15, XX+18, XX+19, XX+20, XX+22, XX+23, XX+24
, RN+6, RN+7, EN+7, EN+9, EN+10, EN+11, EN+15, EN1, EN1+1, EN1+2
, EN2+9, EN2+11, EN2+13, EN2+14, EN2+19, EN2+20, EN2+25, EN2+30, NEXTIFN+4, NEXTIFN+6
, RESPONSE+2, RESPONSE+8, RESPONSE+9, RESPONSE+13, R1+8, RESUME+5, PROVIDER+3, PROVIDER+4, ACTION+5, ACTION+6
, ACTION+7, ACTION+9, ACTION+10, ACTION+11, ACTION+12, ACTION+14, ACTION+20, SET+7, SET+12
USR EN+5~, EN+16*, EN1, EN1+2
VALUE RESPONSE+1~, RESPONSE+7*, RESPONSE+10*, RESPONSE+11, RESPONSE+12
WHEN XX+12~, XX+24*, XX+25, ACTION~, ACTION+3*, ACTION+14, ACTION+15, ACTION+16, ACTION+17, ACTION+18
WHO ACTION~, ACTION+3*, ACTION+14
X EN+5~, EN1+12~, EN1+13*, EN1+14*, EN1+15, EN2+11*, EN2+13*, EN2+17*, EN2+18, EN2+19
, RESPONSE+1~, R1+1*, R1+5*, R1+6, R1+7, RESUME+3~, RESUME+4*, ACTION+1~, ACTION+5*, ACTION+6*
, ACTION+9*, ACTION+10, ACTION+11, ACTION+12, SET+3~
Y RESUME+3~, RESUME+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All