Routine: ZISHMSMD

Information

ZISHMSMD ; IHS/DSM/MFD - HOST COMMANDS FOR DOS (MSMD); [ 04/02/2003 8:29 AM ]

Source file <ZISHMSMD.m>

Package	Total	Call Graph
Kernel	2	^%ZIS ^%ZISC

Package	Total	Caller Graph
Kernel	2	ZISHMNT ZISHMSM

Name	Comments	DBIA/ICR reference
DF(X)	; ----- Directory format.
JW	; ----- Call DOS $ZOS.
LIST(ZISH1,ZISH2,ZISH3)	; ----- Create local array holding filename(s). ; S Y=$$LIST^%ZISH("\dir\","fl",".return array") ; "fl*", ; .array,
FL(X)	; ----- Check for filename length.
FROM(ZISH1,ZISH2,ZISH3,ZISH4,ZISH5)	; ----- Get DOS file(s) from. ; S Y=$$FROM^%ZISH("\dir\","fl","mach","qlfr","\dir\") ; "fl*" ; .array
STATUS()	; -----EndOfFile flag.
DEL(ZISH1,ZISH2)	; ----- Delete file(s). ; S Y=$$DEL^%ZISH("\directory\","filename") ; ,.array)
OPEN(ZISH1,ZISH2,ZISH3)	; ----- Open DOS file. ; S Y=$$OPEN^%ZISH("\directory\","filename","R")
MV(ZISH1,ZISH2,ZISH3,ZISH4)	; ----- Rename a file(s). ; S Y=$$MV^%ZISH("\dir\","fl","\dir\","fl")
SEND(ZISH1,ZISH2,ZISH3)	; ----- Send DOS file(s). (MV to export directory.) ; S Y=$$SEND^%ZISH("\dir\","fl","mach") ; "fl*" ; .array
PWD(ZISH1)	; ----- Print working directory. ; S Y=$$PWD^%ZISH(.return array)

Name	Field # of Occurrence
^%ZIS	OPEN+32
^%ZISC	OPEN+37

Name	Field # of Occurrence
%ZIS	OPEN+18~
%ZIS("IOPAR"	OPEN+32*
IO	OPEN+37
IO(0	OPEN+40
IO(1	OPEN+32
>> IOP	OPEN+32*
POP	OPEN+18~, OPEN+32, OPEN+33
U	LIST+22, LIST+24
X	LIST+5~, PWD+10~, DF~, DF+1, DF+2, DF+3, FL~, FL+2
Y	SEND+4~, SEND+7, SEND+8, SEND+9, LIST+5~, PWD+10~
ZISH	SEND+4~, SEND+8*
ZISH1	OPEN~, OPEN+21, OPEN+29, DEL~, DEL+8, DEL+18, DEL+19, FROM~, SEND~, SEND+7 , SEND+8, LIST~, LIST+11, LIST+20, MV~, MV+6, MV+13, PWD~
ZISH1(1	PWD+11*, PWD+13
ZISH2	OPEN~, OPEN+27, OPEN+29, DEL~, DEL+11, FROM~, SEND~, SEND+5, SEND+7, LIST~ , LIST+15, MV~, MV+13*, MV+16
ZISH2(	DEL+15, DEL+17, SEND+8, LIST+18
ZISH2(0	OPEN+24, DEL+11, LIST+15, MV+10
ZISH2(1	DEL+11, LIST+15
ZISH3	OPEN~, OPEN+32, OPEN+36, FROM~, SEND~, LIST~, MV~, MV+7, MV+14
ZISH3(	LIST+22, LIST+24
ZISH4	FROM~, MV~, MV+14*, MV+16
ZISH4(0	MV+10
ZISH5	FROM~
ZISHC	DEL+5~, DEL+19*, LIST+5~, MV+3~, JW+1
ZISHCNT	LIST+5~, LIST+8, LIST+22, LIST+24*
ZISHDA	DEL+5~, DEL+15, DEL+17, LIST+5~, LIST+18*
ZISHDF	OPEN+18~, OPEN+29, OPEN+32, DEL+5~, DEL+18, DEL+19, LIST+5~, LIST+20*, LIST+22
ZISHF	DEL+5~, DEL+15, DEL+17, DEL+18, DEL+19, LIST+5~, LIST+18, LIST+19, LIST+20
ZISHIOP	OPEN+18~, OPEN+32*
ZISHNUM	DEL+5~, DEL+20*, JW+1
ZISHP1	FL+1~, FL+2*
ZISHP2	FL+1~, FL+2*
ZISHPARM	SEND+4~
ZISHQ	OPEN+18~, OPEN+37, OPEN+40, OPEN+41, DEL+5~, DEL+15, DEL+16
ZISHX	OPEN+24, DEL+5~, DEL+15, DEL+16, DEL+23, LIST+5~, LIST+22, LIST+24, LIST+27, MV+3~ , MV+10, MV+16, MV+18, JW+1*
>> ZTQUEUED	OPEN+40